diff options
author | Mark Galassi <mark+savannah@galassi.org> | 1997-10-07 15:39:24 +0000 |
---|---|---|
committer | Mark Galassi <mark+savannah@galassi.org> | 1997-10-07 15:39:24 +0000 |
commit | dbb3005d81f9355b5e06850d5f51342bbf87423e (patch) | |
tree | 44f5d86b7192df5297cd9f252e92cc370b5d8e68 | |
parent | d9f56fc2ed634bb23085c2ec7939aa109261b4b4 (diff) | |
download | guile-dbb3005d81f9355b5e06850d5f51342bbf87423e.tar.gz |
renamed gh_int2scmb to gh_bool2scm
-rw-r--r-- | libguile/ChangeLog | 5 | ||||
-rw-r--r-- | libguile/gh_data.c | 7 |
2 files changed, 11 insertions, 1 deletions
diff --git a/libguile/ChangeLog b/libguile/ChangeLog index f76f8843d..a6368404d 100644 --- a/libguile/ChangeLog +++ b/libguile/ChangeLog @@ -1,3 +1,8 @@ +Tue Oct 7 09:37:24 1997 Mark Galassi <rosalia@cygnus.com> + + * gh_data.c (gh_bool2scm): new function which replaces + gh_int2scmb(), which is now tagged as obsolete. + 1997-10-03 Mikael Djurfeldt <mdj@nada.kth.se> * print.h (SCM_PRINT_STATE_P): Removed SCM_NIMP test. (NIMP diff --git a/libguile/gh_data.c b/libguile/gh_data.c index 6b2e726ae..9373cadda 100644 --- a/libguile/gh_data.c +++ b/libguile/gh_data.c @@ -48,7 +48,12 @@ /* data conversion C->scheme */ SCM -gh_int2scmb (int x) +gh_int2scmb (int x) /* this is being phased out */ +{ + return (x ? SCM_BOOL_T : SCM_BOOL_F); +} +SCM +gh_bool2scm (int x) { return (x ? SCM_BOOL_T : SCM_BOOL_F); } |