fix: fatal errors

fatal errors with wasplib no longer loop until out of memory if they happen during SRL.Setup
Torwent · Jul 24, 2024 · f4bff8b · f4bff8b
1 parent cea7649
commit f4bff8b
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/utils/base.simba b/utils/base.simba
@@ -39,6 +39,9 @@ end;
 
 procedure TSRLBaseRecord.Fatal(Text: String); constref; override;
 begin
+  if not SRL.IsSetup then
+    inherited;
+
   Text := SRL.TimeStamp + ':[' + Name + ']:[Fatal]: ' + Text;
   WriteLn(Text);
   Self.AddToLog(Text);