diff options
Diffstat (limited to 'libguile/debug.c')
-rw-r--r-- | libguile/debug.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libguile/debug.c b/libguile/debug.c index 71278c5e4..4bf311136 100644 --- a/libguile/debug.c +++ b/libguile/debug.c @@ -363,6 +363,7 @@ SCM_DEFINE (scm_procedure_source, "procedure-source", 1, 0, 0, if (!SCM_SMOB_DESCRIPTOR (proc).apply) break; case scm_tcs_subrs: + case scm_tc7_program: procprop: /* It would indeed be a nice thing if we supplied source even for built in procedures! */ |