M2compiler-V3/compiler/tests/t_bad_truncutf.mod

MODULE TBadTruncUtf;
VAR ExitCode : INTEGER;
VAR u : UCHAR;
BEGIN
  u := U'â‚';
  ExitCode := 0
END TBadTruncUtf.