2005-05-01 11:48:36 +00:00
|
|
|
#ifndef __state_h
|
|
|
|
#define __state_h
|
|
|
|
|
|
|
|
#include "Instruction.h"
|
|
|
|
#include "Frame.h"
|
2005-05-08 06:38:01 +00:00
|
|
|
#include "CompiledCode.h"
|
2005-05-01 11:48:36 +00:00
|
|
|
|
2005-05-06 23:25:06 +00:00
|
|
|
@class Continuation;
|
|
|
|
|
2005-05-01 11:48:36 +00:00
|
|
|
struct state_s = {
|
|
|
|
instruction_t [] program;
|
2005-05-08 06:38:01 +00:00
|
|
|
lineinfo_t [] lineinfo;
|
2005-05-01 11:48:36 +00:00
|
|
|
integer pc;
|
2005-05-06 23:25:06 +00:00
|
|
|
Frame literals, env;
|
2005-05-01 11:48:36 +00:00
|
|
|
SchemeObject stack;
|
2005-05-06 23:25:06 +00:00
|
|
|
Continuation cont;
|
|
|
|
Procedure proc;
|
2005-05-01 11:48:36 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
typedef struct state_s state_t;
|
|
|
|
#endif
|