summaryrefslogtreecommitdiff
path: root/libguile/programs.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/programs.c')
-rw-r--r--libguile/programs.c10
1 files changed, 0 insertions, 10 deletions
diff --git a/libguile/programs.c b/libguile/programs.c
index 08b6f65ab..70c399ba8 100644
--- a/libguile/programs.c
+++ b/libguile/programs.c
@@ -260,16 +260,6 @@ scm_i_program_properties (SCM program)
}
#undef FUNC_NAME
-SCM_DEFINE (scm_program_name, "program-name", 1, 0, 0,
- (SCM program),
- "")
-#define FUNC_NAME s_scm_program_name
-{
- SCM_VALIDATE_PROGRAM (1, program);
- return scm_assq_ref (scm_i_program_properties (program), scm_sym_name);
-}
-#undef FUNC_NAME
-
SCM_DEFINE (scm_program_source, "program-source", 2, 0, 0,
(SCM program, SCM ip),
"")