tb0194.pp 301 B

12345678910111213141516171819
  1. { %CPU=i386 }
  2. { Old file: tbs0228.pp }
  3. { Asm, wrong warning for size OK 0.99.11 (PFV) }
  4. PROGRAM Buggy;
  5. {$ASMMODE ATT}
  6. PROCEDURE XX; ASSEMBLER;
  7. TYPE
  8. TabType=ARRAY[0..3] OF BYTE;
  9. CONST
  10. TabCent : TabType = (0,6,4,2);
  11. ASM
  12. movzbl TabCent(,%eax),%ebx
  13. END;
  14. BEGIN
  15. END.