mirror of https://github.com/lianthony/NT4.0
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
46 lines
842 B
46 lines
842 B
#include "y2.h"
|
|
|
|
void cpycode(void)
|
|
{
|
|
/* copies code between \{ and \} */
|
|
|
|
int c;
|
|
|
|
c = unix_getc(finput);
|
|
if( c == '\n' )
|
|
{
|
|
c = unix_getc(finput);
|
|
lineno++;
|
|
}
|
|
|
|
writeline(ftable);
|
|
|
|
while( c>=0 )
|
|
{
|
|
if( c=='\\' )
|
|
if( (c=unix_getc(finput)) == '}' ) return;
|
|
else putc('\\', ftable );
|
|
if( c=='%' )
|
|
if( (c=unix_getc(finput)) == '}' ) return;
|
|
else putc('%', ftable );
|
|
putc( c , ftable );
|
|
if( c == '\n' ) ++lineno;
|
|
c = unix_getc(finput);
|
|
}
|
|
error("eof before %%}" );
|
|
}
|
|
|
|
void writeline(FILE *fh) {
|
|
char *psz = infile;
|
|
|
|
fprintf( fh, "\n#line %d \"", lineno );
|
|
psz = infile;
|
|
while (*psz) {
|
|
putc(*psz, fh);
|
|
if (*psz == '\\') {
|
|
putc('\\', fh);
|
|
}
|
|
psz++;
|
|
}
|
|
fprintf(fh, "\"\n");
|
|
}
|