diff options
Diffstat (limited to 'src/interp/define.boot')
| -rw-r--r-- | src/interp/define.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/define.boot b/src/interp/define.boot index cc247270..d40033e0 100644 --- a/src/interp/define.boot +++ b/src/interp/define.boot @@ -501,7 +501,7 @@ compDefineCategory2(form,signature,specialCases,body,m,e, ['sublisV,['PAIR,['QUOTE,sargl],['LIST,: [['devaluate,u] for u in sargl]]],body] body:= - ["%Bind",[[g:= gensym(),body]], + ["%bind",[[g:= gensym(),body]], ["setShellEntry",g,0,mkConstructor $form],g] fun:= compile [op',["LAM",sargl,body]] |