From: Chris Hanson <org/chris-hanson/cph>
Date: Sat, 4 Nov 2017 03:23:26 +0000 (-0700)
Subject: Fix incorrect use of && where & should have been used.
X-Git-Tag: mit-scheme-pucked-9.2.12~14^2~11
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=a513aedbe19491d72bcad3bddeef7b3cd44afb4a;p=mit-scheme.git

Fix incorrect use of && where & should have been used.
---

diff --git a/src/microcode/debug.c b/src/microcode/debug.c
index 26fe18fce..70ca800fa 100644
--- a/src/microcode/debug.c
+++ b/src/microcode/debug.c
@@ -260,8 +260,8 @@ print_ustring (outf_channel stream, SCHEME_OBJECT string)
   long_enough = (length < 100 ? length : 90);
   next = (STRING_LOC (string, 0));
 
-  cp_size = ((OBJECT_TYPE (MEMORY_REF (string, BYTEVECTOR_LENGTH_INDEX)))
-	     && 0x03);
+  cp_size
+    = ((OBJECT_TYPE (MEMORY_REF (string, BYTEVECTOR_LENGTH_INDEX))) & 0x03);
   if (cp_size == 0)
     {
       print_simple (stream, string);
diff --git a/src/microcode/string.c b/src/microcode/string.c
index e687adc5a..0f249f4a5 100644
--- a/src/microcode/string.c
+++ b/src/microcode/string.c
@@ -40,7 +40,7 @@ string_p (SCHEME_OBJECT object)
               // one byte per code point.  This must be kept in sync
               // with "runtime/ustring.scm".
               && (((OBJECT_TYPE (MEMORY_REF (object, BYTEVECTOR_LENGTH_INDEX)))
-                   && 0x03)
+                   & 0x03)
                   == 0x01)));
 }