From: Taylor R Campbell <campbell@mumble.net>
Date: Sat, 31 Oct 2009 00:16:24 +0000 (-0400)
Subject: Fix another bug in IMUL: the 3-operand, >8-bit opcode is 69, not 6b.
X-Git-Tag: 20100708-Gtk~285
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=ee56dad844efda8c7246ffcbf93e744be9fbc3f8;p=mit-scheme.git

Fix another bug in IMUL: the 3-operand, >8-bit opcode is 69, not 6b.
---

diff --git a/src/compiler/machines/x86-64/instr1.scm b/src/compiler/machines/x86-64/instr1.scm
index 8efff15c6..436775e78 100644
--- a/src/compiler/machines/x86-64/instr1.scm
+++ b/src/compiler/machines/x86-64/instr1.scm
@@ -432,7 +432,7 @@ USA.
 			  (? source r/m-ea)
 			  (& (? multiplier sign-extended-long)))
    (PREFIX (OPERAND size) (ModR/M target source))
-   (BITS (8 #x6b))
+   (BITS (8 #x69))
    (ModR/M target source)
    (BITS (32 multiplier SIGNED)))
 
@@ -440,7 +440,7 @@ USA.
 			  (? source r/m-ea)
 			  (&U (? multiplier zero-extended-long)))
    (PREFIX (OPERAND size) (ModR/M target source))
-   (BITS (8 #x6b))
+   (BITS (8 #x69))
    (ModR/M target source)
    (BITS (32 multiplier SIGNED))))