qf
/
quakeforge
mirror of https://git.code.sf.net/p/quake/quakeforge
0
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
quakeforge/ruamoko/scheme/Machine.h

33 lines
792 B
C
Raw Normal View History

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