From 932d3df11b56b88a97ef497ca7c891547275d05a Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Sat, 14 Jun 2008 21:55:14 +0200
Subject: Add class MLKPackage.

---
 MLKPackage.h | 17 ++++++-----------
 1 file changed, 6 insertions(+), 11 deletions(-)

(limited to 'MLKPackage.h')

diff --git a/MLKPackage.h b/MLKPackage.h
index e601b18..ed3787e 100644
--- a/MLKPackage.h
+++ b/MLKPackage.h
@@ -23,11 +23,11 @@
 
 @interface MLKPackage : MLKLispValue
 {
-  NSMutableDictionary *symbols;
-  NSMutableSet *exported_symbols;
-  NSMutableSet *shadowed_symbols;
-  NSMutableSet *nicknames;
-  NSString *name;
+  NSMutableDictionary *_symbols;
+  NSMutableSet *_exported_symbols;
+  NSMutableSet *_shadowed_symbols;
+  NSMutableSet *_nicknames;
+  NSString *_name;
 }
 
 -(MLKPackage *) initWithName:(NSString *)name
@@ -37,7 +37,7 @@
 
 -(void) usePackage:(MLKPackage *)aPackage;
 -(void) import:(MLKSymbol *)aSymbol;
--(void) shadow:(MLKPackage *)aPackage;
+-(void) shadow:(MLKSymbol *)aSymbol;
 -(void) unintern:(MLKSymbol *)aSymbol;
 -(MLKSymbol *) intern:(NSString*)symbolName;
 -(MLKSymbol *) findSymbol:(NSString*)symbolName;
@@ -47,9 +47,4 @@
 -(NSSet *) exportedSymbols;
 -(NSSet *) shadowedSymbols;
 -(NSSet *) allSymbols;
-
-// [clUser cons: @"Mulk", [clUser __intern: @"NIL"]] ought to do the
-// Right Thing.
--(void) forwardInvocation:(NSInvocation *)anInvocation;
--(BOOL) respondsToSelector:(SEL)selector;
 @end
-- 
cgit v1.2.3