qf/quakeforge
0
0
Fork 0
mirror of https://git.code.sf.net/p/quake/quakeforge synced 2024-11-10 15:22:04 +00:00
Code Issues Projects Releases Packages Wiki Activity

pass progs.src through cpp too

Browse source
This commit is contained in:
Bill Currie 2006-05-24 11:19:48 +00:00 committed by Jeff Teunissen
parent ada9797009
commit ff28197da6
1 changed files with 46 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

60
tools/qfcc/source/qfcc.c
View file

@ -660,7 +660,7 @@ load_file (const char *fname)
QFile *file; QFile *file;
char *src; char *src;
file = Qopen (fname, "rt"); file = Qfopen (preprocess_file (fname), "rt");
if (!file) if (!file)
return 0; return 0;
src = malloc (Qfilesize (file) + 1); src = malloc (Qfilesize (file) + 1);
@ -670,10 +670,29 @@ load_file (const char *fname)
return src; return src;
} }
static void
parse_cpp_line (script_t *script, dstring_t *filename)
{
if (Script_TokenAvailable (script, 0)) {
Script_GetToken (script, 0);
// subtract 1 for \n
script->line = atoi (script->token->str) - 1;
if (Script_TokenAvailable (script, 0)) {
Script_GetToken (script, 0);
dstring_copystr (filename, script->token->str);
script->file = filename->str;
}
}
// There shouldn't be anything else, but just to be safe...
while (Script_TokenAvailable (script, 0))
Script_GetToken (script, 0);
}
static int static int
progs_src_compile (void) progs_src_compile (void)
{ {
dstring_t *filename = dstring_newstr (); dstring_t *filename = dstring_newstr ();
dstring_t *qc_filename = dstring_newstr ();
const char *src; const char *src;
int crc = 0; int crc = 0;
script_t *script; script_t *script;
@ -699,15 +718,17 @@ progs_src_compile (void)
script = Script_New (); script = Script_New ();
Script_Start (script, filename->str, src); Script_Start (script, filename->str, src);
if (!Script_GetToken (script, 1)) { while (1) {
fprintf (stderr, "No destination filename. qfcc --help for info.\n"); if (!Script_GetToken (script, 1)) {
return 1; fprintf (stderr, "No destination filename. qfcc --help for info.\n");
return 1;
}
if (strcmp (script->token->str, "#") == 0) {
parse_cpp_line (script, filename);
continue;
}
break;
} }
// Consume any aditional tokens on this line.
// FIXME compilation options?
// FIXME could break some progs.src files, have an optional control?
while (Script_TokenAvailable (script, 0))
Script_GetToken (script, 0);
if (!options.output_file) if (!options.output_file)
options.output_file = save_string (script->token->str); options.output_file = save_string (script->token->str);
@ -716,6 +737,12 @@ progs_src_compile (void)
} }
setup_sym_file (options.output_file); setup_sym_file (options.output_file);
// Consume any aditional tokens on this line.
// FIXME compilation options?
// FIXME could break some progs.src files, have an optional control?
while (Script_TokenAvailable (script, 0))
Script_GetToken (script, 0);
InitData (); InitData ();
chain_initial_types (); chain_initial_types ();
@ -728,13 +755,18 @@ progs_src_compile (void)
while (Script_GetToken (script, 1)) { while (Script_GetToken (script, 1)) {
int err; int err;
if (strcmp (script->token->str, "#") == 0) {
parse_cpp_line (script, filename);
continue;
}
if (*sourcedir) if (*sourcedir)
dsprintf (filename, "%s%c%s", sourcedir, PATH_SEPARATOR, dsprintf (qc_filename, "%s%c%s", sourcedir, PATH_SEPARATOR,
script->token->str); script->token->str);
else else
dsprintf (filename, "%s", script->token->str); dsprintf (qc_filename, "%s", script->token->str);
if (options.verbosity >= 2) if (options.verbosity >= 2)
printf ("compiling %s\n", filename->str); printf ("%s:%d: compiling %s\n", script->file, script->line, qc_filename->str);
// Consume any aditional tokens on this line, cumulatively adding them // Consume any aditional tokens on this line, cumulatively adding them
// to the cpp command line. // to the cpp command line.
@ -745,11 +777,11 @@ progs_src_compile (void)
add_cpp_def (save_string (script->token->str)); add_cpp_def (save_string (script->token->str));
} }
yyin = preprocess_file (filename->str); yyin = preprocess_file (qc_filename->str);
if (!yyin) if (!yyin)
return !options.preprocess_only; return !options.preprocess_only;
pr.source_file = ReuseString (strip_path (filename->str)); pr.source_file = ReuseString (strip_path (qc_filename->str));
pr.source_line = 1; pr.source_line = 1;
clear_frame_macros (); clear_frame_macros ();
err = yyparse () || pr.error_count; err = yyparse () || pr.error_count;