Răsfoiți Sursa

* fix compilation by moving wrongly placed SYSTEMEXCEPTIONDEBUG defines

git-svn-id: trunk@8699 -
Tomas Hajny 18 ani în urmă
părinte
comite
54caaf4335
1 a modificat fișierele cu 3 adăugiri și 3 ștergeri
  1. 3 3
      rtl/os2/system.pas

+ 3 - 3
rtl/os2/system.pas

@@ -279,8 +279,10 @@ var
  Res: cardinal;
  Res: cardinal;
  Err: byte;
  Err: byte;
  Must_Reset_FPU: boolean;
  Must_Reset_FPU: boolean;
+{$IFDEF SYSTEMEXCEPTIONDEBUG}
  CurSS: cardinal;
  CurSS: cardinal;
  B: byte;
  B: byte;
+{$ENDIF SYSTEMEXCEPTIONDEBUG}
 begin
 begin
 {$ifdef SYSTEMEXCEPTIONDEBUG}
 {$ifdef SYSTEMEXCEPTIONDEBUG}
  if IsConsole then
  if IsConsole then
@@ -411,7 +413,6 @@ begin
       end;
       end;
 {$endif SYSTEMEXCEPTIONDEBUG}
 {$endif SYSTEMEXCEPTIONDEBUG}
     end;
     end;
-{$ifdef SYSTEMEXCEPTIONDEBUG}
   end
   end
  else
  else
   if (Report^.Exception_Num = Xcpt_Signal) and
   if (Report^.Exception_Num = Xcpt_Signal) and
@@ -432,10 +433,9 @@ begin
      DosAcknowledgeSignalException (Report^.Parameters [0]);
      DosAcknowledgeSignalException (Report^.Parameters [0]);
     end
     end
    else
    else
-    Err := 217
+    Err := 217;
 {$IFDEF SYSTEMEXCEPTIONDEBUG}
 {$IFDEF SYSTEMEXCEPTIONDEBUG}
    end
    end
-{$ENDIF SYSTEMEXCEPTIONDEBUG}
   else
   else
    if IsConsole then
    if IsConsole then
     begin
     begin