X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=src%2Fmain%2Fnvm%2Fnvm.lisp;h=413bd55021702c52e1faee6162f3e9158da89a46;hp=287513e445265ab4a683bf56e14b592be520547a;hb=76f94e0;hpb=fb6e383b5e0f5c86e4c79e0839dcbfee91b2e9fc 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