tb0183.pp 92 B

1234567891011
  1. { %OPT=-Sew -vw }
  2. { %fail }
  3. {$T-}
  4. var
  5. i: integer;
  6. p: pointer;
  7. begin
  8. p := @i+5;
  9. end.