summaryrefslogtreecommitdiff
path: root/libguile/programs.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2013-10-03 19:45:41 +0200
committerAndy Wingo <wingo@pobox.com>2013-10-03 20:37:48 +0200
commitd7794a9d07ba657a29f7e608c3e558c437806def (patch)
tree48e2fdceb2e3088c9bee5029b7417bbe43bc116c /libguile/programs.c
parent8df68898b9f6ba15171244f1f3549688f13d605f (diff)
downloadguile-d7794a9d07ba657a29f7e608c3e558c437806def.tar.gz
Deprecate scm_c_program_source, as it has no internal users.
* libguile/programs.c: * libguile/programs.h: * libguile/deprecated.h: * libguile/deprecated.c (scm_c_program_source): Deprecate.
Diffstat (limited to 'libguile/programs.c')
-rw-r--r--libguile/programs.c8
1 files changed, 1 insertions, 7 deletions
diff --git a/libguile/programs.c b/libguile/programs.c
index b84f84bd3..d2b2e755b 100644
--- a/libguile/programs.c
+++ b/libguile/programs.c
@@ -1,4 +1,4 @@
-/* Copyright (C) 2001, 2009, 2010, 2011 Free Software Foundation, Inc.
+/* Copyright (C) 2001, 2009, 2010, 2011, 2013 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License
@@ -294,12 +294,6 @@ SCM_DEFINE (scm_program_source, "program-source", 2, 1, 0,
}
#undef FUNC_NAME
-extern SCM
-scm_c_program_source (SCM program, size_t ip)
-{
- return program_source (program, ip, scm_program_sources (program));
-}
-
SCM_DEFINE (scm_program_num_free_variables, "program-num-free-variables", 1, 0, 0,
(SCM program),
"")