microfixes

diff --git a/src/lexer_lex.rl b/src/lexer_lex.rl
deleted file mode 100644 (file)
index be3cbff..0000000
--- a/src/lexer_lex.rl
+++ /dev/null
@@ -1,69 +0,0 @@
-/* Ragel State Machine for tokenizing text */\r
-#include <stdio.h>\r
-#include <string.h>\r
-#include "apc.h"\r
-#include "parser.tab.h"\r
-\r
-\r
-int ipow(int, int);\r
-int ttov(const uint8_t* , int);\r
-uint64_t ttor(const uint8_t* , int);\r
-struct name* tton(const uint8_t* , int);\r
-\r
-\r
-#define MAX_TOK_LEN 64\r
-#define MAX_TOKENS 16\r
-#define MAX_STR_SIZE (MAX_TOK_LEN * MAX_TOKENS)\r
-\r
-int ipow(int base, int exp)\r
-{\r
-  int result = 1;\r
-  while (exp)\r
-    {\r
-      if (exp & 1)\r
-        result = result * base;\r
-      exp = exp >> 1;\r
-      base *= base;\r
-    }\r
-\r
-  return result;\r
-}\r
-\r
-/*  Token to Value */\r
-int ttov(const uint8_t* str, int len)\r
-{\r
-  int i, val = 0;\r
-\r
-  for (i = 0; i < len; i++)\r
-    {\r
-      val += ((str[len - (i + 1)] - '0') * ipow(10,i));\r
-    }\r
-\r
-  return val;\r
-}\r
-\r
-uint64_t ttor(const uint8_t* str, int len)\r
-{\r
-  int i;\r
-  uint64_t num = 0;\r
-\r
-  for (i = 0; i < len; i++)\r
-    {\r
-      num += ((str[len - (i + 1)] - '0') * ipow(10,i));\r
-    }\r
-\r
-  return num;\r
-}\r
-\r
-struct name* tton(const uint8_t* str, int len)\r
-{\r
-  int i;\r
-  struct name* namep;\r
-\r
-  namep = (struct name*) malloc(MAX_NAME_LEN);\r
-  for(i = 0; i < MAX_NAME_LEN - 1; i++)\r
-    namep->name[i] = str[i];\r
-  namep->name[i] = '\0';\r
-\r
-  return namep;\r
-}\r

diff --git a/src/parser.y b/src/parser.y
index 3dd7364..9fe82df 100644 (file)
--- a/src/parser.y
+++ b/src/parser.y
@@ -27,7 +27,7 @@
   static void     yyerror(char const*);
   /* Stack-based class handler */
   #define CLASS_POP(CS) (*--(CS-csp))
-  #define CLASS_PUSH(CS,CL) (*(CS->csp)++ = CL
+  #define CLASS_PUSH(CS,CL) (*(CS->csp)++ = CL)
   #define yyclass(CS)   (*(CS->csp))
   #define yyclassld(CS) (ir_classld_from_class(yyclass(CS)))
 }