From ab43577a31b56bb451d1abc3eb9da2e8afc12509 Mon Sep 17 00:00:00 2001 From: Matthias Benkard Date: Mon, 11 Aug 2008 11:48:37 +0200 Subject: MLKForm class cluster: Implement declaration and docstring handling. --- MLKInterpreter.m | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'MLKInterpreter.m') diff --git a/MLKInterpreter.m b/MLKInterpreter.m index d3d6161..42d22ed 100644 --- a/MLKInterpreter.m +++ b/MLKInterpreter.m @@ -554,7 +554,7 @@ MLKLexicalContext *ctx; MLKSplitDeclarationsDocAndForms (&declarations, &doc, &body, - [[program cdr] cdr]); + [[program cdr] cdr], NO); ctx = LAUTORELEASE ([[MLKLexicalContext alloc] initWithParent:context variables:nil @@ -616,7 +616,7 @@ MLKLexicalEnvironment *env; MLKSplitDeclarationsDocAndForms (&declarations, &doc, &body, - [[program cdr] cdr]); + [[program cdr] cdr], NO); ctx = LAUTORELEASE ([[MLKLexicalContext alloc] initWithParent:context @@ -693,7 +693,7 @@ MLKDynamicContext *dynctx; MLKSplitDeclarationsDocAndForms (&declarations, &doc, &body, - [[program cdr] cdr]); + [[program cdr] cdr], NO); ctx = LAUTORELEASE ([[MLKLexicalContext alloc] initWithParent:context -- cgit v1.2.3