mirrors/ciel
1
Fork 0
mirror of https://gitlab.com/vindarel/ciel.git synced 2026-03-26 16:30:47 -07:00
Code Issues Projects Releases Packages Wiki Activity

REPL: disable reset

Browse source
This commit is contained in:
vindarel 2020-10-19 14:42:29 +02:00
parent 8f7af9eb6e
commit 2d1d45dee1
2 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

1
README.org
View file

@ -104,7 +104,6 @@ TODO: we will distribute ready-to-use core images.
:d => Dumps the disassembly of a symbol <sym>
:t => Prints the type of a expression <expr>
:q => Ends the session.
:z => Resets the session environment
#+end_src
Note: the documentation is also available by appending a "?" after a

13
repl.lisp
View file

@ -77,11 +77,12 @@ based on SBCLI")
(format t "~%Bye!~&")
(uiop:quit))
(defun reset ()
"Resets the session environment"
(delete-package 'sbcli)
(defpackage :sbcli (:use :common-lisp :ciel))
(in-package :sbcli))
;; (defun reset ()
;; "Resets the session environment"
;; (delete-package 'sbcli)
;; (defpackage :sbcli (:use :common-lisp :ciel))
;; ;XXX: ?
;; (in-package :sbcli))
(defun novelty-check (str1 str2)
(string/= (string-trim " " str1)
@ -184,7 +185,7 @@ based on SBCLI")
("d" . (1 . ,#'dump-disasm))
("t" . (-1 . ,#'dump-type))
("q" . (0 . ,#'end))
("z" . (0 . ,#'reset)))
;; ("z" . (0 . ,#'reset)))
:test 'equal))
(defun call-special (fundef call args)