Add tfile option for libraries as well

modula3 · Apr 4, 2023 · 525baf4 · 525baf4
1 parent 38e312a
commit 525baf4
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/m3-sys/cm3/src/M3Build.m3 b/m3-sys/cm3/src/M3Build.m3
@@ -1469,6 +1469,10 @@ PROCEDURE DoLibrary (m: QMachine.T;  <*UNUSED*> n_args: INTEGER)
     lib_a   := M3Path.Join (NIL, name, UK.M3LIB);
     lib_m3x := M3Path.Join (NIL, name, UK.LIBX);
     IF (t.mode = MM.Build) THEN
+      IF GetConfigBool (t, "TFILE") THEN
+        DoGenTFile(t,0);
+        RETURN;
+      END;
       Builder.BuildLib (name, t.units, SysLibs (t), t.build_shared, t);
       InstallDerived (t, lib_a);
       InstallDerived (t, lib_m3x);