aboutsummaryrefslogtreecommitdiff
path: root/src/interp/g-opt.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/g-opt.boot')
-rw-r--r--src/interp/g-opt.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/g-opt.boot b/src/interp/g-opt.boot
index 958a1f6a..38ad55b6 100644
--- a/src/interp/g-opt.boot
+++ b/src/interp/g-opt.boot
@@ -506,7 +506,7 @@ findVMFreeVars form ==
op is "QUOTE" => nil
vars := union/[findVMFreeVars arg for arg in args]
op isnt [.,:.] => vars
- union(findVMFreeVars op,vars)
+ setUnion(findVMFreeVars op,vars)
++ Return true is `var' is the left hand side of an assignment
++ in `form'.