From e80ce5f61f3857db8956c81de525d41b86aa2ed0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Micha=C3=ABl=20Van=20Canneyt?= Date: Tue, 18 Jun 2024 14:51:34 +0200 Subject: [PATCH] * Allow to disable monitor --- rtl/aix/system.pp | 3 +++ rtl/bsd/system.pp | 2 ++ rtl/linux/system.pp | 3 +++ rtl/nativent/system.pp | 3 +++ rtl/solaris/system.pp | 2 ++ rtl/wasi/system.pp | 3 +++ rtl/win32/system.pp | 3 +++ rtl/win64/system.pp | 6 ++++-- rtl/wince/system.pp | 3 +++ 9 files changed, 26 insertions(+), 2 deletions(-) diff --git a/rtl/aix/system.pp b/rtl/aix/system.pp index 0b00a2805f..a638107dab 100644 --- a/rtl/aix/system.pp +++ b/rtl/aix/system.pp @@ -17,7 +17,10 @@ unit System; interface {$define FPC_IS_SYSTEM} + +{$IFNDEF FPC_DISABLE_MONITOR} {$DEFINE SYSTEM_HAS_FEATURE_MONITOR} +{$ENDIF} {$linklib m} diff --git a/rtl/bsd/system.pp b/rtl/bsd/system.pp index 52e654ecfa..5a4aa1d645 100644 --- a/rtl/bsd/system.pp +++ b/rtl/bsd/system.pp @@ -24,7 +24,9 @@ Unit System; Interface +{$IFNDEF FPC_DISABLE_MONITOR} {$DEFINE SYSTEM_HAS_FEATURE_MONITOR} +{$ENDIF} {$define FPC_USE_SIGPROCMASK} {$define FPC_USE_SIGALTSTACK} diff --git a/rtl/linux/system.pp b/rtl/linux/system.pp index 5aea042dd8..c939228913 100644 --- a/rtl/linux/system.pp +++ b/rtl/linux/system.pp @@ -25,7 +25,10 @@ Unit System; interface {*****************************************************************************} +{$IFNDEF FPC_DISABLE_MONITOR} {$DEFINE SYSTEM_HAS_FEATURE_MONITOR} +{$ENDIF} + {$define FPC_IS_SYSTEM} {$define HAS_CMDLINE} {$define USE_NOTHREADMANAGER} diff --git a/rtl/nativent/system.pp b/rtl/nativent/system.pp index 9384345d8a..9cde04ce75 100644 --- a/rtl/nativent/system.pp +++ b/rtl/nativent/system.pp @@ -15,7 +15,10 @@ unit System; interface +{$IFNDEF FPC_DISABLE_MONITOR} {$DEFINE SYSTEM_HAS_FEATURE_MONITOR} +{$ENDIF} + {$define FPC_IS_SYSTEM} {$ifdef SYSTEMDEBUG} {$define SYSTEMEXCEPTIONDEBUG} diff --git a/rtl/solaris/system.pp b/rtl/solaris/system.pp index a624c8d8fd..5c9343808d 100644 --- a/rtl/solaris/system.pp +++ b/rtl/solaris/system.pp @@ -17,7 +17,9 @@ unit System; interface +{$IFNDEF FPC_DISABLE_MONITOR} {$DEFINE SYSTEM_HAS_FEATURE_MONITOR} +{$ENDIF} {$define FPC_IS_SYSTEM} {$linklib m} diff --git a/rtl/wasi/system.pp b/rtl/wasi/system.pp index 1ba226f4c6..e5d6937660 100644 --- a/rtl/wasi/system.pp +++ b/rtl/wasi/system.pp @@ -18,7 +18,10 @@ unit system; interface +{$IFNDEF FPC_DISABLE_MONITOR} {$DEFINE SYSTEM_HAS_FEATURE_MONITOR} +{$ENDIF} + {$define FPC_IS_SYSTEM} {$ifdef FPC_WASM_THREADS} {$define DISABLE_NO_THREAD_MANAGER} diff --git a/rtl/win32/system.pp b/rtl/win32/system.pp index 49d403e380..d8f65f7a4a 100644 --- a/rtl/win32/system.pp +++ b/rtl/win32/system.pp @@ -17,7 +17,10 @@ unit System; interface +{$IFNDEF FPC_DISABLE_MONITOR} {$DEFINE SYSTEM_HAS_FEATURE_MONITOR} +{$ENDIF} + {$define FPC_IS_SYSTEM} {$ifdef SYSTEMDEBUG} {$define SYSTEMEXCEPTIONDEBUG} diff --git a/rtl/win64/system.pp b/rtl/win64/system.pp index de464d1590..9b547d255f 100644 --- a/rtl/win64/system.pp +++ b/rtl/win64/system.pp @@ -14,11 +14,13 @@ **********************************************************************} unit System; + interface - - +{$IFNDEF FPC_DISABLE_MONITOR} {$DEFINE SYSTEM_HAS_FEATURE_MONITOR} +{$ENDIF} + {$define FPC_IS_SYSTEM} { $define SYSTEMEXCEPTIONDEBUG} diff --git a/rtl/wince/system.pp b/rtl/wince/system.pp index 72dcc2ec19..3ef40812de 100644 --- a/rtl/wince/system.pp +++ b/rtl/wince/system.pp @@ -17,7 +17,10 @@ unit System; interface +{$IFNDEF FPC_DISABLE_MONITOR} {$DEFINE SYSTEM_HAS_FEATURE_MONITOR} +{$ENDIF} + {$define FPC_IS_SYSTEM} {$ifdef SYSTEMDEBUG} {$define SYSTEMEXCEPTIONDEBUG}