altos/scheme: Rename to 'scheme', clean up build
[fw/altos] / src / lisp / ao_lisp_read.h
diff --git a/src/lisp/ao_lisp_read.h b/src/lisp/ao_lisp_read.h
deleted file mode 100644 (file)
index 8f6bf13..0000000
+++ /dev/null
@@ -1,58 +0,0 @@
-/*
- * Copyright © 2016 Keith Packard <keithp@keithp.com>
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation, either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful, but
- * WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
- * General Public License for more details.
- */
-
-#ifndef _AO_LISP_READ_H_
-#define _AO_LISP_READ_H_
-
-/*
- * token classes
- */
-
-# define END                   0
-# define NAME                  1
-# define OPEN                          2
-# define CLOSE                 3
-# define QUOTE                 4
-# define QUASIQUOTE            5
-# define UNQUOTE               6
-# define UNQUOTE_SPLICING      7
-# define STRING                        8
-# define NUM                   9
-# define FLOAT                 10
-# define DOT                   11
-# define BOOL                  12
-
-/*
- * character classes
- */
-
-# define PRINTABLE     0x0001  /* \t \n ' ' - ~ */
-# define SPECIAL       0x0002  /* ( [ { ) ] } ' ` , */
-# define DOTC          0x0004  /* . */
-# define WHITE         0x0008  /* ' ' \t \n */
-# define DIGIT         0x0010  /* [0-9] */
-# define SIGN          0x0020  /* +- */
-# define FLOATC                0x0040  /* . e E */
-# define ENDOFFILE     0x0080  /* end of file */
-# define COMMENT       0x0100  /* ; */
-# define IGNORE                0x0200  /* \0 - ' ' */
-# define BACKSLASH     0x0400  /* \ */
-# define STRINGC       0x0800  /* " */
-# define POUND         0x1000  /* # */
-
-# define NOTNAME       (STRINGC|COMMENT|ENDOFFILE|WHITE|SPECIAL)
-# define INTEGER       (DIGIT|SIGN)
-# define NUMBER                (INTEGER|FLOATC)
-
-#endif /* _AO_LISP_READ_H_ */