quakeforge/ruamoko/scheme/Scope.h

#ifndef __Scope_h
#define __Scope_h
#include "SchemeObject.h"
#include "Array.h"
#include "Symbol.h"

@interface Scope: SchemeObject
{
    Scope []outerScope;
    Array []names;
}
+ (id) newWithOuter: (Scope []) o;
- (id) initWithOuter: (Scope []) o;
- (integer) depthOf: (Symbol []) sym;
- (integer) indexOf: (Symbol []) sym;
- (void) addName: (Symbol []) sym;
- (Scope []) outer;
@end

#endif //__Scope_h
Initial commit of a future partial implementation of the R5RS Scheme standard, implemented in Ruamoko. Currently works for a few simple "Hello, world!" programs. 2005-05-01 11:48:36 +00:00			`#ifndef __Scope_h`
			`#define __Scope_h`
			`#include "SchemeObject.h"`
			`#include "Array.h"`
			`#include "Symbol.h"`

			`@interface Scope: SchemeObject`
			`{`
Clean out some unnecessary types from the progs engine and clean up the mess. This is a nasty commit, sorry, but 99% of the commit is interdependent. 2011-01-09 10:41:24 +00:00			`Scope []outerScope;`
			`Array []names;`
Initial commit of a future partial implementation of the R5RS Scheme standard, implemented in Ruamoko. Currently works for a few simple "Hello, world!" programs. 2005-05-01 11:48:36 +00:00			`}`
Clean out some unnecessary types from the progs engine and clean up the mess. This is a nasty commit, sorry, but 99% of the commit is interdependent. 2011-01-09 10:41:24 +00:00			`+ (id) newWithOuter: (Scope []) o;`
			`- (id) initWithOuter: (Scope []) o;`
			`- (integer) depthOf: (Symbol []) sym;`
			`- (integer) indexOf: (Symbol []) sym;`
			`- (void) addName: (Symbol []) sym;`
			`- (Scope []) outer;`
Initial commit of a future partial implementation of the R5RS Scheme standard, implemented in Ruamoko. Currently works for a few simple "Hello, world!" programs. 2005-05-01 11:48:36 +00:00			`@end`

			`#endif //__Scope_h`