Quelle code.c Sprache: C

typedef long * yy;
#define yyu 2147483647L
static yy yynull;
extern yy yyh;
extern yy yyhx;
static yyErr(n,l)
{
yyAbort(n,"code", l);
}
extern yy yyglov_GentleFlag;
extern yy yyglov_NontermList;
extern yy yyglov_PreludeBlock;
fix_code()
{
{
yy yyb;
yy yy_2_1;
yy yy_4_1;
yy yy_6_1;
yy yy_8_1_1;
yy yy_8_1_2_1;
yy yy_8_2_1_1;
yy yy_8_2_3_1;
yy yy_9_1;
yy yy_11_1;
yy yy_13_1;
yy yy_15_1;
yy yy_17_1;
yy yy_19_1;
yy yy_21_1;
yy yy_23_1;
yy yy_25_1;
yy yy_27_1;
yy yy_29_1;
yy yy_31_1;
yy yy_33_1;
yy yy_35_1;
yy yy_37_1;
yy yy_39_1;
yy yy_41_1;
yy yy_43_1;
yy yy_45_1;
yy yy_47_1;
yy yy_49_1;
yy yy_51_1;
yy yy_53_1;
yy yy_55_1;
yy yy_57_1;
yy yy_59_1;
yy yy_61_1;
yy yy_63_1;
yy yy_65_1;
yy yy_67_1;
yy yy_69_1;
yy yy_71_1;
yy yy_73_1;
yy yy_75_1;
yy yy_77_1;
yy yy_79_1;
yy yy_81_1;
yy yy_83_1;
yy yy_85_1;
yy yy_87_1;
yy yy_89_1;
yy yy_91_1;
yy yy_93_1;
yy yy_95_1;
yy yy_97_1;
yy yy_99_1;
yy yy_101_1;
Nl();
yy_2_1 = ((yy)"extern YYSTYPE yylval;");
Put(yy_2_1);
Nl();
yy_4_1 = ((yy)"YYSTYPE yylval;");
Put(yy_4_1);
Nl();
yy_6_1 = ((yy)"extern long yypos;");
Put(yy_6_1);
Nl();
yy_6_1 = ((yy)"#if defined(DELPHI)");Put(yy_6_1);Nl();  //CO3
yy_6_1 = ((yy)" void *co3malloc(long); ");Put(yy_6_1);Nl();  //CO3
yy_6_1 = ((yy)"#else");Put(yy_6_1);Nl();  //CO3
yy_6_1 = ((yy)" #define co3malloc(x) malloc(x)");Put(yy_6_1);Nl();  //CO3
yy_6_1 = ((yy)"#endif");Put(yy_6_1);Nl();  //CO3
{
yy yysb = yyb;
yy_8_1_1 = yyglov_GentleFlag;
if (yy_8_1_1 == (yy) yyu) yyErr(1,41);
if (yy_8_1_1[0] != 1) goto yyfl_3_1_8_1;
yy_8_1_2_1 = ((yy)"/* GentleFlag = yes */");
Put(yy_8_1_2_1);
Nl();
goto yysl_3_1_8;
yyfl_3_1_8_1 : ;
yy_8_2_1_1 = ((yy)"long yypos = 1;");
Put(yy_8_2_1_1);
Nl();
yy_8_2_3_1 = ((yy)"/* GentleFlag = no */");
Put(yy_8_2_3_1);
Nl();
goto yysl_3_1_8;
yysl_3_1_8 : ;
yyb = yysb;
}
yy_9_1 = ((yy)"");
Put(yy_9_1);
Nl();
yy_11_1 = ((yy)"typedef struct LEXELEMSTRUCT {");
Put(yy_11_1);
Nl();
yy_13_1 = ((yy)" YYSTYPE val;");
Put(yy_13_1);
Nl();
yy_15_1 = ((yy)" long pos;");
Put(yy_15_1);
Nl();
yy_17_1 = ((yy)" long sym;");
Put(yy_17_1);
Nl();
yy_19_1 = ((yy)" char * text;");
Put(yy_19_1);
Nl();
yy_21_1 = ((yy)" struct LEXELEMSTRUCT *next;");
Put(yy_21_1);
Nl();
yy_23_1 = ((yy)"} LEXELEM;");
Put(yy_23_1);
Nl();
yy_25_1 = ((yy)" ");
Put(yy_25_1);
Nl();
yy_27_1 = ((yy)"LEXELEM *first_lexelem, *cur_lexelem;");
Put(yy_27_1);
Nl();
yy_29_1 = ((yy)"");
Put(yy_29_1);
Nl();
yy_31_1 = ((yy)"void init_lexelem(void)");   //CO3
Put(yy_31_1);
Nl();
yy_33_1 = ((yy)"{");
Put(yy_33_1);
Nl();
yy_35_1 = ((yy)" cur_lexelem = first_lexelem;");
Put(yy_35_1);
Nl();
yy_37_1 = ((yy)"}");
Put(yy_37_1);
Nl();
yy_39_1 = ((yy)"");
Put(yy_39_1);
Nl();
yy_41_1 = ((yy)"void first_lexval (void) {");   //CO3
Put(yy_41_1);
Nl();
yy_43_1 = ((yy)" LEXELEM *p;");
Put(yy_43_1);
Nl();
yy_45_1 = ((yy)" p = (LEXELEM *)co3malloc(sizeof(LEXELEM));");      //CO3
Put(yy_45_1);
Nl();
yy_47_1 = ((yy)" if (! p) yymallocerror();");
Put(yy_47_1);
Nl();
yy_49_1 = ((yy)" p->val = yylval;");
Put(yy_49_1);
Nl();
yy_51_1 = ((yy)" p->pos = yypos;");
Put(yy_51_1);
Nl();
yy_53_1 = ((yy)" p->next = 0;");
Put(yy_53_1);
Nl();
yy_55_1 = ((yy)" cur_lexelem = p;");
Put(yy_55_1);
Nl();
yy_57_1 = ((yy)" first_lexelem = p;");
Put(yy_57_1);
Nl();
yy_59_1 = ((yy)"}");
Put(yy_59_1);
Nl();
yy_61_1 = ((yy)"");
Put(yy_61_1);
Nl();
yy_63_1 = ((yy)"void next_lexval(void) {");    //CO3
Put(yy_63_1);
Nl();
yy_65_1 = ((yy)" LEXELEM *p;");
Put(yy_65_1);
Nl();
yy_67_1 = ((yy)" p = (LEXELEM *)co3malloc(sizeof(LEXELEM));");  // CO3
Put(yy_67_1);
Nl();
yy_69_1 = ((yy)" if (! p) yymallocerror();");
Put(yy_69_1);
Nl();
yy_71_1 = ((yy)" cur_lexelem-> next = p;");
Put(yy_71_1);
Nl();
yy_73_1 = ((yy)" p->val = yylval;");
Put(yy_73_1);
Nl();
yy_75_1 = ((yy)" p->pos = yypos;");
Put(yy_75_1);
Nl();
yy_77_1 = ((yy)" p->next = 0;");
Put(yy_77_1);
Nl();
yy_79_1 = ((yy)" cur_lexelem = p;");
Put(yy_79_1);
Nl();
yy_81_1 = ((yy)"}");
Put(yy_81_1);
Nl();
yy_83_1 = ((yy)"");
Put(yy_83_1);
Nl();
yy_85_1 = ((yy)"void get_lexval(void) {");       //CO3
Put(yy_85_1);
Nl();
yy_87_1 = ((yy)" extern int FREE_LEXELEMS;");
Put(yy_87_1);
Nl();
yy_89_1 = ((yy)" LEXELEM *p;");
Put(yy_89_1);
Nl();
yy_91_1 = ((yy)" yylval = cur_lexelem->val;");
Put(yy_91_1);
Nl();
yy_93_1 = ((yy)" yypos = cur_lexelem->pos;");
Put(yy_93_1);
Nl();
yy_95_1 = ((yy)" p = cur_lexelem;");
Put(yy_95_1);
Nl();
yy_97_1 = ((yy)" cur_lexelem = cur_lexelem->next;");
Put(yy_97_1);
Nl();
yy_99_1 = ((yy)" free(p);");
Put(yy_99_1);
Nl();
yy_101_1 = ((yy)"}");
Put(yy_101_1);
Nl();
Nl();
return;
}
}

quality90%

¤ Dauer der Verarbeitung: 0.13 Sekunden (vorverarbeitet) ¤

Wurzel

Suchen

Beweissystem der NASA

Beweissystem Isabelle

NIST Cobol Testsuite

Cephes Mathematical Library

Wiener Entwicklungsmethode

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.

Bemerkung:

Die farbliche Syntaxdarstellung ist noch experimentell.