added type-rename operator

[unix-history] / usr / src / old / as.vax / asexpr.h

diff --git a/usr/src/old/as.vax/asexpr.h b/usr/src/old/as.vax/asexpr.h
index c3ebd6b..05f8c38 100644 (file)
--- a/usr/src/old/as.vax/asexpr.h
+++ b/usr/src/old/as.vax/asexpr.h
@@ -1,5 +1,7 @@
-/* Copyright (c) 1980 Regents of the University of California */
-/* "@(#)asexpr.h 4.1 %G%" */
+/*
+ *     Copyright (c) 1982 Regents of the University of California
+ *     @(#)asexpr.h 4.3 %G%
+ */

 /*
  *     Definitions to parse tokens
  */
 /*
  *     Definitions to parse tokens
  */


@@ -45,16 +47,20 @@ struct      exp     *yukkyexpr();
 
 extern char    tokensets[(LASTTOKEN) - (FIRSTTOKEN) + 1];
 
 
 extern char    tokensets[(LASTTOKEN) - (FIRSTTOKEN) + 1];
 

-#define LINSTBEGIN     01      /*SEMI, NL, NAME*/
+#define        LINSTBEGIN      01      /*SEMI, NL, NAME*/

 #define        EBEGOPS         02      /*LP, MINUS, TILDE*/
 #define        EBEGOPS         02      /*LP, MINUS, TILDE*/

-#define        YUKKYEXPRBEG    04      /*NAME, INSTn, INST0, REG, DOT*/
+#define        YUKKYEXPRBEG    04      /*NAME, INSTn, INST0, REG, BFINT*/

 #define        SAFEEXPRBEG     010     /*INT, FLTNUM*/
 #define        SAFEEXPRBEG     010     /*INT, FLTNUM*/

-#define ADDOPS         020     /*PLUS, MINUS*/
+#define        ADDOPS          020     /*PLUS, MINUS*/

 #define        BOOLOPS         040     /*IOR, XOR, AND*/
 #define        BOOLOPS         040     /*IOR, XOR, AND*/

-#define MULOPS         0100    /*LSH, RSH, MUL, DIV, TILDE*/
+#define        MULOPS          0100    /*LSH, RSH, MUL, DIV, TILDE*/

 
 #define        INTOKSET(val, set)      (tokensets[(val)] & (set) )
 
 
 #define        INTOKSET(val, set)      (tokensets[(val)] & (set) )
 

+inttoktype     exprparse();
+inttoktype     funnyreg();
+inttoktype     yylex();
+

 #define expr(xp, val) { \
        if ( (!INTOKSET(val, EBEGOPS)) && (!INTOKSET(peekahead, ADDOPS+BOOLOPS+MULOPS))) { \
                if (INTOKSET(val, YUKKYEXPRBEG)) xp = yukkyexpr(val, yylval); \
 #define expr(xp, val) { \
        if ( (!INTOKSET(val, EBEGOPS)) && (!INTOKSET(peekahead, ADDOPS+BOOLOPS+MULOPS))) { \
                if (INTOKSET(val, YUKKYEXPRBEG)) xp = yukkyexpr(val, yylval); \