Update of /project/crypticl/cvsroot/obol/src In directory common-lisp.net:/tmp/cvs-serv27905
Modified Files: lobo.lisp Log Message: Added :help command to Obol repl. Needs more work though.
Date: Sun Oct 2 16:17:55 2005 Author: tskogan
Index: obol/src/lobo.lisp diff -u obol/src/lobo.lisp:1.1.1.1 obol/src/lobo.lisp:1.2 --- obol/src/lobo.lisp:1.1.1.1 Tue Nov 23 22:43:39 2004 +++ obol/src/lobo.lisp Sun Oct 2 16:17:55 2005 @@ -818,7 +818,7 @@ ;;; (rpc:start-rpc-server) ;;(lib-chat:start-lib-chat-telnet-server 3050) ;;; (chat:start-chat-telnet-server 3050) - (start-telnet 23)) + (start-telnet 9023))
(defun init-obol-proc (f) "Define binding between obol primitive and interpreter handler" @@ -1923,9 +1923,19 @@ (case keyword (:reinit (init)) (:exit :exit) + (:help (obol-help)) (:in (call-inspect script-env)) (:pe (print-env script-env local-env)) (:sv (set-verbosity)))) + + +(defun obol-help () + "Obol repl help menu +:exit - exit the current obol REPL (the script continues to exist in the +runtime). +:help - this help menu. +:reinit - re-initialize the lobo runtime where this script is running. +:in - inspect an object.")
(defun call-inspect (script-env)