diff options
author | Matthias Andreas Benkard <matthias@benkard.de> | 2008-08-11 23:46:40 +0200 |
---|---|---|
committer | Matthias Andreas Benkard <matthias@benkard.de> | 2008-08-11 23:46:40 +0200 |
commit | 80a2cb47caaaac91384c72d49b8523b04e4c67e7 (patch) | |
tree | 212bd00841c2dfb5577a5a84f1a17ee61474e4c7 /special-symbols.h | |
parent | 1bf467cd776bbbcb79ca11da2a2d94cf58753ba5 (diff) |
Fix various errors in the compiler and semantic analyser.
Diffstat (limited to 'special-symbols.h')
-rw-r--r-- | special-symbols.h | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/special-symbols.h b/special-symbols.h index 2e80bf7..fa68ba7 100644 --- a/special-symbols.h +++ b/special-symbols.h @@ -19,7 +19,7 @@ #import "MLKSymbol.h" #import "MLKPackage.h" -static MLKPackage *cl; +static MLKPackage *cl = nil; static MLKPackage *sys; static MLKPackage *keyword; @@ -67,6 +67,8 @@ static MLKSymbol *MULTIPLE_VALUE_CALL; static void ensure_symbols () { + if (cl) return; + cl = [MLKPackage findPackage:@"COMMON-LISP"]; sys = [MLKPackage findPackage:@"TOILET-SYSTEM"]; keyword = [MLKPackage findPackage:@"KEYWORD"]; |