diff options
| author | Keith Packard <keithp@keithp.com> | 2017-11-17 08:50:50 -0800 |
|---|---|---|
| committer | Keith Packard <keithp@keithp.com> | 2017-11-17 08:52:28 -0800 |
| commit | a4e18a13029cc7b16b2ed9da84d6e606bc725ac3 (patch) | |
| tree | 6135e2ea070d00bf2f2560bd9e4846178fa4022a /src/lisp/ao_lisp_read.h | |
| parent | 5b6f4b5de89a2bb0d63442e2651cf8d2ee0f4b10 (diff) | |
altos/lisp: Character consts. String and assoc builtins.
Also add back escaped characters in strings.
Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src/lisp/ao_lisp_read.h')
| -rw-r--r-- | src/lisp/ao_lisp_read.h | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/lisp/ao_lisp_read.h b/src/lisp/ao_lisp_read.h index f8bcd195..fc74a8e4 100644 --- a/src/lisp/ao_lisp_read.h +++ b/src/lisp/ao_lisp_read.h @@ -44,11 +44,10 @@ # define IGNORE 0x0100 /* \0 - ' ' */ # define BACKSLASH 0x0200 /* \ */ # define VBAR 0x0400 /* | */ -# define TWIDDLE 0x0800 /* ~ */ -# define STRINGC 0x1000 /* " */ -# define POUND 0x2000 /* # */ +# define STRINGC 0x0800 /* " */ +# define POUND 0x1000 /* # */ -# define NOTNAME (STRINGC|TWIDDLE|VBAR|COMMENT|ENDOFFILE|WHITE|SPECIAL) +# define NOTNAME (STRINGC|VBAR|COMMENT|ENDOFFILE|WHITE|SPECIAL) # define NUMBER (DIGIT|SIGN) #endif /* _AO_LISP_READ_H_ */ |