From bcf4b259f658f4d18b1bfcb641d4c27b671cbc8d Mon Sep 17 00:00:00 2001 From: "Guillermo J. Rozas" Date: Tue, 18 Aug 1987 21:19:42 +0000 Subject: [PATCH] Fix syntactic bug in definition of conditional branch (B) instruction. --- v7/src/compiler/machines/vax/instr3.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/v7/src/compiler/machines/vax/instr3.scm b/v7/src/compiler/machines/vax/instr3.scm index 5dcd70cfc..e63b3853c 100644 --- a/v7/src/compiler/machines/vax/instr3.scm +++ b/v7/src/compiler/machines/vax/instr3.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/vax/instr3.scm,v 1.3 1987/08/18 20:23:58 jinx Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/vax/instr3.scm,v 1.4 1987/08/18 21:19:42 jinx Exp $ Copyright (c) 1987 Massachusetts Institute of Technology @@ -289,7 +289,7 @@ MIT in each case. |# ((W (? c inverse-cc) (? dest displacement)) (BYTE (4 c) ; (B B (~ cc) (+ *PC* 3)) (4 #x1)) - (DISPLACEMENT (8 3)) + (BYTE (8 #x03)) (BYTE (8 #x31)) ; (BR W dest) (DISPLACEMENT (16 dest))) -- 2.25.1