summaryrefslogtreecommitdiff
path: root/libguile/programs.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2013-11-19 18:57:31 +0100
committerAndy Wingo <wingo@pobox.com>2013-11-19 18:57:31 +0100
commit8079714576442964f84d215f3edbad5f07ae3911 (patch)
tree5e395c4d3bdf3c58807b8411635418528562e77f /libguile/programs.c
parente326baac0bc4b3049a97f429349f2c3c5a22b8a3 (diff)
downloadguile-8079714576442964f84d215f3edbad5f07ae3911.tar.gz
scm_i_rtl_program_* -> scm_i_program_*
* libguile/programs.h (scm_i_make_program): * libguile/programs.c (scm_i_program_name): (scm_i_program_documentation): (scm_i_program_properties): Remove "rtl_" infix. * libguile/objcodes.c: * libguile/procprop.c: * libguile/vm.c: Adapt callers.
Diffstat (limited to 'libguile/programs.c')
-rw-r--r--libguile/programs.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/libguile/programs.c b/libguile/programs.c
index 56a32e1f8..fa77b0dd7 100644
--- a/libguile/programs.c
+++ b/libguile/programs.c
@@ -72,7 +72,7 @@ SCM_DEFINE (scm_rtl_program_code, "rtl-program-code", 1, 0, 0,
#undef FUNC_NAME
SCM
-scm_i_rtl_program_name (SCM program)
+scm_i_program_name (SCM program)
{
static SCM rtl_program_name = SCM_BOOL_F;
@@ -87,7 +87,7 @@ scm_i_rtl_program_name (SCM program)
}
SCM
-scm_i_rtl_program_documentation (SCM program)
+scm_i_program_documentation (SCM program)
{
static SCM rtl_program_documentation = SCM_BOOL_F;
@@ -103,13 +103,13 @@ scm_i_rtl_program_documentation (SCM program)
}
SCM
-scm_i_rtl_program_properties (SCM program)
+scm_i_program_properties (SCM program)
{
static SCM rtl_program_properties = SCM_BOOL_F;
if (SCM_PRIMITIVE_P (program))
{
- SCM name = scm_i_rtl_program_name (program);
+ SCM name = scm_i_program_name (program);
if (scm_is_false (name))
return SCM_EOL;
return scm_acons (scm_sym_name, name, SCM_EOL);