Fix (CVT D F ...) opcode.

diff --git a/v7/src/compiler/machines/vax/instr2.scm b/v7/src/compiler/machines/vax/instr2.scm
index 6903e59fc6267aacf1a1c71715396e991596cc46..70458f2e2dcc1f94609496e7ab964cbdbf199d4e 100644 (file)
--- a/v7/src/compiler/machines/vax/instr2.scm
+++ b/v7/src/compiler/machines/vax/instr2.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/vax/instr2.scm,v 1.2 1987/08/18 08:10:44 jinx Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/compiler/machines/vax/instr2.scm,v 1.3 1987/08/20 18:21:57 jinx Exp $
 
 Copyright (c) 1987 Massachusetts Institute of Technology
 
@@ -225,7 +225,7 @@ MIT in each case. |#
    (OPERAND H dst))
 
   ((D F (? src ea-r-d) (? dst ea-w-f))
-   (BYTE (16 #x76))
+   (BYTE (8 #x76))
    (OPERAND D src)
    (OPERAND F dst))