summaryrefslogtreecommitdiff
path: root/Donjon/src/PCRMAC.f
diff options
context:
space:
mode:
authorAlain Hebert <alainhebert@Alains-MacBook-Pro.local>2025-12-21 19:25:34 -0500
committerAlain Hebert <alainhebert@Alains-MacBook-Pro.local>2025-12-21 19:25:34 -0500
commit33730217cfd6de8a38c93c2400265e4025ab404a (patch)
treeed40c4131e0c1b4493183936f34d2233a7ec4cfe /Donjon/src/PCRMAC.f
parent5c0d4cce527b0d42dc794a475550783ea846b30a (diff)
#20: Correct more issues in non-regression tests
Diffstat (limited to 'Donjon/src/PCRMAC.f')
-rw-r--r--Donjon/src/PCRMAC.f1
1 files changed, 1 insertions, 0 deletions
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)