diff options
author | Andy Wingo <wingo@pobox.com> | 2016-06-24 14:15:38 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2016-06-24 14:15:38 +0200 |
commit | d848af9a161b0c37964d582dfb8b52ed5112355f (patch) | |
tree | 6a5fb67950693dca72b61e0ed6872ec14b6fe47a /libguile/gsubr.h | |
parent | 5ca24b6ba1bc617e60a0a9b2ecad7f112e99ef9c (diff) | |
download | guile-d848af9a161b0c37964d582dfb8b52ed5112355f.tar.gz |
Parse bytecode to determine minimum arity
* libguile/programs.c (try_parse_arity): New helper, to parse bytecode
to determine the minimum arity of a function in a cheaper way than
grovelling through the debug info. Should speed up all thunk? checks
and similar.
(scm_i_program_arity): Simplify.
* libguile/gsubr.h:
* libguile/gsubr.c (scm_i_primitive_arity):
* libguile/foreign.h:
* libguile/foreign.c (scm_i_foreign_arity):
Diffstat (limited to 'libguile/gsubr.h')
-rw-r--r-- | libguile/gsubr.h | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/libguile/gsubr.h b/libguile/gsubr.h index 725de2cbd..83eebc371 100644 --- a/libguile/gsubr.h +++ b/libguile/gsubr.h @@ -55,7 +55,6 @@ SCM_INTERNAL int scm_i_primitive_code_p (const scm_t_uint32 *code); -SCM_INTERNAL int scm_i_primitive_arity (SCM subr, int *req, int *opt, int *rest); SCM_INTERNAL scm_t_uintptr scm_i_primitive_call_ip (SCM subr); union scm_vm_stack_element; |