diff options
author | Teddy <ted.sybil@gmail.com> | 2013-08-08 00:11:39 +0800 |
---|---|---|
committer | Teddy <ted.sybil@gmail.com> | 2013-08-08 00:11:39 +0800 |
commit | 56a85b5111751f5947579b5ee5cc92bdebb799c4 (patch) | |
tree | a19eece360f73ad75a67a9b011061d3691f40115 /eval.cpp | |
parent | 7ffab5bc462dafe0c48c3e1be0ae2112adf7a159 (diff) |
added more list-specific procs
Diffstat (limited to 'eval.cpp')
-rw-r--r-- | eval.cpp | 9 |
1 files changed, 5 insertions, 4 deletions
@@ -32,8 +32,8 @@ void Evaluator::add_builtin_routines() { ADD_BUILTIN_PROC(">", num_gt); ADD_BUILTIN_PROC("=", num_eq); - ADD_BUILTIN_PROC("exact?", num_exact); - ADD_BUILTIN_PROC("inexact?", num_inexact); + ADD_BUILTIN_PROC("exact?", num_is_exact); + ADD_BUILTIN_PROC("inexact?", num_is_inexact); ADD_BUILTIN_PROC("not", bool_not); ADD_BUILTIN_PROC("boolean?", is_boolean); @@ -46,10 +46,11 @@ void Evaluator::add_builtin_routines() { ADD_BUILTIN_PROC("set-cdr!", pair_set_cdr); ADD_BUILTIN_PROC("null?", is_null); ADD_BUILTIN_PROC("list?", is_list); - - ADD_BUILTIN_PROC("display", display); ADD_BUILTIN_PROC("list", make_list); + ADD_BUILTIN_PROC("length", length); + ADD_BUILTIN_PROC("append", append); + ADD_BUILTIN_PROC("display", display); } Evaluator::Evaluator() { |