home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.mactech.com 2010
/
ftp.mactech.com.tar
/
ftp.mactech.com
/
online
/
source
/
c
/
compilers
/
C_Interp.sit.hqx
/
C_Interp
/
Interp.h
< prev
next >
Wrap
Text File
|
1992-04-29
|
818b
|
28 lines
/*
Terminal 2.2
"Interp.h"
*/
typedef long INTEGER; /* Pointers and integers are mixed */
/* ----- Intrinsic function table (provided by shell) ------------------ */
typedef INTEGER (*IFUNC)(INTEGER *);
typedef struct {
Byte *fname;
IFUNC fn; /* Parameter is (INTEGER *) */
} INTRINSIC;
/* ----- Functions provided by interpreter ----------------------------- */
void SI_Load(INTRINSIC *, Byte *, long); /* Load and link */
INTEGER SI_Interpret(void); /* Start the interpreter */
INTEGER SI_stack(INTEGER *); /* Remaining stack space */
/* ----- Functions provided by the shell ------------------------------- */
Byte SI_GetSource(void); /* Get next char from source */
void SI_UngetSource(Byte); /* char not needed now */
void SI_Error(short, Byte *, short); /* Error from interpreter */