Fix incorrect use of && where & should have been used.
authorChris Hanson <org/chris-hanson/cph>
Sat, 4 Nov 2017 03:23:26 +0000 (20:23 -0700)
committerChris Hanson <org/chris-hanson/cph>
Sat, 4 Nov 2017 03:23:26 +0000 (20:23 -0700)
src/microcode/debug.c
src/microcode/string.c

index 26fe18fce745ac86197cbd4e94aec35676825fa3..70ca800fa7ca52dce86fb5253c2ea39ef61861a5 100644 (file)
@@ -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);
index e687adc5a1f370dcc98577f639b68029d7fe7aa9..0f249f4a55b5a8c63de3edfcd0bafe6d3231f528 100644 (file)
@@ -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)));
 }