#include "Scope.h" #include "defs.h" @implementation Scope + (id) newWithOuter: (Scope *) o { return [[self alloc] initWithOuter: o]; } - (id) initWithOuter: (Scope *) o { self = [super init]; outerScope = o; names = [Array new]; return self; } - (int) indexLocal: (Symbol *) sym { local int index; for (index = 0; index < [names count]; index++) { if (sym == [names objectAtIndex: index]) { return index; } } return -1; } - (int) indexOf: (Symbol *) sym { local int index; index = [self indexLocal: sym]; if (index < 0 && outerScope) { return [outerScope indexOf: sym]; } else { return index; } } - (int) depthOf: (Symbol *) sym { local int index; local int res; index = [self indexLocal: sym]; if (index < 0) { if (outerScope) { res = [outerScope depthOf: sym]; if (res < 0) { return -1; } else { return 1 + res; } } else { return -1; } } else { return 0; } } - (void) addName: (Symbol *) sym { [names addObject: sym]; } - (void) dealloc { if (names) { [names release]; } names = nil; [super dealloc]; } - (void) markReachable { [names makeObjectsPerformSelector: @selector(mark)]; [outerScope mark]; } - (Scope *) outer { return outerScope; } @end