summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--share/txr/stdlib/compiler.tl2
1 files changed, 1 insertions, 1 deletions
diff --git a/share/txr/stdlib/compiler.tl b/share/txr/stdlib/compiler.tl
index c8125924..7d8a7bf9 100644
--- a/share/txr/stdlib/compiler.tl
+++ b/share/txr/stdlib/compiler.tl
@@ -218,7 +218,7 @@
^(,*vfrag.code
,*(if bind
(maybe-mov vloc vfrag.oreg)
- ^((setv ,vloc ,vfrag.oreg))))
+ ^((setv ,vfrag.oreg ,vloc))))
(uni (list sym) vfrag.fvars)
vfrag.ffuns)))))