From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 13 Mar 1992 11:04:26 +0000 (+0000)
Subject: Change definition of NOP instruction to match that used by MIPS
X-Git-Tag: 20090517-FFI~9598
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=6acfd56707a7ed9cba183582a9a88802c3a2e835;p=mit-scheme.git

Change definition of NOP instruction to match that used by MIPS
compilers.  Otherwise machine-language debuggers like GDB won't show
this instruction as a NOP.
---

diff --git a/v7/src/compiler/machines/mips/instr1.scm b/v7/src/compiler/machines/mips/instr1.scm
index d61252f5a..8b272b8ad 100644
--- a/v7/src/compiler/machines/mips/instr1.scm
+++ b/v7/src/compiler/machines/mips/instr1.scm
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/mips/instr1.scm,v 1.4 1991/08/21 04:11:46 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/mips/instr1.scm,v 1.5 1992/03/13 11:04:26 cph Exp $
 
-Copyright (c) 1987-91 Massachusetts Institute of Technology
+Copyright (c) 1987-92 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -356,6 +356,6 @@ MIT in each case. |#
 	     (16 label BLOCK-OFFSET)))))
 
 (define-instruction NOP
-  ;; ADDI 0, 0
+  ;; (SLL 0 0 0)
   (()
-   (LONG (6 8) (5 0) (5 0) (16 0))))
\ No newline at end of file
+   (LONG (6 0) (5 0) (5 0) (5 0) (5 0) (6 0))))
\ No newline at end of file