Don't print a whole bunch of spaces for an error message if the column number is 0.

This could happen, e.g., for a "'}' expected" error at end-of-file. It occurred because the 0..maxint type being used caused the Pascal compiler to use unsigned comparisons, which were inappropriate here.

Scanner.pas

@@ -469,7 +469,7 @@ procedure WriteLine;
 {   chPtr - points to the end of line character                 }
 
 var
-   cl: 0..maxint;                       {column number loop index}
+   cl: integer;                         {column number loop index}
    cp: ptr;                             {work pointer}
    i: 1..maxErr;                        {error loop index}
    msg: stringPtr;                      {pointer to the error message}