From 33730217cfd6de8a38c93c2400265e4025ab404a Mon Sep 17 00:00:00 2001
From: Alain Hebert <alainhebert@Alains-MacBook-Pro.local>
Date: Sun, 21 Dec 2025 19:25:34 -0500
Subject: #20: Correct more issues in non-regression tests

---
 Donjon/src/PCRMAC.f | 1 +
 1 file changed, 1 insertion(+)

(limited to 'Donjon/src/PCRMAC.f')

diff --git a/Donjon/src/PCRMAC.f b/Donjon/src/PCRMAC.f
index 06cf5af..d4337f9 100644
--- a/Donjon/src/PCRMAC.f
+++ b/Donjon/src/PCRMAC.f
@@ -422,6 +422,7 @@
       ISTATE(4)=MAX(ISTATE(4),NF)
       IF(LMAKE1(4)) ISTATE(9)=1
       IF(LMAKE1(5)) ISTATE(9)=2
+      IF(LMAKE1(9)) ISTATE(10)=1
       CALL LCMPUT(IPMAC,'STATE-VECTOR',NSTATE,1,ISTATE)
 *----
 *  INCLUDE LEAKAGE IN THE MACROLIB (USED ONLY FOR NON-REGRESSION TESTS)
-- 
cgit v1.2.3