aboutsummaryrefslogtreecommitdiff
path: root/src/interp/define.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/define.boot')
-rw-r--r--src/interp/define.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/define.boot b/src/interp/define.boot
index ad52ec88..039f1618 100644
--- a/src/interp/define.boot
+++ b/src/interp/define.boot
@@ -332,8 +332,8 @@ getTargetFromRhs(lhs,rhs,e) ==
(compOrCroak(rhs,$EmptyMode,e)).mode
giveFormalParametersValues(argl,e) ==
- for x in argl repeat
- e:= put(x,'value,[genSomeVariable(),get(x,'mode,e),nil],e)
+ for x in argl | IDENTP x repeat
+ e := giveVariableSomeValue(x,get(x,'mode,e),e)
e