X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Flisp%2Fao_lisp_read.h;h=fc74a8e4972f80dd87dd6aac6e63ff564c701ad9;hb=a4e18a13029cc7b16b2ed9da84d6e606bc725ac3;hp=f8bcd195fbc3788d982db5dc318201787a81b700;hpb=5b6f4b5de89a2bb0d63442e2651cf8d2ee0f4b10;p=fw%2Faltos

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_ */