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
-f_lexpr                print
-f_lexpr                patom
+f_lexpr                write
+f_lexpr                display
 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_lambda       flush
+f_lambda       flush_output            flush-output
 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       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