summaryrefslogtreecommitdiff
path: root/libguile/hash.c
diff options
context:
space:
mode:
authorGreg J. Badros <gjb@cs.washington.edu>2000-01-05 19:25:37 +0000
committerGreg J. Badros <gjb@cs.washington.edu>2000-01-05 19:25:37 +0000
commit3b3b36ddb7dfbd5094abee360c253c8f1216dcdd (patch)
treebe6f18ee784818de032ac23e77470b67e260ffef /libguile/hash.c
parentcbaee92a8b6d8abba6bd236d089a7e6c3cf471b3 (diff)
downloadguile-3b3b36ddb7dfbd5094abee360c253c8f1216dcdd.tar.gz
* *.[ch]: Whitespace changes -- added space after SCM_VALIDATE_*
macros and SCM_DEFINE macros to match GNU coding standards.
Diffstat (limited to 'libguile/hash.c')
-rw-r--r--libguile/hash.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/libguile/hash.c b/libguile/hash.c
index e74d089e9..7c8d379a2 100644
--- a/libguile/hash.c
+++ b/libguile/hash.c
@@ -144,7 +144,7 @@ scm_ihashq (SCM obj, unsigned int n)
}
-SCM_DEFINE(scm_hashq, "hashq", 2, 0, 0,
+SCM_DEFINE (scm_hashq, "hashq", 2, 0, 0,
(SCM obj, SCM n),
"@deffnx primitive hashv key size
@deffnx primitive hash key size
@@ -154,7 +154,7 @@ table. Each function returns an integer in the range 0 to
@var{size}-1.")
#define FUNC_NAME s_scm_hashq
{
- SCM_VALIDATE_INUM_MIN(2,n,0);
+ SCM_VALIDATE_INUM_MIN (2,n,0);
return SCM_MAKINUM(scm_ihashq (obj, SCM_INUM (n)));
}
#undef FUNC_NAME
@@ -176,12 +176,12 @@ scm_ihashv (SCM obj, unsigned int n)
}
-SCM_DEFINE(scm_hashv, "hashv", 2, 0, 0,
+SCM_DEFINE (scm_hashv, "hashv", 2, 0, 0,
(SCM obj, SCM n),
"")
#define FUNC_NAME s_scm_hashv
{
- SCM_VALIDATE_INUM_MIN(2,n,0);
+ SCM_VALIDATE_INUM_MIN (2,n,0);
return SCM_MAKINUM(scm_ihashv (obj, SCM_INUM (n)));
}
#undef FUNC_NAME
@@ -196,12 +196,12 @@ scm_ihash (SCM obj, unsigned int n)
return (unsigned int)scm_hasher (obj, n, 10);
}
-SCM_DEFINE(scm_hash, "hash", 2, 0, 0,
+SCM_DEFINE (scm_hash, "hash", 2, 0, 0,
(SCM obj, SCM n),
"")
#define FUNC_NAME s_scm_hash
{
- SCM_VALIDATE_INUM_MIN(2,n,0);
+ SCM_VALIDATE_INUM_MIN (2,n,0);
return SCM_MAKINUM(scm_ihash(obj, SCM_INUM(n)));
}
#undef FUNC_NAME