From 93ccaef0c60868bb1a6e0747387ce34c0172b53e Mon Sep 17 00:00:00 2001 From: Marius Vollmer Date: Thu, 8 Jul 2004 15:58:11 +0000 Subject: * numbers.h (SCM_MAKINUM, SCM_I_MAKINUM): Renamed SCM_MAKINUM to SCM_I_MAKINUM and changed all uses. --- libguile/fports.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'libguile/fports.c') diff --git a/libguile/fports.c b/libguile/fports.c index 3077318e5..af7116b80 100644 --- a/libguile/fports.c +++ b/libguile/fports.c @@ -214,7 +214,7 @@ scm_evict_ports (int fd) fp->fdes = dup (fd); if (fp->fdes == -1) scm_syserror ("scm_evict_ports"); - scm_set_port_revealed_x (port, SCM_MAKINUM (0)); + scm_set_port_revealed_x (port, SCM_I_MAKINUM (0)); } } } @@ -845,9 +845,9 @@ scm_init_fports () { scm_tc16_fport = scm_make_fptob (); - scm_c_define ("_IOFBF", SCM_MAKINUM (_IOFBF)); - scm_c_define ("_IOLBF", SCM_MAKINUM (_IOLBF)); - scm_c_define ("_IONBF", SCM_MAKINUM (_IONBF)); + scm_c_define ("_IOFBF", SCM_I_MAKINUM (_IOFBF)); + scm_c_define ("_IOLBF", SCM_I_MAKINUM (_IOLBF)); + scm_c_define ("_IONBF", SCM_I_MAKINUM (_IONBF)); #include "libguile/fports.x" } -- cgit v1.2.3