projects
/
fw
/
altos
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
altos/lisp: Add apply
[fw/altos]
/
src
/
lisp
/
ao_lisp_read.c
diff --git
a/src/lisp/ao_lisp_read.c
b/src/lisp/ao_lisp_read.c
index bcd23ce14b726bb4cf8bb06ee293aa718f020249..8c06e19898f93c2300e60711396063f1666eb50a 100644
(file)
--- a/
src/lisp/ao_lisp_read.c
+++ b/
src/lisp/ao_lisp_read.c
@@
-516,7
+516,7
@@
ao_lisp_read(void)
if (!push_read_stack(cons, read_state))
return AO_LISP_NIL;
cons++;
- read_state
|
= READ_IN_QUOTE;
+ read_state = READ_IN_QUOTE;
v = _ao_lisp_atom_quote;
break;
case CLOSE: