Clone macro default argument before macro expansion

crystal-lang · Jan 10, 2018 · 157eca0 · 157eca0
1 parent a3ca37e
commit 157eca0
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 1 deletion.
diff --git a/spec/compiler/semantic/macro_spec.cr b/spec/compiler/semantic/macro_spec.cr
@@ -1223,4 +1223,19 @@ describe "Semantic: macro" do
       Foo.new.foo
     )) { int32 }
   end
+
+  it "clones default value before expanding" do
+    assert_type(%(
+      FOO = {} of String => String?
+
+      macro foo(x = {} of String => String)
+        {% FOO["foo"] = x["foo"] %}
+        {% x["foo"] = "foo" %}
+      end
+
+      foo
+      foo
+      {{ FOO["foo"] }}
+    )) { nil_type }
+  end
 end
diff --git a/src/compiler/crystal/macros/interpreter.cr b/src/compiler/crystal/macros/interpreter.cr
@@ -51,7 +51,7 @@ module Crystal
         next if vars.has_key?(macro_arg.name)
 
         default_value = default_value.expand_node(call.location, call.end_location) if default_value.is_a?(MagicConstant)
-        vars[macro_arg.name] = default_value
+        vars[macro_arg.name] = default_value.clone
       end
 
       # The named arguments