quakeforge/ruamoko/scheme/Machine.h

#ifndef __Machine_h
#define __Machine_h
#include "Symbol.h"
#include "CompiledCode.h"
#include "Frame.h"
#include "Continuation.h"
#include "hash.h"
#include "state.h"

@interface Machine: SchemeObject
{
    state_t state;
    SchemeObject []value;
    hashtab_t globals;
    SchemeObject []all_globals;
}
- (void) loadCode: (CompiledCode []) code;
- (SchemeObject []) run;
- (void) addGlobal: (Symbol []) sym value: (SchemeObject []) val;
- (void) environment: (Frame []) e;
- (void) continuation: (Continuation []) c;
- (Continuation []) continuation;
- (void) value: (SchemeObject []) o;
- (SchemeObject []) stack;
- (void) stack: (SchemeObject []) o;
- (state_t []) state;
- (void) state: (state_t []) st;
- (void) reset;
- (void) procedure: (Procedure []) pr;
@end

#endif //__Machine_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 __Machine_h`
			`#define __Machine_h`
			`#include "Symbol.h"`
			`#include "CompiledCode.h"`
			`#include "Frame.h"`
			`#include "Continuation.h"`
			`#include "hash.h"`
			`#include "state.h"`

			`@interface Machine: SchemeObject`
			`{`
			`state_t state;`
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			`SchemeObject []value;`
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			`hashtab_t globals;`
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			`SchemeObject []all_globals;`
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			`- (void) loadCode: (CompiledCode []) code;`
			`- (SchemeObject []) run;`
			`- (void) addGlobal: (Symbol []) sym value: (SchemeObject []) val;`
			`- (void) environment: (Frame []) e;`
			`- (void) continuation: (Continuation []) c;`
			`- (Continuation []) continuation;`
			`- (void) value: (SchemeObject []) o;`
			`- (SchemeObject []) stack;`
			`- (void) stack: (SchemeObject []) o;`
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			`- (state_t []) state;`
			`- (void) state: (state_t []) st;`
Added runtime error checking and line number tracking. Seems to catch most Scheme program errors without making Rua abort now, although there are a few things that still need to actually report errors instead of failing in weird ways. 2005-05-08 06:38:01 +00:00			`- (void) reset;`
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			`- (void) procedure: (Procedure []) pr;`
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 //__Machine_h`