diff options
| author | Quentin Carbonneaux <quentin.carbonneaux@yale.edu> | 2015-11-18 08:56:02 -0500 |
|---|---|---|
| committer | Quentin Carbonneaux <quentin.carbonneaux@yale.edu> | 2015-11-18 08:56:02 -0500 |
| commit | a968dc687d8a4fa3303a750d3ef1eea9369b2fdd (patch) | |
| tree | 04a8bed82d80787ae609dd7f50de5009101ea1ed /lisc | |
| parent | 2ea517ed26e3f1adf84268648cd028efd6825e52 (diff) | |
| download | roux-a968dc687d8a4fa3303a750d3ef1eea9369b2fdd.tar.gz | |
support _ in identifiers
Diffstat (limited to 'lisc')
| -rw-r--r-- | lisc/parse.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisc/parse.c b/lisc/parse.c index 10fc0a3..a5c6040 100644 --- a/lisc/parse.c +++ b/lisc/parse.c @@ -225,7 +225,7 @@ Alpha: c = fgetc(inf); err("identifier too long"); tok[i++] = c; c = fgetc(inf); - } while (isalpha(c) || c == '.' || isdigit(c)); + } while (isalpha(c) || c == '.' || c == '_' || isdigit(c)); tok[i] = 0; ungetc(c, inf); if (t != TXXX) { |