* recompiles again

compiler/comphook.pas

@@ -201,8 +201,8 @@ begin
         else
           hs:=status.currentsource+'('+tostr(status.currentline)
               +','+tostr(status.currentcolumn)+') '+hs;
-      end
 {$ifdef Debug}
+      end
      else
       begin
          if (Level<=V_ShowFile) then
@@ -241,7 +241,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.4  1998-08-18 14:17:08  pierre
+  Revision 1.5  1998-08-18 15:11:51  peter
+    * recompiles again
+
+  Revision 1.4  1998/08/18 14:17:08  pierre
     * bug about assigning the return value of a function to
       a procvar fixed : warning
       assigning a proc to a procvar need @ in FPC mode !!

compiler/scandir.inc

@@ -473,12 +473,12 @@ const
       var
         sw : tlocalswitch;
       begin
-        case t of
 {$ifdef SUPPORT_MMX}
+        case t of
           _DIR_MMX : sw:=cs_mmx;
           _DIR_SATURATION : sw:=cs_mmx_saturation;
-{$endif}
         end;
+{$endif}
         current_scanner^.skipspace;
         if c='-' then
          aktlocalswitches:=aktlocalswitches-[sw]
@@ -720,7 +720,10 @@ const
 
 {
   $Log$
-  Revision 1.19  1998-08-18 09:24:44  pierre
+  Revision 1.20  1998-08-18 15:11:52  peter
+    * recompiles again
+
+  Revision 1.19  1998/08/18 09:24:44  pierre
     * small warning position bug fixed
     * support_mmx switches splitting was missing
     * rhide error and warning output corrected