From 776073fa7b528ca8a6e5169e18acbfb9185cd65d Mon Sep 17 00:00:00 2001 From: Alessio Stalla Date: Sat, 16 Mar 2024 08:58:08 +0100 Subject: [PATCH] Fix the use of native Lisp symbols as Treep symbols in the REPL --- src/level0/repl.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/level0/repl.lisp b/src/level0/repl.lisp index be52849..ec8aa7b 100644 --- a/src/level0/repl.lisp +++ b/src/level0/repl.lisp @@ -1,7 +1,7 @@ (in-package :treep-impl) -(defconstant +symbol-repl+ (intern "repl" +symbol-treep+)) -(defconstant +symbol-repl-quit+ (intern "quit" +symbol-repl+)) +(defvar +symbol-repl+ (intern "repl" +symbol-treep+)) +(defvar +symbol-repl-quit+ (intern "quit" +symbol-repl+)) ;;TODO expose to the REPL as just "quit" (define-abstraction quit +symbol-repl-quit+)