altos/lisp: Rename progn to begin

[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 4c48433767646c26e5c924023b5c772aa447d090..236cadb49c965c448372c2369dade72e7496d583 100644 (file)
--- a/src/lisp/ao_lisp_builtin.txt
+++ b/src/lisp/ao_lisp_builtin.txt
@@ -13,7 +13,7 @@ nlambda               quote
 f_lambda       set
 macro          setq            set!
 nlambda                cond
-nlambda                progn
+nlambda                begin
 nlambda                while
 f_lexpr                write
 f_lexpr                display
@@ -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
@@ -42,7 +42,8 @@ f_lambda      nullp           null?
 f_lambda       not
 f_lambda       listp           list?
 f_lambda       pairp           pair?
-f_lambda       numberp         number? integer?
+f_lambda       integerp        integer? exact? exact-integer?
+f_lambda       numberp         number? real?
 f_lambda       booleanp        boolean?
 f_lambda       set_car         set-car!
 f_lambda       set_cdr         set-cdr!
@@ -58,3 +59,7 @@ f_lambda      exit
 f_lambda       current_jiffy   current-jiffy
 f_lambda       current_second  current-second
 f_lambda       jiffies_per_second      jiffies-per-second
+f_lambda       finitep         finite?
+f_lambda       infinitep       infinite?
+f_lambda       inexactp        inexact?
+f_lambda       sqrt