Decreased max. number of messages.

dabamos · May 4, 2024 · dea5951 · dea5951
1 parent a7fb6d0
commit dea5951
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/dm_mqueue.f90 b/src/dm_mqueue.f90
@@ -15,7 +15,7 @@ module dm_mqueue
 
     integer, parameter, public :: MQUEUE_MODE     = int(o'0644') !! Default permissions (octal).
     integer, parameter, public :: MQUEUE_NAME_LEN = ID_LEN + 1   !! Maximum message queue identifier length.
-    integer, parameter, public :: MQUEUE_MAX_MSG  = 16           !! Maximum number of messages in queue.
+    integer, parameter, public :: MQUEUE_MAX_MSG  = 10           !! Maximum number of messages in queue.
 
     integer, parameter, public :: MQUEUE_RDONLY = 0 !! Read-only access.
     integer, parameter, public :: MQUEUE_WRONLY = 1 !! Write-only access.

diff --git a/test/dmtestmqueue.f90 b/test/dmtestmqueue.f90
@@ -23,7 +23,7 @@ program dmtestmqueue
     integer,          parameter :: NTESTS    = 2
 
     character(len=*), parameter :: MQ_NAME    = 'dmtest'     !! Message queue name (without leading `/`).
-    integer,          parameter :: MQ_MAX_MSG = 32           !! Maximum number of messages in queue.
+    integer,          parameter :: MQ_MAX_MSG = 10           !! Maximum number of messages in queue.
     integer,          parameter :: MQ_MODE    = int(o'0644') !! Access permissions (octal).
 
     logical         :: stats(NTESTS)