t_bad_deref.mod 90 B

123456
  1. MODULE TBadDeref;
  2. VAR x : INTEGER;
  3. VAR ExitCode : INTEGER;
  4. BEGIN
  5. x^ := 1
  6. END TBadDeref.