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`
			`{`
			`Scope outerScope;`
			`Array names;`
			`}`
			`+ (id) newWithOuter: (Scope) o;`
			`- (id) initWithOuter: (Scope) o;`
			`- (integer) depthOf: (Symbol) sym;`
			`- (integer) indexOf: (Symbol) sym;`
			`- (void) addName: (Symbol) sym;`
Fix a slew of warnings found by -Wall. -Wall still isn't used yet due to a missing method in Array, and overzealous warnings in qfcc, but this covers the necessary fixes. 2010-12-16 11:01:49 +00:00			`- (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`