diff options
author | Greg J. Badros <gjb@cs.washington.edu> | 2000-01-26 01:17:16 +0000 |
---|---|---|
committer | Greg J. Badros <gjb@cs.washington.edu> | 2000-01-26 01:17:16 +0000 |
commit | da4a1dbab4e802a4d516ed6ec456864d22fe5432 (patch) | |
tree | 38132b82713e4a12e685b591cc048aaa24ee0aee /libguile/boolean.c | |
parent | 7e2cb69cbc7af40c54c0eeb88c2221e715a6a416 (diff) | |
download | guile-da4a1dbab4e802a4d516ed6ec456864d22fe5432.tar.gz |
* sort.c: typo in comment fixed.
* keywords.c: Added documentation.
* guardians.c: Added documentation (could be better).
* gc.c: Added docs for gc-set-debug-check-freelist.
* eq.c: Added docs for eq?, eqv? equal? abridged from R4RS.
* boolean.c: Added docs for `not', `boolean?' (by hand).
Diffstat (limited to 'libguile/boolean.c')
-rw-r--r-- | libguile/boolean.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/boolean.c b/libguile/boolean.c index 3a578bcd2..9859de9e7 100644 --- a/libguile/boolean.c +++ b/libguile/boolean.c @@ -53,8 +53,8 @@ SCM_DEFINE (scm_not, "not", 1, 0, 0, - (SCM x), -"") + (SCM x), + "Return #t iff X is #f, else return #f.\n") #define FUNC_NAME s_scm_not { return SCM_BOOL(SCM_FALSEP(x)); @@ -64,7 +64,7 @@ SCM_DEFINE (scm_not, "not", 1, 0, 0, SCM_DEFINE (scm_boolean_p, "boolean?", 1, 0, 0, (SCM obj), -"") + "Return #t iff OBJ is either #t or #f.\n") #define FUNC_NAME s_scm_boolean_p { return SCM_BOOL(SCM_BOOL_F == obj || SCM_BOOL_T == obj); |