X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Flisp%2Fao_lisp_builtin.txt;h=c324ca67018d8f45a43999d9fbc3a075d7e74973;hb=12a1f6ad48f2b924f71239effeb90afca75a090f;hp=ba6455ab46a91911e1f46896ca0ae5d2153f615e;hpb=e1acf5eb12aceda7aa838df031c1da1129d0fa5d;p=fw%2Faltos

diff --git a/src/lisp/ao_lisp_builtin.txt b/src/lisp/ao_lisp_builtin.txt
index ba6455ab..c324ca67 100644
--- 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