Browse Source

* fixed typo in MPW error msg

olle 20 years ago
parent
commit
c9a59bbdfd
1 changed files with 5 additions and 2 deletions
  1. 5 2
      compiler/comphook.pas

+ 5 - 2
compiler/comphook.pas

@@ -297,7 +297,7 @@ begin
      {MPW style error}
      {MPW style error}
      if status.currentcolumn>0 then
      if status.currentcolumn>0 then
        hs:='File "'+status.currentsource+'"; Line '+tostr(status.currentline)+
        hs:='File "'+status.currentsource+'"; Line '+tostr(status.currentline)+
-         ' # (' + tostr(status.currentcolumn) + ')' +hs+' '+s
+         ' # (' + tostr(status.currentcolumn) + ') ' +hs+' '+s
      else
      else
        hs:='File "'+status.currentsource+'"; Line '+tostr(status.currentline)+' #'+hs+' '+s;
        hs:='File "'+status.currentsource+'"; Line '+tostr(status.currentline)+' #'+hs+' '+s;
      {$endif}
      {$endif}
@@ -398,7 +398,10 @@ end;
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.33  2004-12-28 01:39:07  olle
+  Revision 1.34  2004-12-28 22:02:05  olle
+    * fixed typo in MPW error msg
+
+  Revision 1.33  2004/12/28 01:39:07  olle
     + added support for MPW error messages
     + added support for MPW error messages
     + added support for cooperative multitasking under MPW
     + added support for cooperative multitasking under MPW