1 files changed, 4 insertions, 0 deletions
diff --git a/mu.arc b/mu.arc
index 958cda77..7cd9248c 100644
--- a/mu.arc
+++ b/mu.arc
@@ -371,6 +371,10 @@
                       array-len.base
                       -1))
 
+                ; tagged-values require one primitive
+                save-type
+                  (annotate 'record `(,(ty arg.0) ,(v arg.0)))
+
                 ; multiprocessing
                 run
                   (run (v arg.0))