Home
last modified time | relevance | path

Searched refs:SG_PROCEDURE_TYPE (Results 1 – 5 of 5) sorted by relevance

/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/
H A Dsubr.c42 if (SG_PROCEDURE_TYPE(obj) == SG_PROC_SUBR) in proc_print()
44 else if (SG_PROCEDURE_TYPE(obj) == SG_PROC_CLOSURE) in proc_print()
47 else if (SG_PROCEDURE_TYPE(obj) == SG_PROC_GENERIC) in proc_print()
49 else if (SG_PROCEDURE_TYPE(obj) == SG_PROC_METHOD) in proc_print()
51 else if (SG_PROCEDURE_TYPE(obj) == SG_PROC_NEXT_METHOD) in proc_print()
H A Dvmcall.c162 proctype = SG_PROCEDURE_TYPE(AC(vm));
H A Dvm.c1717 switch (SG_PROCEDURE_TYPE(cl)) { in get_stack_trace()
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/src/sagittarius/private/
H A Dsubr.h101 #define SG_PROCEDURE_TYPE(obj) SG_PROCEDURE(obj)->type macro
117 SG_PROCEDURE_TYPE(obj) = (typ), \
137 (SG_PROCEDUREP(obj) && SG_PROCEDURE_TYPE(obj) == SG_PROC_SUBR)
H A Dclosure.h44 #define SG_CLOSUREP(obj) (SG_PROCEDUREP(obj) && (SG_PROCEDURE_TYPE(obj)) == SG_PROC_CLOSURE)