From: Guillermo J. Rozas <edu/mit/csail/zurich/gjr>
Date: Tue, 18 Feb 1992 01:52:23 +0000 (+0000)
Subject: Fix bad opcode in a PUSH rule.
X-Git-Tag: 20090517-FFI~9708
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=520021bb0319a3dc3ba4eb775d7f16e4aaac8143;p=mit-scheme.git

Fix bad opcode in a PUSH rule.
---

diff --git a/v7/src/compiler/machines/i386/instr2.scm b/v7/src/compiler/machines/i386/instr2.scm
index 890627134..d412e9ecc 100644
--- a/v7/src/compiler/machines/i386/instr2.scm
+++ b/v7/src/compiler/machines/i386/instr2.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/i386/instr2.scm,v 1.1 1992/02/09 14:55:33 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/i386/instr2.scm,v 1.2 1992/02/18 01:52:23 jinx Exp $
 
 Copyright (c) 1992 Massachusetts Institute of Technology
 
@@ -33,6 +33,7 @@ promotional, or sales literature without prior written consent from
 MIT in each case. |#
 
 ;;;; Intel i386 Instruction Set, part II
+;;; package: (compiler lap-syntaxer)
 
 ;; Some of the instructions have their operands ill-specified in the
 ;; i486 book.  Check against the appendices or the i386 book.
@@ -242,7 +243,7 @@ MIT in each case. |#
    (IMMEDIATE value))
 
   ((W (&U (? value)))
-   (BYTE (8 #x6a))
+   (BYTE (8 #x68))
    (IMMEDIATE value OPERAND UNSIGNED))
 
   ((B (& (? value)))