d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Bij het vervangen van @text2() door print-statements zorgen dat het resultaat

Browse source 
ook 1 statement is: zet er '{' en '}' omheen.
Tevens kunnen de argumenten van een @reloc4() over meerdere regels staan. Dit
levert problemen met het in een string zetten om ze te printen, alle newlines
vervangen door '\\n'.
This commit is contained in:
kaashoek 1988-05-27 08:56:47 +00:00
parent a3ad389064
commit 8998c4165d
1 changed files with 25 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
util/ceg/as_parser/eval/eval.c
View file

@ -192,13 +192,18 @@ char *str;
pr_call( call)
char *call;
{
char c;
printf( "{");
if ( strncmp( "text", call, 4) == 0 && isdigit( *(call+4)))
printf( "cur_pos += %d;", *(call+4) - '0');
else if ( strncmp( "reloc", call, 5) == 0 && isdigit( *(call+5)))
printf( "cur_pos += %d;", *(call+5) - '0');
pr_text_with_conversions( call);
printf( "fprint( outfile, \";\")");
printf( "fprint( outfile, \";\");");
printf( "}");
for (; ( c = getchar()) != ';' ; putchar( c)); /* skip ';' */
}
pr_elsif( quest)
@ -220,16 +225,32 @@ char *quest;
pr_text_with_conversions( str)
char *str;
{
char *ptr, *next_conversion(), *pr_conversion();
char *s, *ptr, *next_conversion(), *pr_conversion();
while ( ptr = next_conversion( str)) {
/* ptr points to '%'-sign */
*ptr = '\0';
printf( "fprint( outfile, \"%s\");", str);
printf( "fprint( outfile, \"");
for ( s = str; *s != '\0'; s++)
if ( *s == '\n')
printf( "\\n");
else
putchar( *s);
printf( "\");");
*ptr = '%';
str = pr_conversion( ptr);
}
printf( "fprint( outfile, \"%s\");", str);
printf( "fprint( outfile, \"");
for ( s = str; *s != '\0'; s++)
if ( *s == '\n')
printf( "\\n");
else
putchar( *s);
printf( "\");");
}
char *next_conversion( str)