Add some v52 keywords

Author: totalspectrum

frontends/lexer.c

@@ -23,7 +23,7 @@
 
 #define VT '\013'
 
-#define MAX_PNUT_VERSION 51 /* maximum PNut version we understand */
+#define MAX_PNUT_VERSION 52 /* maximum PNut version we understand */
 
 int allow_type_names = 1;
 
@@ -2540,6 +2540,12 @@ struct reservedword_soft {
     { "ln",    SP_LOG, 51, 0 },
     { "exp",   SP_EXP, 51, 0 },
     { "pow",   SP_POW, 51, 0 },
+
+    /* v52 keywords */
+    { "movbyts", SP_MOVBYTS, 52, 0 },
+    { "endianl", SP_ENDIANL, 52, 0 },
+    { "endianw", SP_ENDIANW, 52, 0 },
+    { "debug_end_session", SP_DEBUG_END_SESSION, 52, 0 },
 };
 
 struct reservedword basic_keywords[] = {

frontends/spin/spin.y

@@ -225,6 +225,13 @@ MakeFunccall(AST *func, AST *params, AST *numresults)
     return NewAST(AST_FUNCCALL, func, params);
 }
 
+static AST *
+MakeFunccall1(AST *func, AST *arg1)
+{
+    AST *exprlist = NewAST(AST_EXPRLIST, arg1, NULL);
+    return MakeFunccall(func, exprlist, NULL);
+}
+
 // special handling for things like "abc" | x
 // in Spin this is the same as "ab", "c" | x
 
@@ -626,6 +633,11 @@ SpinDeclareInterface(AST *ident, AST *defs)
 %token SP_EXP    "EXP"
 %token SP_POW    "POW"
 
+%token SP_MOVBYTS "MOVBYTS"
+%token SP_ENDIANL "ENDIANL"
+%token SP_ENDIANW "ENDIANW"
+%token SP_DEBUG_END_SESSION "DEBUG_END_SESSION"
+
 %token SP_FADD   "+."
 %token SP_FSUB   "-."
 %token SP_FMUL   "*."
@@ -2683,42 +2695,63 @@ funccall:
         AST *arg1 = $3;
         AST *ident = AstIdentifier("__builtin_log2f");
 
-        $$ = MakeFunccall(ident, arg1, NULL);
+        $$ = MakeFunccall1(ident, arg1);
     }
   | SP_EXP2 '(' expr ')'
     {
         AST *arg1 = $3;
         AST *ident = AstIdentifier("__builtin_exp2f");
 
-        $$ = MakeFunccall(ident, arg1, NULL);
+        $$ = MakeFunccall1(ident, arg1);
     }
   | SP_LOG10 '(' expr ')'
     {
         AST *arg1 = $3;
         AST *ident = AstIdentifier("__builtin_log10f");
 
-        $$ = MakeFunccall(ident, arg1, NULL);
+        $$ = MakeFunccall1(ident, arg1);
     }
   | SP_EXP10 '(' expr ')'
     {
         AST *arg1 = $3;
         AST *ident = AstIdentifier("__builtin_exp10f");
 
-        $$ = MakeFunccall(ident, arg1, NULL);
+        $$ = MakeFunccall1(ident, arg1);
     }
   | SP_LOG '(' expr ')'
     {
         AST *arg1 = $3;
         AST *ident = AstIdentifier("__builtin_logf");
 
-        $$ = MakeFunccall(ident, arg1, NULL);
+        $$ = MakeFunccall1(ident, arg1);
     }
   | SP_EXP '(' expr ')'
     {
         AST *arg1 = $3;
         AST *ident = AstIdentifier("__builtin_expf");
 
-        $$ = MakeFunccall(ident, arg1, NULL);
+        $$ = MakeFunccall1(ident, arg1);
+    }
+  | SP_ENDIANL '(' expr ')'
+    {
+        AST *arg1 = $3;
+        AST *ident = AstIdentifier("__builtin_bswap32");
+        
+        $$ = MakeFunccall1(ident, arg1);
+    }
+  | SP_ENDIANW '(' expr ')'
+    {
+        AST *arg1 = $3;
+        AST *ident = AstIdentifier("__builtin_bswap16");
+        
+        $$ = MakeFunccall1(ident, arg1);
+    }
+  | SP_MOVBYTS '(' operandlist ')'
+    {
+        AST *args = $3;
+        AST *ident = AstIdentifier("__builtin_movbyts");
+        
+        $$ = MakeFunccall(ident, args, NULL);
     }
 ;