Fix a goof originally discovered in the vax compiler -- in an assignment,

[unix-history] / usr / src / old / pcc / ccom.tahoe / table.c

diff --git a/usr/src/old/pcc/ccom.tahoe/table.c b/usr/src/old/pcc/ccom.tahoe/table.c
index 66f3853..dedecf2 100644 (file)
--- a/usr/src/old/pcc/ccom.tahoe/table.c
+++ b/usr/src/old/pcc/ccom.tahoe/table.c
@@ -1,5 +1,5 @@
 #ifndef lint
 #ifndef lint

-static char sccsid[] = "@(#)table.c    1.21 (Berkeley) %G%";
+static char sccsid[] = "@(#)table.c    1.22 (Berkeley) %G%";

 #endif
 
 # include "pass2.h"
 #endif
 
 # include "pass2.h"


@@ -453,19 +453,19 @@ ASSIGN,   INAREG|FOREFF|FORCC,
 ASSIGN,        INAREG|FOREFF|FORCC,
        SAREG|AWD,      TCHAR|TUCHAR|TSHORT|TUSHORT,
        SAREG|AWD,      TFLOAT|TDOUBLE,
 ASSIGN,        INAREG|FOREFF|FORCC,
        SAREG|AWD,      TCHAR|TUCHAR|TSHORT|TUSHORT,
        SAREG|AWD,      TFLOAT|TDOUBLE,

-               NAREG|NASL,     RLEFT|RESCC,
+               NAREG|NASR,     RLEFT|RESCC,

                "       ldZR    AR\n    cvZRl   A1\n    cvtlZL  A1,AL\n",
 
 ASSIGN,        INAREG|FOREFF|FORCC,
        SAREG|AWD,      TFLOAT|TDOUBLE,
        SAREG|AWD,      TCHAR|TSHORT,
                "       ldZR    AR\n    cvZRl   A1\n    cvtlZL  A1,AL\n",
 
 ASSIGN,        INAREG|FOREFF|FORCC,
        SAREG|AWD,      TFLOAT|TDOUBLE,
        SAREG|AWD,      TCHAR|TSHORT,

-               NAREG|NASL,     RLEFT|RESCC,
+               NAREG|NASR,     RLEFT|RESCC,

                "       cvtZRl  AR,A1\n cvlZL   A1\n    stZL    AL\n",
 
 ASSIGN,        INAREG|FOREFF|FORCC,
        SAREG|AWD,      TFLOAT|TDOUBLE,
        SAREG|AWD,      TUCHAR|TUSHORT,
                "       cvtZRl  AR,A1\n cvlZL   A1\n    stZL    AL\n",
 
 ASSIGN,        INAREG|FOREFF|FORCC,
        SAREG|AWD,      TFLOAT|TDOUBLE,
        SAREG|AWD,      TUCHAR|TUSHORT,

-               NAREG|NASL,     RLEFT|RESCC,
+               NAREG|NASR,     RLEFT|RESCC,

                "       movzZRl AR,A1\n cvlZL   A1\n    stZL    AL\n",
 
 ASSIGN, INAREG|FOREFF|FORCC,
                "       movzZRl AR,A1\n cvlZL   A1\n    stZL    AL\n",
 
 ASSIGN, INAREG|FOREFF|FORCC,