diff options
author | Andy Wingo <wingo@pobox.com> | 2013-11-19 19:11:40 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2013-11-19 19:11:40 +0100 |
commit | 0bd1e9c6a0420816111e4dc109d6dd30f9f8cd73 (patch) | |
tree | d60e9e19e8825cd85b0b2c765289fed45902e5d9 /libguile/programs.c | |
parent | edba822553cfa95c907bf3ecb4c4879723ef92ee (diff) | |
download | guile-0bd1e9c6a0420816111e4dc109d6dd30f9f8cd73.tar.gz |
rtl-program? -> program?
* libguile/programs.c (scm_program_p): Rename from scm_rtl_program_p.
Changes name also from rtl-program? to program?.
* libguile/programs.h:
* module/ice-9/session.scm:
* module/language/tree-il/analyze.scm:
* module/statprof.scm:
* module/system/repl/command.scm:
* module/system/repl/debug.scm:
* module/system/vm/coverage.scm:
* module/system/vm/disassembler.scm:
* module/system/vm/frame.scm:
* module/system/vm/program.scm:
* module/system/vm/traps.scm:
* module/system/xref.scm: Adapt.
Diffstat (limited to 'libguile/programs.c')
-rw-r--r-- | libguile/programs.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/programs.c b/libguile/programs.c index 29132550e..f2293cccc 100644 --- a/libguile/programs.c +++ b/libguile/programs.c @@ -136,10 +136,10 @@ scm_i_program_print (SCM program, SCM port, scm_print_state *pstate) * Scheme interface */ -SCM_DEFINE (scm_rtl_program_p, "rtl-program?", 1, 0, 0, +SCM_DEFINE (scm_program_p, "program?", 1, 0, 0, (SCM obj), "") -#define FUNC_NAME s_scm_rtl_program_p +#define FUNC_NAME s_scm_program_p { return scm_from_bool (SCM_PROGRAM_P (obj)); } |