diff options
| -rw-r--r-- | MLKDynamicContext.m | 4 | ||||
| -rw-r--r-- | MLKLexicalEnvironment.m | 2 | 
2 files changed, 3 insertions, 3 deletions
| diff --git a/MLKDynamicContext.m b/MLKDynamicContext.m index 83359cb..b76d92b 100644 --- a/MLKDynamicContext.m +++ b/MLKDynamicContext.m @@ -42,7 +42,7 @@              initWithParent:(parent                                      \                              ? (id) parent_member                        \                              : nil)                                      \ -                  bindings:vars]                                        \ +                  bindings:variable]                                    \     : (id) (parent ? (id) RETAIN (parent_member) : nil)); @@ -78,7 +78,7 @@ static MLKDynamicContext *global_context;    [sys intern:@"%DEFMACRO"];    [tlUser usePackage:clUser]; -  [toilet import:nil]; +  //[toilet import:nil];    // Build the initial readtable.    [readtable setSyntaxType:WHITESPACE forCharacter:'\t']; diff --git a/MLKLexicalEnvironment.m b/MLKLexicalEnvironment.m index 58cf7f1..3d0c31c 100644 --- a/MLKLexicalEnvironment.m +++ b/MLKLexicalEnvironment.m @@ -42,7 +42,7 @@              initWithParent:(parent                                      \                              ? (id) parent_member                        \                              : nil)                                      \ -                  bindings:vars]                                        \ +                  bindings:variable]                                    \     : (id) (parent ? (id) RETAIN (parent_member) : nil)); | 
