diff options
Diffstat (limited to 'src/interp/wi2.boot')
| -rw-r--r-- | src/interp/wi2.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/wi2.boot b/src/interp/wi2.boot index 1f79c307..85068b58 100644 --- a/src/interp/wi2.boot +++ b/src/interp/wi2.boot @@ -433,7 +433,7 @@ applyMapping([op,:argl],m,e,ml) == -- following needed for referencing local funs at capsule level getAbbreviation($op,#rest $form) [op',:argl',"$"] where - op':= INTERN strconc(encodeItem nprefix,";",encodeItem op) + op':= makeSymbol strconc(encodeItem nprefix,";",encodeItem op) ['%call,['applyFun,op],:argl'] pairlis := pairList(argl',$FormalMapVariableList) convert([form,SUBLIS(pairlis,first ml),e],m) |