6126 - support 8-byte register names

Using these is quite unsafe. But what isn't, here?

5 files changed, 3 insertions, 3 deletions

diff --git a/apps/braces b/apps/braces
index 1c4f8596..0de3adb7 100755
--- a/apps/braces
+++ b/apps/braces
Binary files differdiff --git a/apps/calls b/apps/calls
index f22a1b2c..4015ed83 100755
--- a/apps/calls
+++ b/apps/calls
Binary files differdiff --git a/apps/mu b/apps/mu
index 53ad29ff..29ec9329 100755
--- a/apps/mu
+++ b/apps/mu
Binary files differdiff --git a/apps/mu.subx b/apps/mu.subx
index 138ff94e..4aac8ada 100644
--- a/apps/mu.subx
+++ b/apps/mu.subx
@@ -7523,7 +7523,7 @@ power-of-2?:  # n: int -> result/eax: boolean
     0b/and-> *(ebp+8) 0/r32/eax
     # return (tmp2 == 0)
     3d/compare-eax-and 0/imm32
-    0f 94/set-if-= %eax
+    0f 94/set-byte-if-= %al
     81 4/subop/and %eax 0xff/imm32
 $power-of-2?:end:
     # . epilogue
@@ -9714,7 +9714,7 @@ subx-type-equal?:  # a: (handle tree type-id), b: (handle tree type-id) -> resul
     (is-simple-mu-type? *(ebp+0xc) 0)  # => eax
     # return alit == blit
     39/compare %eax 1/r32/ecx
-    0f 94/set-if-= %eax
+    0f 94/set-byte-if-= %al
     81 4/subop/and %eax 0xff/imm32
 $subx-type-equal?:end:
     # . restore registers
@@ -9735,7 +9735,7 @@ is-simple-mu-type?:  # a: (handle tree type-id), n: type-id -> result/eax: boole
     # return (a->value == n)
     8b/-> *(ebp+8) 0/r32/eax
     39/compare *eax 1/r32/ecx  # Atom-type
-    0f 94/set-if-= %eax
+    0f 94/set-byte-if-= %al
     81 4/subop/and %eax 0xff/imm32
 $is-simple-mu-type?:end:
     # . restore registers
diff --git a/apps/sigils b/apps/sigils
index 10877010..c738b004 100755
--- a/apps/sigils
+++ b/apps/sigils
Binary files differ