chuck: prevent defmacro! from mutating its argument

kanaka · Oct 22, 2024 · ac666a1 · ac666a1
1 parent 1873468
commit ac666a1
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 0 deletions.
diff --git a/impls/chuck/step8_macros.ck b/impls/chuck/step8_macros.ck
@@ -202,6 +202,7 @@ fun MalObject EVAL(MalObject m, Env env)
                     return value;
                 }
 
+                value.clone() @=> value;
                 true => (value$Func).isMacro;
 
                 env.set(a1, value);

diff --git a/impls/chuck/step9_try.ck b/impls/chuck/step9_try.ck
@@ -202,6 +202,7 @@ fun MalObject EVAL(MalObject m, Env env)
                     return value;
                 }
 
+                value.clone() @=> value;
                 true => (value$Func).isMacro;
 
                 env.set(a1, value);

diff --git a/impls/chuck/stepA_mal.ck b/impls/chuck/stepA_mal.ck
@@ -202,6 +202,7 @@ fun MalObject EVAL(MalObject m, Env env)
                     return value;
                 }
 
+                value.clone() @=> value;
                 true => (value$Func).isMacro;
 
                 env.set(a1, value);