diff --git a/compiler/ag68kgas.pas b/compiler/ag68kgas.pas index ea9e3a235b..04492788d0 100644 --- a/compiler/ag68kgas.pas +++ b/compiler/ag68kgas.pas @@ -403,9 +403,9 @@ unit ag68kgas; AsmWrite(#9'.long'#9); AsmWritePChar(pai_const_symbol_offset(hp)^.name); if pai_const_symbol_offset(hp)^.offset>0 then - AsmWrite('+'+tostr(pai_const_symbol_offset(hp)^.offset) + AsmWrite('+'+tostr(pai_const_symbol_offset(hp)^.offset)) else if pai_const_symbol_offset(hp)^.offset<0 then - AsmWrite(tostr(pai_const_symbol_offset(hp)^.offset) + AsmWrite(tostr(pai_const_symbol_offset(hp)^.offset)); AsmLn; end; ait_real_64bit : Begin @@ -678,7 +678,10 @@ ait_stab_function_name : funcname:=pai_stab_function_name(hp)^.str; end. { $Log$ - Revision 1.15 1998-10-12 12:20:43 pierre + Revision 1.16 1998-10-12 12:27:44 pierre + * typo error for tai_const_symbol_offset corrected + + Revision 1.15 1998/10/12 12:20:43 pierre + added tai_const_symbol_offset for r : pointer = @var.field; * better message for different arg names on implementation