summaryrefslogtreecommitdiff
path: root/Donjon/src/ACRMAC.f
diff options
context:
space:
mode:
Diffstat (limited to 'Donjon/src/ACRMAC.f')
-rw-r--r--Donjon/src/ACRMAC.f1
1 files changed, 1 insertions, 0 deletions
diff --git a/Donjon/src/ACRMAC.f b/Donjon/src/ACRMAC.f
index 37f5444..7705ca3 100644
--- a/Donjon/src/ACRMAC.f
+++ b/Donjon/src/ACRMAC.f
@@ -491,6 +491,7 @@
ISTATE(4)=NF
ISTATE(5)=NED
ISTATE(6)=ITRANC
+ IF(LMAKE1(6)) ISTATE(10)=1
CALL LCMPUT(IPMAC,'STATE-VECTOR',NSTATE,1,ISTATE)
*----
* INCLUDE LEAKAGE IN THE MACROLIB (USED ONLY FOR NON-REGRESSION TESTS)