summaryrefslogtreecommitdiff
path: root/libguile/pairs.c
diff options
context:
space:
mode:
authorThien-Thi Nguyen <ttn@gnuvola.org>2010-08-26 23:21:41 +0200
committerThien-Thi Nguyen <ttn@gnuvola.org>2010-08-26 23:34:49 +0200
commit6832604efa0f175a70be700624c365547fb27878 (patch)
tree202b2a5ebadb9d597f76a28d52e662b755868277 /libguile/pairs.c
parente6d67f1e6913acb884dbacc48670d312e9880782 (diff)
downloadguile-6832604efa0f175a70be700624c365547fb27878.tar.gz
[build] Rewrite guile-func-name-check in Scheme, adding features.
* libguile/guile-func-name-check: Rewrite in Scheme; add inhibition directives, string-literal handling, failureful exit on error. * libguile/guile-snarf-docs.in: Use ‘@top_builddir@/meta/guile’. * libguile/pairs.c: Add guile-func-name-check inhibition directive.
Diffstat (limited to 'libguile/pairs.c')
-rw-r--r--libguile/pairs.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/libguile/pairs.c b/libguile/pairs.c
index 68fa4c901..0f4046436 100644
--- a/libguile/pairs.c
+++ b/libguile/pairs.c
@@ -142,6 +142,7 @@ SCM_DEFINE (scm_set_cdr_x, "set-cdr!", 2, 0, 0,
while (pattern_var); \
return tree
+/* guile-func-name-check: no thanks (rest of file: c[ad]r procs) */
SCM_DEFINE (scm_cdr, "cdr", 1, 0, 0, (SCM x), "")
{