aboutsummaryrefslogtreecommitdiff
path: root/src/interp/functor.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/functor.boot')
-rw-r--r--src/interp/functor.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/functor.boot b/src/interp/functor.boot
index 94619b9d..8c6fc79c 100644
--- a/src/interp/functor.boot
+++ b/src/interp/functor.boot
@@ -351,7 +351,7 @@ SetDomainSlots124(vec,names,vals) ==
l := pairList(names,vals)
vectorRef(vec,1) := sublisProp(l,vectorRef(vec,1))
vectorRef(vec,2) := sublisProp(l,vectorRef(vec,2))
- l:= [[a,:devaluate b] for a in names for b in vals]
+ l := [[a,:devaluate b] for a in names for b in vals]
vectorRef(vec,4) := applySubst(l,vectorRef(vec,4))
vectorRef(vec,1) := applySubst(l,vectorRef(vec,1))