diff options
-rw-r--r-- | src/parser.c | 8 | ||||
-rw-r--r-- | src/parser.h | 8 |
2 files changed, 8 insertions, 8 deletions
diff --git a/src/parser.c b/src/parser.c index 3051a28..ce0c395 100644 --- a/src/parser.c +++ b/src/parser.c | |||
@@ -23,10 +23,10 @@ static Object builtins[] = { | |||
23 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_IS_ZERO, .builtin_text = STRING("zero?") }, | 23 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_IS_ZERO, .builtin_text = STRING("zero?") }, |
24 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_IS_FIXNUM, .builtin_text = STRING("fixnum?") }, | 24 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_IS_FIXNUM, .builtin_text = STRING("fixnum?") }, |
25 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_IS_BOOL, .builtin_text = STRING("bool?") }, | 25 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_IS_BOOL, .builtin_text = STRING("bool?") }, |
26 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_IS_PRINT, .builtin_text = STRING("display") }, | 26 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_PRINT, .builtin_text = STRING("print") }, |
27 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_IS_CONS, .builtin_text = STRING("cons") }, | 27 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_CONS, .builtin_text = STRING("cons") }, |
28 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_IS_CAR, .builtin_text = STRING("car") }, | 28 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_CAR, .builtin_text = STRING("car") }, |
29 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_IS_CDR, .builtin_text = STRING("cdr") }, | 29 | { .type = OBJ_TYPE_BUILTIN, .builtin = BUILTIN_CDR, .builtin_text = STRING("cdr") }, |
30 | }; | 30 | }; |
31 | 31 | ||
32 | Token | 32 | Token |
diff --git a/src/parser.h b/src/parser.h index c26e265..2604be4 100644 --- a/src/parser.h +++ b/src/parser.h | |||
@@ -44,10 +44,10 @@ typedef enum Builtin { | |||
44 | BUILTIN_IS_ZERO, | 44 | BUILTIN_IS_ZERO, |
45 | BUILTIN_IS_FIXNUM, | 45 | BUILTIN_IS_FIXNUM, |
46 | BUILTIN_IS_BOOL, | 46 | BUILTIN_IS_BOOL, |
47 | BUILTIN_IS_PRINT, | 47 | BUILTIN_PRINT, |
48 | BUILTIN_IS_CONS, | 48 | BUILTIN_CONS, |
49 | BUILTIN_IS_CAR, | 49 | BUILTIN_CAR, |
50 | BUILTIN_IS_CDR, | 50 | BUILTIN_CDR, |
51 | } Builtin; | 51 | } Builtin; |
52 | 52 | ||
53 | typedef struct Object { | 53 | typedef struct Object { |