X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?a=blobdiff_plain;f=src%2Fmain%2Fnvm%2Fnvm.lisp;h=413bd55021702c52e1faee6162f3e9158da89a46;hb=76f94e0a768f1f6f206c07eda27c690c42f1ddd4;hp=287513e445265ab4a683bf56e14b592be520547a;hpb=81d51af6e0ac022d1e96b2bcd45909b75d855675;p=clnl diff --git a/src/main/nvm/nvm.lisp b/src/main/nvm/nvm.lisp index 287513e..413bd55 100644 --- a/src/main/nvm/nvm.lisp +++ b/src/main/nvm/nvm.lisp @@ -210,6 +210,9 @@ DESCRIPTION: (defmethod dump-object ((o string)) o) +(defmethod dump-object ((o (eql t))) "true") +(defmethod dump-object ((o (eql nil))) "false") + (defun current-state () "CURRENT-STATE => WORLD-STATE