projects
/
fw
/
altos
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
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
f_lambda set
macro setq set!
nlambda cond
-nlambda
prog
n
+nlambda
begi
n
nlambda while
f_lexpr write
f_lexpr display
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_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
@@
-42,7
+42,8
@@
f_lambda nullp null?
f_lambda not
f_lambda listp list?
f_lambda pairp pair?
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!
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 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