Lines Matching defs:dlgFile
53 FILE *dlgFile = fopen(OutMetaName(DlgFileName), "w");
54 require(dlgFile!=NULL, eMsg1("genLexFile: cannot open %s", OutMetaName(DlgFileName)) );
58 fprintf(dlgFile, "<<\n");
59 fprintf(dlgFile, "/* %s -- DLG Description of scanner\n", DlgFileName);
60 fprintf(dlgFile, " *\n");
61 fprintf(dlgFile, " * Generated from:");
62 {int i; for (i=0; i<NumFiles; i++) fprintf(dlgFile, " %s", FileStr[i]);}
63 fprintf(dlgFile, "\n");
64 fprintf(dlgFile, " *\n");
65 fprintf(dlgFile, " * Terence Parr, Will Cohen, and Hank Dietz: 1989-2001\n");
66 fprintf(dlgFile, " * Purdue University Electrical Engineering\n");
67 fprintf(dlgFile, " * With AHPCRC, University of Minnesota\n");
68 fprintf(dlgFile, " * ANTLR Version %s\n", Version);
69 fprintf(dlgFile, " */\n\n");
70 if (FirstAction != NULL ) dumpAction( FirstAction, dlgFile, 0, -1, 0, 1 ); /* MR11 MR15b */
71 fprintf(dlgFile, "#define ANTLR_VERSION %s\n", VersionDef);
74 if ( !UserDefdTokens ) fprintf(dlgFile, "#include \"%s\"\n", DefFileName);
75 else fprintf(dlgFile, "#include %s\n", UserTokenDefsFile);
76 fprintf(dlgFile, "#include \"%s\"\n", ATOKEN_H);
77 if ( GenAST ) fprintf(dlgFile, "#include \"%s\"\n", ASTBASE_H);
78 if ( HdrAction != NULL ) dumpAction( HdrAction, dlgFile, 0, -1, 0, 1 );
82 fprintf(dlgFile, "#include \"pcctscfg.h\"\n");
83 fprintf(dlgFile, "#include \"pccts_stdio.h\"\n");
85 fprintf(dlgFile, "#define %s %s\n", DefaultParserName, ParserName);
87 fprintf(dlgFile, "#include \"%s\"\n", RemapFileName);
88 if ( HdrAction != NULL ) dumpAction( HdrAction, dlgFile, 0, -1, 0, 1 );
91 fprintf(dlgFile, "#define ZZCAN_GUESS\n");
92 fprintf(dlgFile, "#include \"pccts_setjmp.h\"\n");
94 if ( OutputLL_k > 1 ) fprintf(dlgFile, "#define LL_K %d\n", OutputLL_k);
95 if ( DemandLookahead ) fprintf(dlgFile, "#define DEMAND_LOOK\n");
97 fprintf(dlgFile,"#ifndef zzTRACE_RULES\n"); /* MR20 */
98 fprintf(dlgFile,"#define zzTRACE_RULES\n"); /* MR20 */
99 fprintf(dlgFile,"#endif\n"); /* MR22 */
101 fprintf(dlgFile, "#include \"antlr.h\"\n");
103 fprintf(dlgFile, "#include \"ast.h\"\n");
106 fprintf(dlgFile, "#include %s\n", UserTokenDefsFile);
108 fprintf(dlgFile, "#include \"%s\"\n", DefFileName);
109 fprintf(dlgFile, "#include \"dlgdef.h\"\n");
110 fprintf(dlgFile, "LOOKAHEAD\n");
111 fprintf(dlgFile, "\n");
112 fprintf(dlgFile, "void\n");
113 fprintf(dlgFile, "#ifdef __USE_PROTOS\n");
114 fprintf(dlgFile, "zzerraction(void)\n");
115 fprintf(dlgFile, "#else\n");
116 fprintf(dlgFile, "zzerraction()\n");
117 fprintf(dlgFile, "#endif\n");
118 fprintf(dlgFile, "{\n");
119 fprintf(dlgFile, "\t(*zzerr)(\"%s\");\n", DLGErrorString);
120 fprintf(dlgFile, "\tzzadvance();\n");
121 fprintf(dlgFile, "\tzzskip();\n");
122 fprintf(dlgFile, "}\n");
124 fprintf(dlgFile, ">>\n\n");
135 /* MR1 */ fprintf(dlgFile, "<<%%%%lexaction\n");
136 dumpAction( (char *)p->elem, dlgFile, 0, -1, 0, 1 );
137 fprintf(dlgFile, ">>\n\n");
142 /* MR1 */ fprintf(dlgFile,"<<%%%%parserclass %s>>\n\n",CurrentClassName);
148 /* MR1 */ fprintf(dlgFile, "<<%%%%lexprefix\n");
149 /* MR1 */ dumpAction( (char *)p->elem, dlgFile, 0, -1, 0, 1 );
150 /* MR1 */ fprintf(dlgFile, ">>\n\n");
157 /* MR1 */ fprintf(dlgFile, "<<%%%%lexmember\n");
158 /* MR1 */ dumpAction( (char *)p->elem, dlgFile, 0, -1, 0, 1 );
159 /* MR1 */ fprintf(dlgFile, ">>\n\n");
167 else dumpLexClasses(dlgFile);
168 fprintf(dlgFile, "%%%%\n");
169 fclose( dlgFile );
179 dumpLexClasses( FILE *dlgFile )
181 dumpLexClasses( dlgFile )
182 FILE *dlgFile;
192 fprintf(dlgFile, "\n%%%%%s\n\n", lclass[i].classnum);
201 fprintf(dlgFile, "%s\n\t<<\n", StripQuotes(q->expr));
206 fprintf(dlgFile, "\t\tNLA = %s;\n", TokenString(t->token));
208 fprintf(dlgFile, "\t\tNLA = %d;\n", t->token);
210 if ( t->action != NULL ) dumpAction( t->action, dlgFile, 2,-1,0,1 );
213 fprintf(dlgFile, "\t\treturn %s;\n", TokenString(t->token));
215 fprintf(dlgFile, "\t\treturn (ANTLRTokenType)%d;\n", t->token);
217 fprintf(dlgFile, "\t>>\n\n");