fpc/tests/tbs0110.pp
1998-12-02 13:05:01 +00:00

8 lines
74 B
ObjectPascal

uses aasm;
Begin
Case Pai(hp1)^.typ Of
ait_instruction:
End
End.