Legend:
Library
Module
Module type
Parameter
Class
Class type
Library
Module
Module type
Parameter
Class
Class type
type sval =
| Sunbound
| Snull
| Seof
| Strue
| Sfalse
| Sstring of string
| Ssymbol of string
| Sint of int
| Sreal of float
| Scomplex of Complex.t
| Sbigint of Big_int.big_int
| Srational of Ratio.ratio
| Schar of char
| Spair of spair
| Svector of sval array
| Sport of Ocs_port.port
| Sproc of sproc * sval array array
| Sprim of sprim
| Spromise of spromise
| Svalues of sval array
| Sesym of env * sval
| Swrapped of unit -> unit
| Sunspec
and sproc = {
proc_body : code;
proc_nargs : int;
proc_has_rest : bool;
proc_frame_size : int;
mutable proc_name : string;
}
and code =
| Cval of sval
| Cseq2 of code * code
| Cseq3 of code * code * code
| Cseqn of code array
| Cand2 of code * code
| Cand3 of code * code * code
| Candn of code array
| Cor2 of code * code
| Cor3 of code * code * code
| Corn of code array
| Cif of code * code * code
| Csetg of gvar * code
| Csetl of int * int * code
| Cdefine of gvar * code
| Cgetg of gvar
| Cgetl of int * int
| Capply0 of code
| Capply1 of code * code
| Capply2 of code * code * code
| Capply3 of code * code * code * code
| Capplyn of code * code array
| Clambda of sproc
| Cqqp of code * code
| Cqqv of code array
| Cqqvs of code list
| Cqqspl of code
| Ccond of (code * code) array
| Ccondspec of code
| Ccase of code * (sval array * code) array
| Cdelay of code
and env = {
env_depth : int;
env_vartable : vbind Ocs_vartable.vartable;
env_frame_size : int Pervasives.ref;
mutable env_tagged : (env * sval * vbind) list;
}