Skip to content

Commit ace4e2a

Browse files
committed
Update Pascal binding constants.
1 parent 819a42f commit ace4e2a

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

sources/Z80.pas

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -127,20 +127,20 @@ TZ80 = record
127127
PZ80 = ^TZ80;
128128

129129
const
130-
Z80_OPTION_LD_A_IR_BUG = 1;
131-
Z80_OPTION_OUT_VC_255 = 2;
130+
Z80_OPTION_OUT_VC_255 = 1;
131+
Z80_OPTION_LD_A_IR_BUG = 2;
132132
Z80_OPTION_XQ = 8;
133133
Z80_OPTION_YQ = 32;
134134
Z80_OPTION_HALT_SKIP = 64;
135135
Z80_MODEL_ZILOG_NMOS = (Z80_OPTION_LD_A_IR_BUG or Z80_OPTION_XQ or Z80_OPTION_YQ);
136136
Z80_MODEL_ZILOG_CMOS = (Z80_OPTION_OUT_VC_255 or Z80_OPTION_XQ or Z80_OPTION_YQ);
137137
Z80_MODEL_NEC_NMOS = Z80_OPTION_LD_A_IR_BUG;
138-
Z80_MODEL_ST_CMOS = (Z80_OPTION_LD_A_IR_BUG or Z80_OPTION_YQ);
138+
Z80_MODEL_ST_CMOS = (Z80_OPTION_OUT_VC_255 or Z80_OPTION_LD_A_IR_BUG or Z80_OPTION_YQ);
139139

140-
Z80_REQUEST_SPECIAL_RESET = 1;
141140
Z80_REQUEST_REJECT_NMI = 2;
142141
Z80_REQUEST_NMI = 4;
143142
Z80_REQUEST_INT = 8;
143+
Z80_REQUEST_SPECIAL_RESET = 16;
144144

145145
Z80_RESUME_HALT = 1;
146146
Z80_RESUME_XY = 2;

0 commit comments

Comments
 (0)