Searched refs:SG_PROCEDURE_OPTIONAL (Results 1 – 8 of 8) sorted by relevance
100 #define SG_PROCEDURE_OPTIONAL(obj) SG_PROCEDURE(obj)->optional macro116 SG_PROCEDURE_OPTIONAL(obj) = (opt), \187 if (SG_PROCEDURE_OPTIONAL(subr)) argc__++; \
33 SG_PROCEDURE_OPTIONAL)35 SG_PROCEDURE_OPTIONAL)
56 SG_PROCEDURE_REQUIRED(obj), SG_PROCEDURE_OPTIONAL(obj)); in proc_print()
40 int optargs = SG_PROCEDURE_OPTIONAL(proc); \67 int optargs = SG_PROCEDURE_OPTIONAL(proc); \
140 SG_RESULT=(SG_PROCEDURE_OPTIONAL(arg0)); in sagittarius_compiler_procedure_procedure_optional()163 SG_RESULT=(SG_PROCEDURE_OPTIONAL(arg0)); in sagittarius_compiler_procedure_procedure_optionalP()
225 int opt = SG_PROCEDURE_OPTIONAL(proc), offset=1; \226 SG_PROCEDURE_OPTIONAL(m) = opt; \292 SG_PROCEDURE_OPTIONAL(method) == SG_PROCEDURE_OPTIONAL(mm) && in check_method()698 if (!SG_PROCEDURE_OPTIONAL(m) && in compute_applicable_methods()745 if (SG_PROCEDURE_OPTIONAL(m2)) return TRUE; in method_more_specific()924 if (SG_PROCEDURE_OPTIONAL(SG_METHOD_PROCEDURE(proc))) { in procedure_invoker()935 if (SG_PROCEDURE_OPTIONAL(SG_METHOD_PROCEDURE(proc))) { in procedure_invoker()969 opt = SG_PROCEDURE_OPTIONAL(SG_CAR(mp)); in compute_around_methods_rec()998 SG_PROCEDURE_OPTIONAL(m) = opt; in compute_around_methods_rec()2741 if (SG_PROCEDURE_REQUIRED(body)+SG_PROCEDURE_OPTIONAL(body) != req+opt+1) { in method_initialize_impl()[all …]
204 (opt::int (SG_PROCEDURE_OPTIONAL p)))
2223 SG_PROCEDURE_OPTIONAL(p); in sagittarius_arity()