diff options
| author | Greg J. Badros <gjb@cs.washington.edu> | 2000-01-04 22:23:42 +0000 |
|---|---|---|
| committer | Greg J. Badros <gjb@cs.washington.edu> | 2000-01-04 22:23:42 +0000 |
| commit | 0b5f3f34c220329c3fadcf75d881fab168ae35e7 (patch) | |
| tree | e212fa265339e4e70e2af96807ccab57c2db173a /libguile/keywords.c | |
| parent | db62436ececa2f491a9c87147062f5a16aec813e (diff) | |
| download | guile-0b5f3f34c220329c3fadcf75d881fab168ae35e7.tar.gz | |
* options.c, objects.c, keywords.c, gc.c: Some redundant SCM_NIMP
removals from Dirk Hermann.
* alist.c: Rename formals to match the parameter names in the
documentation, updates to documentation. Thanks Dirk Hermann!
Diffstat (limited to 'libguile/keywords.c')
| -rw-r--r-- | libguile/keywords.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/keywords.c b/libguile/keywords.c index bd4a0247f..d76ed5738 100644 --- a/libguile/keywords.c +++ b/libguile/keywords.c @@ -75,8 +75,7 @@ GUILE_PROC (scm_make_keyword_from_dash_symbol, "make-keyword-from-dash-symbol", { SCM vcell; - SCM_ASSERT (SCM_NIMP (symbol) - && SCM_SYMBOLP (symbol) + SCM_ASSERT (SCM_SYMBOLP (symbol) && ('-' == SCM_CHARS(symbol)[0]), symbol, SCM_ARG1, FUNC_NAME); |