Skip to content

Commit 5947ca6

Browse files
committed
Make the main register pairs 32-bit aligned in the pascal binding as well.
I forgot to commit these changes in 3785101.
1 parent 05d69ea commit 5947ca6

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

sources/Z80.pas

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -105,12 +105,12 @@ TZ80 = record
105105
xy: TZ80RegisterPair;
106106
memptr: TZ80RegisterPair;
107107
af: TZ80RegisterPair;
108-
bc: TZ80RegisterPair;
109-
de: TZ80RegisterPair;
110-
hl: TZ80RegisterPair;
111108
af_: TZ80RegisterPair;
109+
bc: TZ80RegisterPair;
112110
bc_: TZ80RegisterPair;
111+
de: TZ80RegisterPair;
113112
de_: TZ80RegisterPair;
113+
hl: TZ80RegisterPair;
114114
hl_: TZ80RegisterPair;
115115
r: UInt8;
116116
i: UInt8;

0 commit comments

Comments
 (0)