2
{ Old file: tbs0316.pp }
7
procedure test(b : longint); assembler;
9
splitlong = packed record b1, b2, b3, b4 : Byte; end;
11
mov splitlong(b).b2, al
16
procedure test2(b : longint); assembler;
18
splitlong = packed record b1, b2, b3, b4 : Byte; end;
20
movb splitlong(b).b2, %al