diff --git a/compiler/m68k/ra68kmot.pas b/compiler/m68k/ra68kmot.pas index a25d1927f0..8b09acefd0 100644 --- a/compiler/m68k/ra68kmot.pas +++ b/compiler/m68k/ra68kmot.pas @@ -221,6 +221,7 @@ const var token: tasmtoken; forcelabel: boolean; + s : string; begin forcelabel := FALSE; actasmpattern :=''; @@ -504,7 +505,8 @@ const end; else begin - Message(scan_f_illegal_char); + s:=c; + Message2(scan_f_illegal_char,s,'$'+hexstr(ord(c),2)); end; end; { end case }