diff options
Diffstat (limited to 'src/interp/i-map.boot')
-rw-r--r-- | src/interp/i-map.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-map.boot b/src/interp/i-map.boot index 7832613a..331c54fa 100644 --- a/src/interp/i-map.boot +++ b/src/interp/i-map.boot @@ -551,7 +551,7 @@ mkInterpFun(op,opName,argTypes) == for argName in parms]] where argCode() == ['putValueValue,['mkAtreeNode,MKQ argName], objNewCode(['wrap,argName],type)] - funName := GENSYM() + funName := gensym() body:=['rewriteMap1,MKQ opName,arglCode,MKQ sig] putMapCode(opName,body,sig,funName,parms,false) genMapCode(opName,body,sig,funName,parms,false) |