diff --git a/module/language/tree-il.scm b/module/language/tree-il.scm
index 580ebdace..da511522c 100644
--- a/module/language/tree-il.scm
+++ b/module/language/tree-il.scm
@@ -322,7 +322,7 @@
      `(dynref ,(unparse-tree-il fluid)))
 
     ((<dynset> fluid exp)
-     `(dynref ,(unparse-tree-il fluid) ,(unparse-tree-il exp)))
+     `(dynset ,(unparse-tree-il fluid) ,(unparse-tree-il exp)))
 
     ((<prompt> tag body handler)
      `(prompt ,(unparse-tree-il tag) ,(unparse-tree-il body) ,(unparse-tree-il handler)))