projects
/
fw
/
altos
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
altos/lisp: Fix some scheme compat issues
[fw/altos]
/
src
/
lisp
/
ao_lisp_builtin.txt
diff --git
a/src/lisp/ao_lisp_builtin.txt
b/src/lisp/ao_lisp_builtin.txt
index ba6455ab46a91911e1f46896ca0ae5d2153f615e..c324ca67018d8f45a43999d9fbc3a075d7e74973 100644
(file)
--- a/
src/lisp/ao_lisp_builtin.txt
+++ b/
src/lisp/ao_lisp_builtin.txt
@@
-15,8
+15,8
@@
macro setq set!
nlambda cond
nlambda progn
nlambda while
nlambda cond
nlambda progn
nlambda while
-f_lexpr
print
-f_lexpr
patom
+f_lexpr
write
+f_lexpr
display
f_lexpr plus +
f_lexpr minus -
f_lexpr times *
f_lexpr plus +
f_lexpr minus -
f_lexpr times *
@@
-31,7
+31,7
@@
f_lexpr less_equal <=
f_lexpr greater_equal >=
f_lambda list_to_string list->string
f_lambda string_to_list string->list
f_lexpr greater_equal >=
f_lambda list_to_string list->string
f_lambda string_to_list string->list
-f_lambda flush
+f_lambda flush
_output flush-output
f_lambda delay
f_lexpr led
f_lambda save
f_lambda delay
f_lexpr led
f_lambda save
@@
-52,3
+52,9
@@
f_lambda string_to_symbol string->symbol
f_lambda stringp string?
f_lambda procedurep procedure?
lexpr apply
f_lambda stringp string?
f_lambda procedurep procedure?
lexpr apply
+f_lambda read_char read-char
+f_lambda write_char write-char
+f_lambda exit
+f_lambda current_jiffy current-jiffy
+f_lambda current_second current-second
+f_lambda jiffies_per_second jiffies-per-second