* set starttime earlier so time stamps don't get messed up

git-svn-id: trunk@6228 -

compiler/compiler.pas

@@ -223,6 +223,9 @@ begin
        ExceptionMask:=GetExceptionMask;
        SetExceptionMask([exInvalidOp, exDenormalized, exZeroDivide,
                          exOverflow, exUnderflow, exPrecision]);
+
+       starttime:=getrealtime;
+
        { Initialize the compiler }
        InitCompiler(cmd);
 
@@ -236,8 +239,6 @@ begin
        WritePathList(general_t_librarypath,librarysearchpath);
        WritePathList(general_t_objectpath,objectsearchpath);
 
-       starttime:=getrealtime;
-
        { Compile the program }
   {$ifdef PREPROCWRITE}
        if parapreprocess then