add spec.

2 files changed, 24 insertions, 0 deletions

diff --git a/spec/inputs/macro-export.yue b/spec/inputs/macro-export.yue
index 22ef424..46cc608 100644
--- a/spec/inputs/macro-export.yue
+++ b/spec/inputs/macro-export.yue
@@ -32,6 +32,20 @@ export macro assert = (cond)->
         else
                 "#{cond}"
 
+export macro copy = (src, dst, ...)->
+        assert(
+                src != "_src_" and src != "_dst_" and dst != "_src_" and dst != "_dst_"
+                "copy targets can not be _src_ or _dst_"
+        )
+        "
+do
+        local _src_, _dst_
+        with _dst_ = #{dst}
+                with _src_ = #{src}
+#{table.concat (for field in *{...}
+                "                       _dst_.#{field} = _src_.#{field}"), "\n"}
+"
+
 $ ->
         global debugMode = true
         global debugMacro = true
diff --git a/spec/inputs/macro.yue b/spec/inputs/macro.yue
index e391b9e..e4b0fc8 100644
--- a/spec/inputs/macro.yue
+++ b/spec/inputs/macro.yue
@@ -24,6 +24,16 @@ if $and f1!
 if $and f1!, f2!, f3!
         print "OK"
 
+item = $copy(
+        @
+        {pos: {}, flags: flags::tonumber!}
+        id
+        connections
+        pos.x
+        pos.y
+        pos.z
+)
+
 macro in = (target, ...)->
         values = [value for value in *{...}]
         $showMacro "in", table.concat ["#{target} == #{item}" for item in *values], " or "