summaryrefslogtreecommitdiff
path: root/libguile/array-map.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2010-01-06 11:06:37 +0100
committerAndy Wingo <wingo@pobox.com>2010-01-07 23:49:15 +0100
commitf1d19308ade7f7d115be243650270e8a2a38fc38 (patch)
tree8c781b10aebd7ed11e5469ed368fc76cbea622da /libguile/array-map.c
parent2be89ca129e078f7e558d07b93ce89bf9ed13a9d (diff)
downloadguile-f1d19308ade7f7d115be243650270e8a2a38fc38.tar.gz
provide missing prototypes
* libguile/array-map.c: * libguile/chars.c: * libguile/eq.c: * libguile/strorder.c: Provide declarations missing after the asubrs/rpsubrs -> gsubr conversion.
Diffstat (limited to 'libguile/array-map.c')
-rw-r--r--libguile/array-map.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/array-map.c b/libguile/array-map.c
index c673b4df3..2041d0580 100644
--- a/libguile/array-map.c
+++ b/libguile/array-map.c
@@ -1,4 +1,4 @@
-/* Copyright (C) 1996,1998,2000,2001,2004,2005, 2006, 2008, 2009 Free Software Foundation, Inc.
+/* Copyright (C) 1996,1998,2000,2001,2004,2005, 2006, 2008, 2009, 2010 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
@@ -921,6 +921,7 @@ scm_raequal (SCM ra0, SCM ra1)
return scm_from_bool(raeql (ra0, SCM_BOOL_T, ra1));
}
+static SCM scm_i_array_equal_p (SCM, SCM, SCM);
SCM_DEFINE (scm_i_array_equal_p, "array-equal?", 0, 2, 1,
(SCM ra0, SCM ra1, SCM rest),
"Return @code{#t} iff all arguments are arrays with the same\n"