make build arena & hist global

This commit is contained in:
jacob 2024-05-28 21:00:48 -05:00
parent fea045ac54
commit 465a06ab08

307
build.c
View File

@ -5,7 +5,9 @@
* Globals * Globals
* ========================== */ * ========================== */
D_Hist hist = { 0 }; Arena *arena = 0;
D_Hist *hist = 0;
Bool force_rebuild = false; Bool force_rebuild = false;
/* ========================== * /* ========================== *
@ -19,7 +21,7 @@ void Error(String msg)
Bool IsDirty(D_Tag tag) Bool IsDirty(D_Tag tag)
{ {
return force_rebuild ? true : D_IsDirty(tag, &hist); return force_rebuild ? true : D_IsDirty(tag, hist);
} }
/* ========================== * /* ========================== *
@ -42,7 +44,7 @@ struct StepList {
Size count; Size count;
}; };
void StepListAppend(Arena *arena, StepList *l, String name, String cmd, Bool silence_if_success) void StepListAppend(StepList *l, String name, String cmd, Bool silence_if_success)
{ {
StepListNode *n = ArenaPush(arena, StepListNode); StepListNode *n = ArenaPush(arena, StepListNode);
n->name = name; n->name = name;
@ -52,41 +54,17 @@ void StepListAppend(Arena *arena, StepList *l, String name, String cmd, Bool sil
++l->count; ++l->count;
} }
/* ========================== *
* Rc include
* ========================== */
typedef struct RcIncludeListNode RcIncludeListNode;
struct RcIncludeListNode {
D_Tag tag;
String rc_type;
RcIncludeListNode *next;
RcIncludeListNode *prev;
};
typedef struct RcIncludeList RcIncludeList;
struct RcIncludeList {
RcIncludeListNode *first;
RcIncludeListNode *last;
Size count;
};
void RcIncludeListAppend(Arena *arena, RcIncludeList *l, D_Tag tag, String rc_type)
{
RcIncludeListNode *n = ArenaPush(arena, RcIncludeListNode);
n->tag = tag;
n->rc_type = rc_type;
DllPushBack(l->first, l->last, n);
++l->count;
}
/* ========================== * /* ========================== *
* Build * Build
* ========================== */ * ========================== */
void OnBuild(StringList cli_args) void OnBuild(StringList cli_args)
{ {
Arena arena = ArenaAlloc(Gigabyte(64)); {
Arena a = ArenaAlloc(Gigabyte(64));
arena = ArenaPush(&a, Arena);
*arena = a;
}
OS_TimeStamp start = OS_GetTimeStamp(); OS_TimeStamp start = OS_GetTimeStamp();
@ -139,12 +117,12 @@ void OnBuild(StringList cli_args)
} }
} }
String hist_path = OS_GetAbsPath(&arena, StringF(&arena, Lit("%F/.dephist"), FmtStr(arg_outdir))); String hist_path = OS_GetAbsPath(arena, StringF(arena, Lit("%F/.dephist"), FmtStr(arg_outdir)));
String build_hash_path = OS_GetAbsPath(&arena, StringF(&arena, Lit("%F/.pp_build_hash"), FmtStr(arg_outdir))); String build_hash_path = OS_GetAbsPath(arena, StringF(arena, Lit("%F/.pp_build_hash"), FmtStr(arg_outdir)));
String out_dep_dir_path = OS_GetAbsPath(&arena, StringF(&arena, Lit("%F/dep/"), FmtStr(arg_outdir))); String out_dep_dir_path = OS_GetAbsPath(arena, StringF(arena, Lit("%F/dep/"), FmtStr(arg_outdir)));
String out_obj_dir_path = OS_GetAbsPath(&arena, StringF(&arena, Lit("%F/obj/"), FmtStr(arg_outdir))); String out_obj_dir_path = OS_GetAbsPath(arena, StringF(arena, Lit("%F/obj/"), FmtStr(arg_outdir)));
String out_inc_dir_path = OS_GetAbsPath(&arena, StringF(&arena, Lit("%F/inc/"), FmtStr(arg_outdir))); String out_inc_dir_path = OS_GetAbsPath(arena, StringF(arena, Lit("%F/inc/"), FmtStr(arg_outdir)));
String out_bin_dir_path = OS_GetAbsPath(&arena, StringF(&arena, Lit("%F/bin/"), FmtStr(arg_outdir))); String out_bin_dir_path = OS_GetAbsPath(arena, StringF(arena, Lit("%F/bin/"), FmtStr(arg_outdir)));
if (!OS_DirExists(out_obj_dir_path)) { if (!OS_DirExists(out_obj_dir_path)) {
OS_CreateDirAtAbsPath(out_obj_dir_path); OS_CreateDirAtAbsPath(out_obj_dir_path);
@ -163,12 +141,12 @@ void OnBuild(StringList cli_args)
SH_CommandResult where_res = { 0 }; SH_CommandResult where_res = { 0 };
if (arg_msvc) { if (arg_msvc) {
compiler = Lit("Msvc"); compiler = Lit("Msvc");
where_res = SH_RunCommandCaptureOutput(&arena, Lit("where cl.exe"), true); where_res = SH_RunCommandCaptureOutput(arena, Lit("where cl.exe"), true);
} else { } else {
compiler = Lit("Clang"); compiler = Lit("Clang");
where_res = SH_RunCommandCaptureOutput(&arena, Lit("where clang.exe"), true); where_res = SH_RunCommandCaptureOutput(arena, Lit("where clang.exe"), true);
} }
compiler_loc = where_res.error ? Lit("Not found") : StringReplace(&arena, where_res.output, Lit("\n"), Lit("")); compiler_loc = where_res.error ? Lit("Not found") : StringReplace(arena, where_res.output, Lit("\n"), Lit(""));
SH_PrintF(Lit("Compiler: %F (%F)\n"), FmtStr(compiler), FmtStr(compiler_loc)); SH_PrintF(Lit("Compiler: %F (%F)\n"), FmtStr(compiler), FmtStr(compiler_loc));
} }
if (arg_asan) SH_Print(Lit("Asan Enabled\n")); if (arg_asan) SH_Print(Lit("Asan Enabled\n"));
@ -186,13 +164,13 @@ void OnBuild(StringList cli_args)
Bool should_embed_res_dir = !arg_developer; Bool should_embed_res_dir = !arg_developer;
Bool should_embed_in_rc = !!arg_msvc; Bool should_embed_in_rc = !!arg_msvc;
D_Tag executable_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/PowerPlay.exe"), FmtStr(out_bin_dir_path)), D_TagKind_File); D_Tag executable_file = D_TagFromPath(arena, StringF(arena, Lit("%F/PowerPlay.exe"), FmtStr(out_bin_dir_path)), D_TagKind_File);
D_Tag res_dir = D_TagFromPath(&arena, Lit("res"), D_TagKind_Dir); D_Tag res_dir = D_TagFromPath(arena, Lit("res"), D_TagKind_Dir);
D_Tag shaders_dir = D_TagFromPath(&arena, Lit("src/shaders"), D_TagKind_Dir); D_Tag shaders_dir = D_TagFromPath(arena, Lit("src/shaders"), D_TagKind_Dir);
D_Tag icon_file = D_TagFromPath(&arena, Lit("icon.ico"), D_TagKind_File); D_Tag icon_file = D_TagFromPath(arena, Lit("icon.ico"), D_TagKind_File);
D_Tag inc_src_file = D_TagFromPath(&arena, Lit("src/inc.c"), D_TagKind_File); D_Tag inc_src_file = D_TagFromPath(arena, Lit("src/inc.c"), D_TagKind_File);
D_Tag rc_res_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/rc.res"), FmtStr(out_obj_dir_path)), D_TagKind_File); D_Tag rc_res_file = D_TagFromPath(arena, StringF(arena, Lit("%F/rc.res"), FmtStr(out_obj_dir_path)), D_TagKind_File);
/* ========================== * /* ========================== *
* Determine compiler args * Determine compiler args
@ -214,32 +192,32 @@ void OnBuild(StringList cli_args)
{ {
if (arg_msvc) { if (arg_msvc) {
/* Msvc */ /* Msvc */
StringListAppend(&arena, &c_compile_args, Lit("cl.exe /nologo /c \"%F\" /Fo\"%F\"")); StringListAppend(arena, &c_compile_args, Lit("cl.exe /nologo /c \"%F\" /Fo\"%F\""));
StringListAppend(&arena, &cpp_compile_args, Lit("cl.exe /nologo /c \"%F\" /Fo\"%F\"")); StringListAppend(arena, &cpp_compile_args, Lit("cl.exe /nologo /c \"%F\" /Fo\"%F\""));
StringListAppend(&arena, &pch_c_compile_args, Lit("cl.exe /nologo /c /Yc\"%F\" \"%F\"")); StringListAppend(arena, &pch_c_compile_args, Lit("cl.exe /nologo /c /Yc\"%F\" \"%F\""));
StringListAppend(&arena, &pch_cpp_compile_args, Lit("cl.exe /nologo /c /Yc\"%F\" \"%F\"")); StringListAppend(arena, &pch_cpp_compile_args, Lit("cl.exe /nologo /c /Yc\"%F\" \"%F\""));
StringListAppend(&arena, &rc_compile_args, Lit("rc /fo\"%F\" \"%F\"")); StringListAppend(arena, &rc_compile_args, Lit("rc /fo\"%F\" \"%F\""));
StringListAppend(&arena, &link_args, Lit("link.exe /nologo %F /OUT:\"%F\" /DEBUG:FULL /OPT:REF /OPT:ICF")); StringListAppend(arena, &link_args, Lit("link.exe /nologo %F /OUT:\"%F\" /DEBUG:FULL /OPT:REF /OPT:ICF"));
String warnings = Lit("/WX /Wall " String warnings = Lit("/WX /Wall "
"/options:strict " "/options:strict "
"/wd4820 /wd4201 /wd5220 /wd4514 /wd4244 /wd5045 /wd4242 /wd4061 /wd4189 /wd4723 /wd5246"); "/wd4820 /wd4201 /wd5220 /wd4514 /wd4244 /wd5045 /wd4242 /wd4061 /wd4189 /wd4723 /wd5246");
StringListAppend(&arena, &compile_warnings, warnings); StringListAppend(arena, &compile_warnings, warnings);
StringListAppend(&arena, &link_warnings, Lit("/WX")); StringListAppend(arena, &link_warnings, Lit("/WX"));
StringListAppend(&arena, &compile_args, StringF(&arena, Lit("/Fd\"%F\\\""), FmtStr(out_bin_dir_path))); StringListAppend(arena, &compile_args, StringF(arena, Lit("/Fd\"%F\\\""), FmtStr(out_bin_dir_path)));
} else { } else {
/* Clang */ /* Clang */
StringListAppend(&arena, &c_compile_args, Lit("clang -xc -std=c99 -c \"%F\" -o \"%F\" -MD")); StringListAppend(arena, &c_compile_args, Lit("clang -xc -std=c99 -c \"%F\" -o \"%F\" -MD"));
StringListAppend(&arena, &cpp_compile_args, Lit("clang -xc++ -std=c++20 -c \"%F\" -o \"%F\" -MD")); StringListAppend(arena, &cpp_compile_args, Lit("clang -xc++ -std=c++20 -c \"%F\" -o \"%F\" -MD"));
StringListAppend(&arena, &pch_c_compile_args, Lit("clang -xc-header -std=c99 -c \"%F\" -o \"%F\" -MD")); StringListAppend(arena, &pch_c_compile_args, Lit("clang -xc-header -std=c99 -c \"%F\" -o \"%F\" -MD"));
StringListAppend(&arena, &pch_cpp_compile_args, Lit("clang -xc++-header -std=c++20 -c \"%F\" -o \"%F\" -MD")); StringListAppend(arena, &pch_cpp_compile_args, Lit("clang -xc++-header -std=c++20 -c \"%F\" -o \"%F\" -MD"));
StringListAppend(&arena, &rc_compile_args, Lit("llvm-rc /fo\"%F\" \"%F\"")); StringListAppend(arena, &rc_compile_args, Lit("llvm-rc /fo\"%F\" \"%F\""));
StringListAppend(&arena, &link_args, Lit("clang %F -o \"%F\"")); StringListAppend(arena, &link_args, Lit("clang %F -o \"%F\""));
StringListAppend(&arena, StringListAppend(arena,
&compile_and_link_args, &compile_and_link_args,
Lit("-fuse-ld=lld-link " Lit("-fuse-ld=lld-link "
"-fno-strict-aliasing " "-fno-strict-aliasing "
@ -267,8 +245,8 @@ void OnBuild(StringList cli_args)
"-Wno-double-promotion"); "-Wno-double-promotion");
/* -Wno-unused-variable -Wno-unused-but-set-variable -Wno-unused-parameter */ /* -Wno-unused-variable -Wno-unused-but-set-variable -Wno-unused-parameter */
StringListAppend(&arena, &compile_warnings, warnings); StringListAppend(arena, &compile_warnings, warnings);
StringListAppend(&arena, &link_warnings, warnings); StringListAppend(arena, &link_warnings, warnings);
} }
/* RTC */ /* RTC */
@ -277,56 +255,56 @@ void OnBuild(StringList cli_args)
Error(Lit("CRTLIB (C runtime library) Must be enabled when compiling with RTC (runtime checks)")); Error(Lit("CRTLIB (C runtime library) Must be enabled when compiling with RTC (runtime checks)"));
OS_Exit(1); OS_Exit(1);
} }
StringListAppend(&arena, &compile_args, Lit("-DRTC=1")); StringListAppend(arena, &compile_args, Lit("-DRTC=1"));
if (arg_msvc) { if (arg_msvc) {
if (!arg_asan) { if (!arg_asan) {
/* Enable /RTC option (not compatible with ASAN) */ /* Enable /RTC option (not compatible with ASAN) */
StringListAppend(&arena, &compile_and_link_args, Lit("/RTCcsu")); StringListAppend(arena, &compile_and_link_args, Lit("/RTCcsu"));
} }
} else { } else {
/* Enable UBSan */ /* Enable UBSan */
StringListAppend(&arena, &compile_and_link_args, Lit("-fsanitize=undefined -fsanitize-trap=all")); StringListAppend(arena, &compile_and_link_args, Lit("-fsanitize=undefined -fsanitize-trap=all"));
//StringListAppend(&arena, &compile_and_link_args, Lit("-fsanitize=undefined")); //StringListAppend(arena, &compile_and_link_args, Lit("-fsanitize=undefined"));
} }
} }
/* CRTLIB */ /* CRTLIB */
if (arg_crtlib) { if (arg_crtlib) {
StringListAppend(&arena, &compile_args, Lit("-DCRTLIB=1")); StringListAppend(arena, &compile_args, Lit("-DCRTLIB=1"));
} else { } else {
if (arg_msvc) { if (arg_msvc) {
/* TODO */ /* TODO */
Error(Lit("TODO\n")); Error(Lit("TODO\n"));
OS_Exit(1); OS_Exit(1);
} else { } else {
StringListAppend(&arena, &compile_and_link_args, Lit("-mno-stack-arg-probe -fno-builtin -nostdlib")); StringListAppend(arena, &compile_and_link_args, Lit("-mno-stack-arg-probe -fno-builtin -nostdlib"));
} }
} }
/* Optimization */ /* Optimization */
if (arg_unoptimized) { if (arg_unoptimized) {
StringListAppend(&arena, &compile_args, Lit("-DUNOPTIMIZED=1")); StringListAppend(arena, &compile_args, Lit("-DUNOPTIMIZED=1"));
if (arg_msvc) { if (arg_msvc) {
StringListAppend(&arena, &compile_args, Lit("/Od")); StringListAppend(arena, &compile_args, Lit("/Od"));
} else { } else {
StringListAppend(&arena, &compile_and_link_args, Lit("-O0")); StringListAppend(arena, &compile_and_link_args, Lit("-O0"));
} }
} else { } else {
if (arg_msvc) { if (arg_msvc) {
StringListAppend(&arena, &compile_args, Lit("/O2")); StringListAppend(arena, &compile_args, Lit("/O2"));
StringListAppend(&arena, &link_args, Lit("/LTCG")); StringListAppend(arena, &link_args, Lit("/LTCG"));
} else { } else {
StringListAppend(&arena, &compile_and_link_args, Lit("-O3 -flto")); StringListAppend(arena, &compile_and_link_args, Lit("-O3 -flto"));
} }
} }
/* Debug info */ /* Debug info */
if (arg_debinfo) { if (arg_debinfo) {
StringListAppend(&arena, &compile_args, Lit("-DDEBINFO=1")); StringListAppend(arena, &compile_args, Lit("-DDEBINFO=1"));
if (arg_msvc) { if (arg_msvc) {
StringListAppend(&arena, &compile_args, Lit("/JMC /Zi")); StringListAppend(arena, &compile_args, Lit("/JMC /Zi"));
} else { } else {
StringListAppend(&arena, &compile_and_link_args, Lit("-g")); StringListAppend(arena, &compile_and_link_args, Lit("-g"));
} }
} }
@ -336,17 +314,17 @@ void OnBuild(StringList cli_args)
Error(Lit("CRTLIB (C runtime library) Must be enabled when compiling with asan enabled")); Error(Lit("CRTLIB (C runtime library) Must be enabled when compiling with asan enabled"));
OS_Exit(1); OS_Exit(1);
} }
StringListAppend(&arena, &compile_args, Lit("-DASAN=1")); StringListAppend(arena, &compile_args, Lit("-DASAN=1"));
if (arg_msvc) { if (arg_msvc) {
StringListAppend(&arena, &compile_args, Lit("/fsanitize=address")); StringListAppend(arena, &compile_args, Lit("/fsanitize=address"));
} else { } else {
StringListAppend(&arena, &compile_and_link_args, Lit("-fsanitize=address -shared-libasan")); StringListAppend(arena, &compile_and_link_args, Lit("-fsanitize=address -shared-libasan"));
} }
} }
/* Developer mode */ /* Developer mode */
if (arg_developer) { if (arg_developer) {
StringListAppend(&arena, &compile_args, Lit("-DDEVELOPER=1")); StringListAppend(arena, &compile_args, Lit("-DDEVELOPER=1"));
} }
/* Profiling */ /* Profiling */
@ -359,19 +337,19 @@ void OnBuild(StringList cli_args)
Error(Lit("MSVC not supported with profiling enabled (Profiling relies on Clang attributes)")); Error(Lit("MSVC not supported with profiling enabled (Profiling relies on Clang attributes)"));
OS_Exit(1); OS_Exit(1);
} }
StringListAppend(&arena, &compile_args, Lit("-DPROFILING=1")); StringListAppend(arena, &compile_args, Lit("-DPROFILING=1"));
/* Tracy flags */ /* Tracy flags */
StringListAppend(&arena, &compile_args, Lit("-DTRACY_ENABLE=1")); StringListAppend(arena, &compile_args, Lit("-DTRACY_ENABLE=1"));
StringListAppend(&arena, &compile_args, Lit("-DTRACY_CALLSTACK=5")); StringListAppend(arena, &compile_args, Lit("-DTRACY_CALLSTACK=5"));
StringListAppend(&arena, &compile_args, Lit("-DTRACY_NO_SAMPLING -DTRACY_NO_SYSTEM_TRACING -DTRACY_NO_CALLSTACK")); StringListAppend(arena, &compile_args, Lit("-DTRACY_NO_SAMPLING -DTRACY_NO_SYSTEM_TRACING -DTRACY_NO_CALLSTACK"));
/* Disable compile_warnings when compiling tracy client */ /* Disable compile_warnings when compiling tracy client */
compile_warnings = (StringList) { 0 }; compile_warnings = (StringList) { 0 };
link_warnings = (StringList) { 0 }; link_warnings = (StringList) { 0 };
} }
if (!arg_msvc) { if (!arg_msvc) {
String incbin_dir = StringReplace(&arena, out_inc_dir_path, Lit("\\"), Lit("/")); String incbin_dir = StringReplace(arena, out_inc_dir_path, Lit("\\"), Lit("/"));
StringListAppend(&arena, &compile_args, StringF(&arena, Lit("-DINCBIN_DIR_RAW=\"%F\""), FmtStr(incbin_dir))); StringListAppend(arena, &compile_args, StringF(arena, Lit("-DINCBIN_DIR_RAW=\"%F\""), FmtStr(incbin_dir)));
} }
} }
@ -380,11 +358,11 @@ void OnBuild(StringList cli_args)
* ========================== */ * ========================== */
{ {
D_Tag build_hash_file = D_TagFromPath(&arena, build_hash_path, D_TagKind_File); D_Tag build_hash_file = D_TagFromPath(arena, build_hash_path, D_TagKind_File);
U64 build_hash = D_HashString64Basis; U64 build_hash = D_HashString64Basis;
{ {
String args_str = StringFromStringList(&arena, Lit(" "), cli_args); String args_str = StringFromStringList(arena, Lit(" "), cli_args);
String compile_time_str = Lit(__DATE__ __TIME__); String compile_time_str = Lit(__DATE__ __TIME__);
build_hash = D_HashString64(build_hash, args_str); build_hash = D_HashString64(build_hash, args_str);
build_hash = D_HashString64(build_hash, compile_time_str); build_hash = D_HashString64(build_hash, compile_time_str);
@ -392,7 +370,7 @@ void OnBuild(StringList cli_args)
U64 old_build_hash = 0; U64 old_build_hash = 0;
{ {
String build_hash_file_data = D_ReadAll(&arena, build_hash_file); String build_hash_file_data = D_ReadAll(arena, build_hash_file);
if (build_hash_file_data.len >= 8) { if (build_hash_file_data.len >= 8) {
MemoryCopy((Byte *)&old_build_hash, build_hash_file_data.text, 8); MemoryCopy((Byte *)&old_build_hash, build_hash_file_data.text, 8);
} }
@ -411,7 +389,8 @@ void OnBuild(StringList cli_args)
* Build * Build
* ========================== */ * ========================== */
hist = D_HistFromPath(&arena, hist_path); hist = ArenaPush(arena, D_Hist);
*hist = D_HistFromPath(arena, hist_path);
StepList build_steps = { 0 }; StepList build_steps = { 0 };
D_TagList link_files = { 0 }; D_TagList link_files = { 0 };
@ -423,15 +402,15 @@ void OnBuild(StringList cli_args)
{ {
D_TagList tar_input_dirs = { 0 }; D_TagList tar_input_dirs = { 0 };
{ {
D_TagListAppend(&arena, &tar_input_dirs, shaders_dir); D_TagListAppend(arena, &tar_input_dirs, shaders_dir);
if (should_embed_res_dir) { if (should_embed_res_dir) {
D_TagListAppend(&arena, &tar_input_dirs, res_dir); D_TagListAppend(arena, &tar_input_dirs, res_dir);
} }
} }
for (D_TagListNode *n = tar_input_dirs.first; n; n = n->next) { for (D_TagListNode *n = tar_input_dirs.first; n; n = n->next) {
D_Tag input_dir = n->tag; D_Tag input_dir = n->tag;
D_Tag tar_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/%F.tar"), FmtStr(out_inc_dir_path), FmtStr(D_GetName(input_dir))), D_TagKind_File); D_Tag tar_file = D_TagFromPath(arena, StringF(arena, Lit("%F/%F.tar"), FmtStr(out_inc_dir_path), FmtStr(D_GetName(input_dir))), D_TagKind_File);
D_AddDependency(tar_file, input_dir); D_AddDependency(tar_file, input_dir);
if (should_embed_in_rc) { if (should_embed_in_rc) {
D_AddDependency(rc_res_file, tar_file); D_AddDependency(rc_res_file, tar_file);
@ -439,9 +418,9 @@ void OnBuild(StringList cli_args)
D_AddDependency(inc_src_file, tar_file); D_AddDependency(inc_src_file, tar_file);
} }
if (IsDirty(tar_file)) { if (IsDirty(tar_file)) {
String cmd = StringF(&arena, Lit("cd %F && tar cvf %F ."), FmtStr(input_dir.full_path), FmtStr(tar_file.full_path)); String cmd = StringF(arena, Lit("cd %F && tar cvf %F ."), FmtStr(input_dir.full_path), FmtStr(tar_file.full_path));
String step_name = StringF(&arena, Lit("%F -> %F"), FmtStr(D_GetName(input_dir)), FmtStr(D_GetName(tar_file))); String step_name = StringF(arena, Lit("%F -> %F"), FmtStr(D_GetName(input_dir)), FmtStr(D_GetName(tar_file)));
StepListAppend(&arena, &build_steps, step_name, cmd, true); StepListAppend(&build_steps, step_name, cmd, true);
} }
} }
} }
@ -451,10 +430,10 @@ void OnBuild(StringList cli_args)
* ========================== */ * ========================== */
if (PlatformWindows) { if (PlatformWindows) {
D_Tag rc_input_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/rc.rc"), FmtStr(out_inc_dir_path)), D_TagKind_File); D_Tag rc_input_file = D_TagFromPath(arena, StringF(arena, Lit("%F/rc.rc"), FmtStr(out_inc_dir_path)), D_TagKind_File);
{ {
D_Tag shaders_tar_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/%F.tar"), FmtStr(out_inc_dir_path), FmtStr(D_GetName(shaders_dir))), D_TagKind_File); D_Tag shaders_tar_file = D_TagFromPath(arena, StringF(arena, Lit("%F/%F.tar"), FmtStr(out_inc_dir_path), FmtStr(D_GetName(shaders_dir))), D_TagKind_File);
D_Tag res_tar_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/%F.tar"), FmtStr(out_inc_dir_path), FmtStr(D_GetName(res_dir))), D_TagKind_File); D_Tag res_tar_file = D_TagFromPath(arena, StringF(arena, Lit("%F/%F.tar"), FmtStr(out_inc_dir_path), FmtStr(D_GetName(res_dir))), D_TagKind_File);
D_AddDependency(rc_input_file, icon_file); D_AddDependency(rc_input_file, icon_file);
if (should_embed_in_rc) { if (should_embed_in_rc) {
D_AddDependency(rc_input_file, shaders_tar_file); D_AddDependency(rc_input_file, shaders_tar_file);
@ -464,27 +443,27 @@ void OnBuild(StringList cli_args)
} }
if (IsDirty(rc_input_file)) { if (IsDirty(rc_input_file)) {
D_ClearWrite(rc_input_file, Lit("")); D_ClearWrite(rc_input_file, Lit(""));
D_AppendWrite(rc_input_file, StringF(&arena, Lit("%F %F DISCARDABLE %F\n"), FmtStr(D_GetName(icon_file)), FmtStr(Lit("ICON")), FmtStr(D_GetName(icon_file)))); D_AppendWrite(rc_input_file, StringF(arena, Lit("%F %F DISCARDABLE %F\n"), FmtStr(D_GetName(icon_file)), FmtStr(Lit("ICON")), FmtStr(D_GetName(icon_file))));
if (should_embed_in_rc) { if (should_embed_in_rc) {
D_AppendWrite(rc_input_file, StringF(&arena, Lit("%F %F DISCARDABLE %F\n"), FmtStr(D_GetName(shaders_tar_file)), FmtStr(Lit("RCDATA")), FmtStr(D_GetName(shaders_tar_file)))); D_AppendWrite(rc_input_file, StringF(arena, Lit("%F %F DISCARDABLE %F\n"), FmtStr(D_GetName(shaders_tar_file)), FmtStr(Lit("RCDATA")), FmtStr(D_GetName(shaders_tar_file))));
if (should_embed_res_dir) { if (should_embed_res_dir) {
D_AppendWrite(rc_input_file, StringF(&arena, Lit("%F %F DISCARDABLE %F\n"), FmtStr(D_GetName(res_tar_file)), FmtStr(Lit("RCDATA")), FmtStr(D_GetName(res_tar_file)))); D_AppendWrite(rc_input_file, StringF(arena, Lit("%F %F DISCARDABLE %F\n"), FmtStr(D_GetName(res_tar_file)), FmtStr(Lit("RCDATA")), FmtStr(D_GetName(res_tar_file))));
} }
} }
} }
} }
{ {
String rc_compile_args_fmt = StringFromStringLists(&arena, Lit(" "), rc_compile_args); String rc_compile_args_fmt = StringFromStringLists(arena, Lit(" "), rc_compile_args);
D_AddDependency(rc_res_file, rc_input_file); D_AddDependency(rc_res_file, rc_input_file);
if (IsDirty(rc_res_file)) { if (IsDirty(rc_res_file)) {
String cmd = StringF(&arena, rc_compile_args_fmt, FmtStr(rc_res_file.full_path), FmtStr(rc_input_file.full_path)); String cmd = StringF(arena, rc_compile_args_fmt, FmtStr(rc_res_file.full_path), FmtStr(rc_input_file.full_path));
String step_name = StringF(&arena, Lit("%F -> %F"), FmtStr(D_GetName(rc_input_file)), FmtStr(D_GetName(rc_res_file))); String step_name = StringF(arena, Lit("%F -> %F"), FmtStr(D_GetName(rc_input_file)), FmtStr(D_GetName(rc_res_file)));
StepListAppend(&arena, &build_steps, step_name, cmd, true); StepListAppend(&build_steps, step_name, cmd, true);
} }
D_TagListAppend(&arena, &link_files, rc_res_file); D_TagListAppend(arena, &link_files, rc_res_file);
} }
} }
@ -493,48 +472,48 @@ void OnBuild(StringList cli_args)
* ========================== */ * ========================== */
{ {
D_Tag pch_header_file = D_TagFromPath(&arena, Lit("src/common.h"), D_TagKind_File); D_Tag pch_header_file = D_TagFromPath(arena, Lit("src/common.h"), D_TagKind_File);
D_Tag dep_file; D_Tag dep_file;
{ {
String name = D_GetName(pch_header_file); String name = D_GetName(pch_header_file);
String dep_file_path = StringF(&arena, Lit("%F/%F.%F"), FmtStr(out_obj_dir_path), FmtStr(name), FmtStr(dep_file_extension)); String dep_file_path = StringF(arena, Lit("%F/%F.%F"), FmtStr(out_obj_dir_path), FmtStr(name), FmtStr(dep_file_extension));
dep_file = D_TagFromPath(&arena, dep_file_path, D_TagKind_DepFile); dep_file = D_TagFromPath(arena, dep_file_path, D_TagKind_DepFile);
} }
D_Tag pch_c_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/%F.c_pch"), FmtStr(out_obj_dir_path), FmtStr(D_GetName(pch_header_file))), D_TagKind_File); D_Tag pch_c_file = D_TagFromPath(arena, StringF(arena, Lit("%F/%F.c_pch"), FmtStr(out_obj_dir_path), FmtStr(D_GetName(pch_header_file))), D_TagKind_File);
D_AddDependency(pch_c_file, pch_header_file); D_AddDependency(pch_c_file, pch_header_file);
D_AddDependency(pch_c_file, dep_file); D_AddDependency(pch_c_file, dep_file);
D_Tag pch_cpp_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/%F.cpp_pch"), FmtStr(out_obj_dir_path), FmtStr(D_GetName(pch_header_file))), D_TagKind_File); D_Tag pch_cpp_file = D_TagFromPath(arena, StringF(arena, Lit("%F/%F.cpp_pch"), FmtStr(out_obj_dir_path), FmtStr(D_GetName(pch_header_file))), D_TagKind_File);
D_AddDependency(pch_cpp_file, pch_header_file); D_AddDependency(pch_cpp_file, pch_header_file);
D_AddDependency(pch_cpp_file, dep_file); D_AddDependency(pch_cpp_file, dep_file);
if (arg_msvc) { if (arg_msvc) {
D_Tag pch_c_src_gen_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/common.c"), FmtStr(out_obj_dir_path)), D_TagKind_File); D_Tag pch_c_src_gen_file = D_TagFromPath(arena, StringF(arena, Lit("%F/common.c"), FmtStr(out_obj_dir_path)), D_TagKind_File);
D_Tag pch_c_src_gen_obj_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/common.c.obj"), FmtStr(out_obj_dir_path)), D_TagKind_File); D_Tag pch_c_src_gen_obj_file = D_TagFromPath(arena, StringF(arena, Lit("%F/common.c.obj"), FmtStr(out_obj_dir_path)), D_TagKind_File);
D_Tag pch_cpp_src_gen_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/common.cpp"), FmtStr(out_obj_dir_path)), D_TagKind_File); D_Tag pch_cpp_src_gen_file = D_TagFromPath(arena, StringF(arena, Lit("%F/common.cpp"), FmtStr(out_obj_dir_path)), D_TagKind_File);
D_Tag pch_cpp_src_gen_obj_file = D_TagFromPath(&arena, StringF(&arena, Lit("%F/common.cpp.obj"), FmtStr(out_obj_dir_path)), D_TagKind_File); D_Tag pch_cpp_src_gen_obj_file = D_TagFromPath(arena, StringF(arena, Lit("%F/common.cpp.obj"), FmtStr(out_obj_dir_path)), D_TagKind_File);
StringListAppend(&arena, &c_compile_args, StringF(&arena, Lit("/Yu\"%F\" /FI\"%F\" /Fp\"%F\""), FmtStr(pch_header_file.full_path), FmtStr(pch_header_file.full_path), FmtStr(pch_c_file.full_path))); StringListAppend(arena, &c_compile_args, StringF(arena, Lit("/Yu\"%F\" /FI\"%F\" /Fp\"%F\""), FmtStr(pch_header_file.full_path), FmtStr(pch_header_file.full_path), FmtStr(pch_c_file.full_path)));
StringListAppend(&arena, &cpp_compile_args, StringF(&arena, Lit("/Yu\"%F\" /FI\"%F\" /Fp\"%F\""), FmtStr(pch_header_file.full_path), FmtStr(pch_header_file.full_path), FmtStr(pch_cpp_file.full_path))); StringListAppend(arena, &cpp_compile_args, StringF(arena, Lit("/Yu\"%F\" /FI\"%F\" /Fp\"%F\""), FmtStr(pch_header_file.full_path), FmtStr(pch_header_file.full_path), FmtStr(pch_cpp_file.full_path)));
StringListAppend(&arena, &pch_c_compile_args, StringF(&arena, Lit("/FI\"%F\" /Fp\"%F\" /Fo\"%F\""), FmtStr(pch_header_file.full_path), FmtStr(pch_c_file.full_path), FmtStr(pch_c_src_gen_obj_file.full_path))); StringListAppend(arena, &pch_c_compile_args, StringF(arena, Lit("/FI\"%F\" /Fp\"%F\" /Fo\"%F\""), FmtStr(pch_header_file.full_path), FmtStr(pch_c_file.full_path), FmtStr(pch_c_src_gen_obj_file.full_path)));
StringListAppend(&arena, &pch_cpp_compile_args, StringF(&arena, Lit("/FI\"%F\" /Fp\"%F\" /Fo\"%F\""), FmtStr(pch_header_file.full_path), FmtStr(pch_cpp_file.full_path), FmtStr(pch_cpp_src_gen_obj_file.full_path))); StringListAppend(arena, &pch_cpp_compile_args, StringF(arena, Lit("/FI\"%F\" /Fp\"%F\" /Fo\"%F\""), FmtStr(pch_header_file.full_path), FmtStr(pch_cpp_file.full_path), FmtStr(pch_cpp_src_gen_obj_file.full_path)));
D_TagListAppend(&arena, &link_files, pch_c_src_gen_obj_file); D_TagListAppend(arena, &link_files, pch_c_src_gen_obj_file);
D_TagListAppend(&arena, &link_files, pch_cpp_src_gen_obj_file); D_TagListAppend(arena, &link_files, pch_cpp_src_gen_obj_file);
String pch_c_compile_args_fmt = StringFromStringLists(&arena, Lit(" "), pch_c_compile_args, compile_warnings, compile_and_link_args, compile_args); String pch_c_compile_args_fmt = StringFromStringLists(arena, Lit(" "), pch_c_compile_args, compile_warnings, compile_and_link_args, compile_args);
String pch_cpp_compile_args_fmt = StringFromStringLists(&arena, Lit(" "), pch_cpp_compile_args, compile_warnings, compile_and_link_args, compile_args); String pch_cpp_compile_args_fmt = StringFromStringLists(arena, Lit(" "), pch_cpp_compile_args, compile_warnings, compile_and_link_args, compile_args);
/* C */ /* C */
D_AddDependency(pch_c_src_gen_obj_file, pch_c_src_gen_file); D_AddDependency(pch_c_src_gen_obj_file, pch_c_src_gen_file);
D_AddDependency(pch_c_file, pch_c_src_gen_obj_file); D_AddDependency(pch_c_file, pch_c_src_gen_obj_file);
if (IsDirty(pch_c_file)) { if (IsDirty(pch_c_file)) {
D_ClearWrite(pch_c_src_gen_file, Lit("")); D_ClearWrite(pch_c_src_gen_file, Lit(""));
String cmd = StringF(&arena, pch_c_compile_args_fmt, FmtStr(pch_header_file.full_path), FmtStr(pch_c_src_gen_file.full_path)); String cmd = StringF(arena, pch_c_compile_args_fmt, FmtStr(pch_header_file.full_path), FmtStr(pch_c_src_gen_file.full_path));
String step_name = StringF(&arena, Lit("%F -> %F"), FmtStr(D_GetName(pch_header_file)), FmtStr(D_GetName(pch_c_file))); String step_name = StringF(arena, Lit("%F -> %F"), FmtStr(D_GetName(pch_header_file)), FmtStr(D_GetName(pch_c_file)));
StepListAppend(&arena, &build_steps, step_name, cmd, true); StepListAppend(&build_steps, step_name, cmd, true);
} }
/* Cpp */ /* Cpp */
@ -542,29 +521,29 @@ void OnBuild(StringList cli_args)
D_AddDependency(pch_cpp_file, pch_cpp_src_gen_obj_file); D_AddDependency(pch_cpp_file, pch_cpp_src_gen_obj_file);
if (IsDirty(pch_cpp_file)) { if (IsDirty(pch_cpp_file)) {
D_ClearWrite(pch_cpp_src_gen_file, Lit("")); D_ClearWrite(pch_cpp_src_gen_file, Lit(""));
String cmd = StringF(&arena, pch_cpp_compile_args_fmt, FmtStr(pch_header_file.full_path), FmtStr(pch_cpp_src_gen_file.full_path)); String cmd = StringF(arena, pch_cpp_compile_args_fmt, FmtStr(pch_header_file.full_path), FmtStr(pch_cpp_src_gen_file.full_path));
String step_name = StringF(&arena, Lit("%F -> %F"), FmtStr(D_GetName(pch_header_file)), FmtStr(D_GetName(pch_cpp_file))); String step_name = StringF(arena, Lit("%F -> %F"), FmtStr(D_GetName(pch_header_file)), FmtStr(D_GetName(pch_cpp_file)));
StepListAppend(&arena, &build_steps, step_name, cmd, true); StepListAppend(&build_steps, step_name, cmd, true);
} }
} else { } else {
StringListAppend(&arena, &c_compile_args, StringF(&arena, Lit("-include-pch %F"), FmtStr(pch_c_file.full_path))); StringListAppend(arena, &c_compile_args, StringF(arena, Lit("-include-pch %F"), FmtStr(pch_c_file.full_path)));
StringListAppend(&arena, &cpp_compile_args, StringF(&arena, Lit("-include-pch %F"), FmtStr(pch_cpp_file.full_path))); StringListAppend(arena, &cpp_compile_args, StringF(arena, Lit("-include-pch %F"), FmtStr(pch_cpp_file.full_path)));
String pch_c_compile_args_fmt = StringFromStringLists(&arena, Lit(" "), pch_c_compile_args, compile_warnings, compile_and_link_args, compile_args); String pch_c_compile_args_fmt = StringFromStringLists(arena, Lit(" "), pch_c_compile_args, compile_warnings, compile_and_link_args, compile_args);
String pch_cpp_compile_args_fmt = StringFromStringLists(&arena, Lit(" "), pch_cpp_compile_args, compile_warnings, compile_and_link_args, compile_args); String pch_cpp_compile_args_fmt = StringFromStringLists(arena, Lit(" "), pch_cpp_compile_args, compile_warnings, compile_and_link_args, compile_args);
/* C */ /* C */
if (IsDirty(pch_c_file)) { if (IsDirty(pch_c_file)) {
String comp_cmd = StringF(&arena, pch_c_compile_args_fmt, FmtStr(pch_header_file.full_path), FmtStr(pch_c_file.full_path)); String comp_cmd = StringF(arena, pch_c_compile_args_fmt, FmtStr(pch_header_file.full_path), FmtStr(pch_c_file.full_path));
String step_name = StringF(&arena, Lit("%F -> %F"), FmtStr(D_GetName(pch_header_file)), FmtStr(D_GetName(pch_c_file))); String step_name = StringF(arena, Lit("%F -> %F"), FmtStr(D_GetName(pch_header_file)), FmtStr(D_GetName(pch_c_file)));
StepListAppend(&arena, &build_steps, step_name, comp_cmd, true); StepListAppend(&build_steps, step_name, comp_cmd, true);
} }
/* Cpp */ /* Cpp */
if (IsDirty(pch_cpp_file)) { if (IsDirty(pch_cpp_file)) {
String comp_cmd = StringF(&arena, pch_cpp_compile_args_fmt, FmtStr(pch_header_file.full_path), FmtStr(pch_cpp_file.full_path)); String comp_cmd = StringF(arena, pch_cpp_compile_args_fmt, FmtStr(pch_header_file.full_path), FmtStr(pch_cpp_file.full_path));
String step_name = StringF(&arena, Lit("%F -> %F"), FmtStr(D_GetName(pch_header_file)), FmtStr(D_GetName(pch_cpp_file))); String step_name = StringF(arena, Lit("%F -> %F"), FmtStr(D_GetName(pch_header_file)), FmtStr(D_GetName(pch_cpp_file)));
StepListAppend(&arena, &build_steps, step_name, comp_cmd, true); StepListAppend(&build_steps, step_name, comp_cmd, true);
} }
} }
} }
@ -576,8 +555,8 @@ void OnBuild(StringList cli_args)
{ {
D_TagList src_input_files = { 0 }; D_TagList src_input_files = { 0 };
{ {
D_Tag src_dir = D_TagFromPath(&arena, Lit("src"), D_TagKind_Dir); D_Tag src_dir = D_TagFromPath(arena, Lit("src"), D_TagKind_Dir);
D_TagList src_dir_files = D_GetDirContents(&arena, src_dir); D_TagList src_dir_files = D_GetDirContents(arena, src_dir);
for (D_TagListNode *n = src_dir_files.first; n; n = n->next) { for (D_TagListNode *n = src_dir_files.first; n; n = n->next) {
Bool ignore = true; Bool ignore = true;
@ -607,14 +586,14 @@ void OnBuild(StringList cli_args)
} }
if (!ignore) { if (!ignore) {
D_TagListAppend(&arena, &src_input_files, file); D_TagListAppend(arena, &src_input_files, file);
} }
} }
} }
{ {
String c_compile_args_fmt = StringFromStringLists(&arena, Lit(" "), c_compile_args, compile_warnings, compile_and_link_args, compile_args); String c_compile_args_fmt = StringFromStringLists(arena, Lit(" "), c_compile_args, compile_warnings, compile_and_link_args, compile_args);
String cpp_compile_args_fmt = StringFromStringLists(&arena, Lit(" "), cpp_compile_args, compile_warnings, compile_and_link_args, compile_args); String cpp_compile_args_fmt = StringFromStringLists(arena, Lit(" "), cpp_compile_args, compile_warnings, compile_and_link_args, compile_args);
for (D_TagListNode *n = src_input_files.first; n; n = n->next) { for (D_TagListNode *n = src_input_files.first; n; n = n->next) {
D_Tag file = n->tag; D_Tag file = n->tag;
String path = file.full_path; String path = file.full_path;
@ -626,27 +605,27 @@ void OnBuild(StringList cli_args)
D_Tag dep_file; D_Tag dep_file;
{ {
String name_no_extension = StringPathNoExtension(name); String name_no_extension = StringPathNoExtension(name);
String dep_file_path = StringF(&arena, Lit("%F/%F.%F"), FmtStr(out_obj_dir_path), FmtStr(name_no_extension), FmtStr(dep_file_extension)); String dep_file_path = StringF(arena, Lit("%F/%F.%F"), FmtStr(out_obj_dir_path), FmtStr(name_no_extension), FmtStr(dep_file_extension));
dep_file = D_TagFromPath(&arena, dep_file_path, D_TagKind_DepFile); dep_file = D_TagFromPath(arena, dep_file_path, D_TagKind_DepFile);
} }
D_Tag obj_file; D_Tag obj_file;
{ {
String name_no_extension = StringPathNoExtension(name); String name_no_extension = StringPathNoExtension(name);
String obj_file_path = StringF(&arena, Lit("%F/%F.%F"), FmtStr(out_obj_dir_path), FmtStr(name_no_extension), FmtStr(obj_file_extension)); String obj_file_path = StringF(arena, Lit("%F/%F.%F"), FmtStr(out_obj_dir_path), FmtStr(name_no_extension), FmtStr(obj_file_extension));
obj_file = D_TagFromPath(&arena, obj_file_path, D_TagKind_File); obj_file = D_TagFromPath(arena, obj_file_path, D_TagKind_File);
} }
D_AddDependency(obj_file, file); D_AddDependency(obj_file, file);
D_AddDependency(obj_file, dep_file); D_AddDependency(obj_file, dep_file);
if (IsDirty(obj_file)) { if (IsDirty(obj_file)) {
String comp_cmd_fmt = is_c ? c_compile_args_fmt : cpp_compile_args_fmt; String comp_cmd_fmt = is_c ? c_compile_args_fmt : cpp_compile_args_fmt;
String comp_cmd = StringF(&arena, comp_cmd_fmt, FmtStr(file.full_path), FmtStr(obj_file.full_path)); String comp_cmd = StringF(arena, comp_cmd_fmt, FmtStr(file.full_path), FmtStr(obj_file.full_path));
String step_name = StringF(&arena, Lit("%F -> %F"), FmtStr(name), FmtStr(D_GetName(obj_file))); String step_name = StringF(arena, Lit("%F -> %F"), FmtStr(name), FmtStr(D_GetName(obj_file)));
StepListAppend(&arena, &build_steps, step_name, comp_cmd, true); StepListAppend(&build_steps, step_name, comp_cmd, true);
} }
D_TagListAppend(&arena, &link_files, obj_file); D_TagListAppend(arena, &link_files, obj_file);
} }
} }
} }
@ -662,16 +641,16 @@ void OnBuild(StringList cli_args)
StringList link_files_quoted_list = { 0 }; StringList link_files_quoted_list = { 0 };
for (D_TagListNode *n = link_files.first; n; n = n->next) { for (D_TagListNode *n = link_files.first; n; n = n->next) {
D_Tag file = n->tag; D_Tag file = n->tag;
String path = StringF(&arena, Lit("\"%F\""), FmtStr(file.full_path)); String path = StringF(arena, Lit("\"%F\""), FmtStr(file.full_path));
StringListAppend(&arena, &link_files_quoted_list, path); StringListAppend(arena, &link_files_quoted_list, path);
D_AddDependency(executable_file, file); D_AddDependency(executable_file, file);
} }
link_files_str = StringFromStringList(&arena, Lit(" "), link_files_quoted_list); link_files_str = StringFromStringList(arena, Lit(" "), link_files_quoted_list);
} }
if (link_files_str.len > 0) { if (link_files_str.len > 0) {
String link_args_fmt = StringFromStringLists(&arena, Lit(" "), link_args, link_warnings, compile_and_link_args); String link_args_fmt = StringFromStringLists(arena, Lit(" "), link_args, link_warnings, compile_and_link_args);
String cmd = StringF(&arena, link_args_fmt, FmtStr(link_files_str), FmtStr(executable_file.full_path)); String cmd = StringF(arena, link_args_fmt, FmtStr(link_files_str), FmtStr(executable_file.full_path));
StepListAppend(&arena, &build_steps, Lit("Linking"), cmd, true); StepListAppend(&build_steps, Lit("Linking"), cmd, true);
} }
} }
@ -692,7 +671,7 @@ void OnBuild(StringList cli_args)
if (cmd.len > 0) { if (cmd.len > 0) {
SH_PrintF(Lit("[%F/%F] %F\n"), FmtI64(step_i), FmtI64(step_count), FmtStr(n->name)); SH_PrintF(Lit("[%F/%F] %F\n"), FmtI64(step_i), FmtI64(step_count), FmtStr(n->name));
//SH_PrintF(Lit("%F\n"), FmtStr(cmd)); //SH_PrintF(Lit("%F\n"), FmtStr(cmd));
SH_CommandResult result = SH_RunCommandCaptureOutput(&arena, cmd, true); SH_CommandResult result = SH_RunCommandCaptureOutput(arena, cmd, true);
if (!n->silence_if_success || result.error != 0) { if (!n->silence_if_success || result.error != 0) {
SH_PrintF(Lit("%F\n"), FmtStr(result.output)); SH_PrintF(Lit("%F\n"), FmtStr(result.output));
} }