klisp

commit efbdabdafbb4e6405ebe539ab1ac2d3534a2535d
parent 2e38fafd51c879fac2484af60ac267bb4ac322d7
Author: Andres Navarro <canavarro82@gmail.com>
Date:   Fri, 29 Apr 2011 18:27:10 -0300

Added names to all repl continuations (including root and error).

Diffstat:
M
src/kground.c
 | 
9
++++++++-

1 file changed, 8 insertions(+), 1 deletion(-)
diff --git a/src/kground.c b/src/kground.c
@@ -105,7 +105,14 @@ void kinit_cont_names(klisp_State *K)
 {
     Table *t = tv2table(K->cont_name_table);
 
-    add_cont_name(K, t, exit_fn, "do-exit");
+    /* REPL, root-continuation & error-continuation */
+    add_cont_name(K, t, exit_fn, "exit");
+    add_cont_name(K, t, read_fn, "repl-read");
+    add_cont_name(K, t, eval_cfn, "repl-eval");
+    add_cont_name(K, t, loop_fn, "repl-loop");
+    add_cont_name(K, t, error_fn, "repl-report-error");
+
+    /* GROUND ENV */
 }
 
 /*