From 418213a4fcb251bb43b04338e84c611ddf2c3f60 Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Sun, 24 Mar 1991 23:54:42 +0000 Subject: [PATCH] Fix bug in CMP and CMPI instructions. --- v7/src/compiler/machines/bobcat/instr2.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/v7/src/compiler/machines/bobcat/instr2.scm b/v7/src/compiler/machines/bobcat/instr2.scm index 21eea7273..354a98642 100644 --- a/v7/src/compiler/machines/bobcat/instr2.scm +++ b/v7/src/compiler/machines/bobcat/instr2.scm @@ -1,8 +1,8 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/instr2.scm,v 1.17 1989/08/28 18:33:52 cph Rel $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/bobcat/instr2.scm,v 1.18 1991/03/24 23:54:42 jinx Exp $ -Copyright (c) 1987, 1989 Massachusetts Institute of Technology +Copyright (c) 1987-1991 Massachusetts Institute of Technology This material was developed by the Scheme project at the Massachusetts Institute of Technology, Department of Electrical Engineering and @@ -269,7 +269,7 @@ MIT in each case. |# (WORD (8 #b00001100) (2 s) (6 ea DESTINATION-EA)) - (immediate-unsigned-words data ssym)) + (immediate-words data ssym)) (((? s bwl) (@A+ (? ry)) (@A+ (? rx))) ;CMPM (WORD (4 #b1011) @@ -286,7 +286,7 @@ MIT in each case. |# (WORD (8 #b00001100) (2 s) (6 ea DESTINATION-EA)) - (immediate-unsigned-words data ssym))) + (immediate-words data ssym))) (define-instruction TST (((? s bwl) (? dea ea-d&a)) -- 2.25.1