YY_RULE_SETUP
#line 161 "meta_lex.l"
{
- if ((position == INTYPE) | (position == MAINHYP))
+ if (((position == INTYPE) | (position == MAINHYP)) &&
+ (first_child == HERE))
{
tmp=(char *)malloc((sizeof('a')*200));
strcpy(tmp,yytext);
YY_BREAK
case 14:
YY_RULE_SETUP
-#line 177 "meta_lex.l"
+#line 178 "meta_lex.l"
{
skip = 1;
first_child = AFTER;
YY_BREAK
case 15:
YY_RULE_SETUP
-#line 182 "meta_lex.l"
+#line 183 "meta_lex.l"
{
if (position == INTYPE) /* CONST on the spine */
position = INCONCL;
YY_BREAK
case 16:
YY_RULE_SETUP
-#line 188 "meta_lex.l"
+#line 189 "meta_lex.l"
{
if (position == INTYPE) /* MUTIND on the spine */
position = INCONCL;
YY_BREAK
case 17:
YY_RULE_SETUP
-#line 194 "meta_lex.l"
+#line 195 "meta_lex.l"
{
if (position == INTYPE) /* MUTCONSTRUCT on the spine */
position = INCONCL;
YY_BREAK
case 18:
YY_RULE_SETUP
-#line 200 "meta_lex.l"
+#line 201 "meta_lex.l"
{
if (!skip) {
uri=(char *)malloc((sizeof('a')*200));
YY_BREAK
case 19:
YY_RULE_SETUP
-#line 217 "meta_lex.l"
+#line 218 "meta_lex.l"
{
if ((where == MUTIND) || (where == MUTCONSTRUCT))
{ strsep(&yytext,&sep);
YY_BREAK
case 20:
YY_RULE_SETUP
-#line 239 "meta_lex.l"
+#line 240 "meta_lex.l"
{
if (where == MUTCONSTRUCT)
{ strsep(&yytext,&sep);
YY_BREAK
case 21:
YY_RULE_SETUP
-#line 258 "meta_lex.l"
+#line 259 "meta_lex.l"
ECHO;
YY_BREAK
-#line 996 "lex.yy.c"
+#line 997 "lex.yy.c"
case YY_STATE_EOF(INITIAL):
yyterminate();
return 0;
}
#endif
-#line 258 "meta_lex.l"
+#line 259 "meta_lex.l"
/***************************************************************/
FILE *outrel, *outsort;
init_symbol_table();
- if (!(outrel = fopen("forward_rel.xml","a")))
+ if (!(outrel = fopen("forward_rel.rdf","a")))
{
- fprintf(stderr, "error in opening file forward_rel.xml\n");
+ fprintf(stderr, "error in openinf file forward_rel.rdf\n");
exit(-1);
}
- if (!(outsort = fopen("forward_sort.xml","a")))
+ if (!(outsort = fopen("forward_sort.rdf","a")))
{
- fprintf(stderr, "error in opening file forward_sort.xml\n");
+ fprintf(stderr, "error in openinf file forward_rel.rdf\n");
exit(-1);
}
// We process the body
YY_RULE_SETUP
#line 210 "meta_lex_ind.l"
{
- if ((position == INTYPE) | (position == MAINHYP))
+ if (((position == INTYPE) | (position == MAINHYP)) &&
+ (first_child == HERE))
{
tmp=(char *)malloc((sizeof('a')*200));
strcpy(tmp,yytext);
YY_BREAK
case 16:
YY_RULE_SETUP
-#line 226 "meta_lex_ind.l"
+#line 227 "meta_lex_ind.l"
{
skip = 1;
first_child = AFTER;
YY_BREAK
case 17:
YY_RULE_SETUP
-#line 231 "meta_lex_ind.l"
+#line 232 "meta_lex_ind.l"
{
if (position == INTYPE) /* CONST on the spine */
position = INCONCL;
YY_BREAK
case 18:
YY_RULE_SETUP
-#line 237 "meta_lex_ind.l"
+#line 238 "meta_lex_ind.l"
{
if (position == INTYPE) /* MUTIND on the spine */
position = INCONCL;
YY_BREAK
case 19:
YY_RULE_SETUP
-#line 243 "meta_lex_ind.l"
+#line 244 "meta_lex_ind.l"
{
if (position == INTYPE) /* MUTCONSTRUCT on the spine */
position = INCONCL;
YY_BREAK
case 20:
YY_RULE_SETUP
-#line 249 "meta_lex_ind.l"
+#line 250 "meta_lex_ind.l"
{
if (!skip) {
uri=(char *)malloc((sizeof('a')*200));
YY_BREAK
case 21:
YY_RULE_SETUP
-#line 266 "meta_lex_ind.l"
+#line 267 "meta_lex_ind.l"
{
if ((where == MUTIND) || (where == MUTCONSTRUCT))
{ strsep(&yytext,&sep);
YY_BREAK
case 22:
YY_RULE_SETUP
-#line 288 "meta_lex_ind.l"
+#line 289 "meta_lex_ind.l"
{
if (where == MUTCONSTRUCT)
{ strsep(&yytext,&sep);
YY_BREAK
case 23:
YY_RULE_SETUP
-#line 307 "meta_lex_ind.l"
+#line 308 "meta_lex_ind.l"
ECHO;
YY_BREAK
-#line 1055 "lex.yy_ind.c"
+#line 1056 "lex.yy_ind.c"
case YY_STATE_EOF(INITIAL):
yyterminate();
return 0;
}
#endif
-#line 307 "meta_lex_ind.l"
+#line 308 "meta_lex_ind.l"
/***************************************************************/
fprintf(stderr, "error in openinf file %s\n", filename);
exit(-1);
}
- if (!(outrel = fopen("forward_rel.xml","a")))
+ if (!(outrel = fopen("forward_rel.rdf","a")))
{
- fprintf(stderr, "error in opening file forward_rel.xml\n");
+ fprintf(stderr, "error in openinf file forward_rel.rdf\n");
exit(-1);
}
- if (!(outsort = fopen("forward_sort.xml","a")))
+ if (!(outsort = fopen("forward_sort.rdf","a")))
{
- fprintf(stderr, "error in opening file forward_sort.xml\n");
+ fprintf(stderr, "error in openinf file forward_rel.rdf\n");
exit(-1);
}