Fix typo. print_a_bignum used && rather than &, causing all sorts of

problems.

diff --git a/v7/src/microcode/bintopsb.c b/v7/src/microcode/bintopsb.c
index eed809a977fc00a9c208eaddbafda20543dbb1df..822a7d3085340f98687b4b62e10594ba9e98c03f 100644 (file)
--- a/v7/src/microcode/bintopsb.c
+++ b/v7/src/microcode/bintopsb.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/bintopsb.c,v 9.43 1989/11/30 05:32:10 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/bintopsb.c,v 9.44 1990/01/22 19:16:44 jinx Exp $
 
 Copyright (c) 1987, 1989 Massachusetts Institute of Technology
 
@@ -443,7 +443,7 @@ print_a_bignum (bignum)
            accumulator = (*scan++);
            fprintf (portable_file, "%01lx",
                     (carry |
-                     ((accumulator && ((1 << diff_bits) - 1)) <<
+                     ((accumulator & ((1 << diff_bits) - 1)) <<
                       bits_in_digit)));
            length_in_bits -= 4;
            bits_in_digit = (BIGNUM_DIGIT_LENGTH - diff_bits);

diff --git a/v8/src/microcode/bintopsb.c b/v8/src/microcode/bintopsb.c
index e03a9b6f9f6292990ca510433c3beaaf70dae903..9a3aa7d75fe2e234507adc248ac9badeb2bd4276 100644 (file)
--- a/v8/src/microcode/bintopsb.c
+++ b/v8/src/microcode/bintopsb.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/bintopsb.c,v 9.43 1989/11/30 05:32:10 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/bintopsb.c,v 9.44 1990/01/22 19:16:44 jinx Exp $
 
 Copyright (c) 1987, 1989 Massachusetts Institute of Technology
 
@@ -443,7 +443,7 @@ print_a_bignum (bignum)
            accumulator = (*scan++);
            fprintf (portable_file, "%01lx",
                     (carry |
-                     ((accumulator && ((1 << diff_bits) - 1)) <<
+                     ((accumulator & ((1 << diff_bits) - 1)) <<
                       bits_in_digit)));
            length_in_bits -= 4;
            bits_in_digit = (BIGNUM_DIGIT_LENGTH - diff_bits);