129 |
/* FIXME. */ |
/* FIXME. */ |
130 |
|
|
131 |
static inline void |
static inline void |
132 |
output_table_data (struct obstack* oout, |
output_table_data (struct obstack *oout, |
133 |
short* table_data, |
short *table_data, |
134 |
short first, |
short first, |
135 |
short begin, |
short begin, |
136 |
short end) |
short end) |
969 |
} |
} |
970 |
fskel = xfopen (skeleton, "r"); |
fskel = xfopen (skeleton, "r"); |
971 |
|
|
972 |
/* New output code. */ |
/* New output code. */ |
973 |
line = 1; |
line = 1; |
974 |
c = getc (fskel); |
c = getc (fskel); |
975 |
while (c != EOF) |
while (c != EOF) |
983 |
} |
} |
984 |
else if ((c = getc (fskel)) == '%') |
else if ((c = getc (fskel)) == '%') |
985 |
{ |
{ |
986 |
/* Read the macro. */ |
/* Read the macro. */ |
987 |
const char* macro_key = 0; |
const char *macro_key = 0; |
988 |
const char* macro_value = 0; |
const char *macro_value = 0; |
989 |
while (isalnum (c = getc (fskel)) || c == '_') |
while (isalnum (c = getc (fskel)) || c == '_') |
990 |
obstack_1grow (¯o_obstack, c); |
obstack_1grow (¯o_obstack, c); |
991 |
obstack_1grow (¯o_obstack, 0); |
obstack_1grow (¯o_obstack, 0); |
992 |
|
|
993 |
/* Output the right value, or see if it's something special. */ |
/* Output the right value, or see if it's something special. */ |
994 |
macro_key = obstack_finish (¯o_obstack); |
macro_key = obstack_finish (¯o_obstack); |
995 |
macro_value = macro_find (macro_key); |
macro_value = macro_find (macro_key); |
996 |
if (macro_value) |
if (macro_value) |
1013 |
obstack_1grow (&table_obstack, '%'); |
obstack_1grow (&table_obstack, '%'); |
1014 |
} |
} |
1015 |
|
|
1016 |
/* End. */ |
/* End. */ |
1017 |
xfclose (fskel); |
xfclose (fskel); |
1018 |
} |
} |
1019 |
|
|