diff options
Diffstat (limited to 'src/interp/functor.boot')
-rw-r--r-- | src/interp/functor.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/functor.boot b/src/interp/functor.boot index d539cef6..e7db218f 100644 --- a/src/interp/functor.boot +++ b/src/interp/functor.boot @@ -486,7 +486,7 @@ setVector5(catNames,locals) == if w:= assoc(u,generated) then RPLACD(w,[uname,:rest w]) else generated:= [[u,uname],:generated] - [(w:= mkVectorWithDeferral(first u,first rest u); + [(w:= mkVectorWithDeferral(first u,second u); for v in rest u repeat w:= ["setShellEntry",v,5,w]; w) |