===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/parse/kwd.c,v
retrieving revision 1.2
retrieving revision 1.17
diff -u -p -r1.2 -r1.17
--- OpenXM_contrib2/asir2000/parse/kwd.c	2000/08/21 08:31:47	1.2
+++ OpenXM_contrib2/asir2000/parse/kwd.c	2018/03/29 01:32:54	1.17
@@ -23,7 +23,7 @@
  * shall be made on your publication or presentation in any form of the
  * results obtained by use of the SOFTWARE.
  * (4) In the event that you modify the SOFTWARE, you shall notify FLL by
- * e-mail at risa-admin@flab.fujitsu.co.jp of the detailed specification
+ * e-mail at risa-admin@sec.flab.fujitsu.co.jp of the detailed specification
  * for such modification or the source code of the modified part of the
  * SOFTWARE.
  * 
@@ -45,32 +45,43 @@
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *
- * $OpenXM: OpenXM_contrib2/asir2000/parse/kwd.c,v 1.1.1.1 1999/12/03 07:39:12 noro Exp $ 
+ * $OpenXM: OpenXM_contrib2/asir2000/parse/kwd.c,v 1.16 2015/08/14 13:51:56 fujimoto Exp $ 
 */
 #include "ca.h"
 #include "parse.h"
+#if defined(VISUAL) || defined(__MINGW32__)
+#include "ytab.h"
+#else
 #include "y.tab.h"
+#endif
 
 struct oTKWD kwd[] = {
-	{"for",FOR},
-	{"while",WHILE},
-	{"do",DO},
-	{"if",IF},
-	{"else",ELSE},
-	{"break",BREAK},
-	{"continue",CONTINUE},
-	{"return",RETURN},
-	{"def",FDEF},
-	{"pfdef",PFDEF},
-	{"global",GLOBAL},
-	{"extern",GLOBAL},
-	{"struct",STRUCT},
-	{"newstruct",NEWSTRUCT},
-	{"car",CAR},
-	{"cdr",CDR},
-	{"pari",PARIF},
-	{"map",MAP},
-	{"getopt",GETOPT},
-	{"timer",TIMER},
-	{0,0}
+  {"for",FOR},
+  {"while",WHILE},
+  {"do",DO},
+  {"if",IF},
+  {"else",ELSE},
+  {"break",BREAK},
+  {"continue",CONTINUE},
+  {"return",RETURN},
+  {"def",FDEF},
+  {"function",PFDEF},
+  {"module",MODDEF},
+  {"endmodule",MODEND},
+  {"global",GLOBAL},
+  {"extern",GLOBAL},
+  {"static",MGLOBAL},
+  {"local",LOCAL},
+  {"localf",LOCALF},
+  {"struct",STRUCT},
+  {"newstruct",NEWSTRUCT},
+  {"car",CAR},
+  {"cdr",CDR},
+  {"pari",PARIF},
+  {"map",MAP},
+  {"recmap",RECMAP},
+  {"getopt",GETOPT},
+  {"timer",TIMER},
+  {"quote",QUOTED},
+  {0,0}
 };