@@ -17,7 +17,10 @@ unit System;
interface
{$define FPC_IS_SYSTEM}
+
+{$IFNDEF FPC_DISABLE_MONITOR}
{$DEFINE SYSTEM_HAS_FEATURE_MONITOR}
+{$ENDIF}
{$linklib m}
@@ -24,7 +24,9 @@ Unit System;
Interface
{$define FPC_USE_SIGPROCMASK}
{$define FPC_USE_SIGALTSTACK}
@@ -25,7 +25,10 @@ Unit System;
{*****************************************************************************}
{$define HAS_CMDLINE}
{$define USE_NOTHREADMANAGER}
@@ -15,7 +15,10 @@
unit System;
{$ifdef SYSTEMDEBUG}
{$define SYSTEMEXCEPTIONDEBUG}
@@ -17,7 +17,9 @@ unit System;
@@ -18,7 +18,10 @@ unit system;
{$ifdef FPC_WASM_THREADS}
{$define DISABLE_NO_THREAD_MANAGER}
@@ -14,11 +14,13 @@
**********************************************************************}
-interface
-
+interface
{ $define SYSTEMEXCEPTIONDEBUG}