guile/guile-core/libguile numbers.c

[Marius Vollmer]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Marius Vollmer <address@hidden> 01/02/21 12:16:05

Modified files:
        guile-core/libguile: numbers.c 

Log message:
        * numbers.c (scm_logior) [SCM_DIGSTOOBIG]: Correctly use
        SCM_BIGDIG instead of BIGDIG.  Thanks to Steven G. Johnson!

CVSWeb URLs:
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/numbers.c.diff?r1=1.112&r2=1.113

Patches:
Index: guile/guile-core/libguile/numbers.c
diff -u guile/guile-core/libguile/numbers.c:1.112 
guile/guile-core/libguile/numbers.c:1.113
--- guile/guile-core/libguile/numbers.c:1.112   Fri Feb 16 06:53:55 2001
+++ guile/guile-core/libguile/numbers.c Wed Feb 21 12:16:05 2001
@@ -859,7 +859,7 @@
                              (nn1 < 0) ? SCM_BIGSIGNFLAG : 0, n2, 
SCM_BIGSIGNFLAG);
        }
 # else
-       BIGDIG zdigs [DIGSPERLONG];
+       SCM_BIGDIG zdigs [DIGSPERLONG];
        scm_longdigs (nn1, zdigs);
        if ((!(nn1 < 0)) && !SCM_BIGSIGN (n2)) {
          return scm_big_ior (zdigs, SCM_DIGSPERLONG,