Browse Source

* avoid warning during compilation

git-svn-id: trunk@16701 -
Tomas Hajny 14 years ago
parent
commit
d2262b1a41
1 changed files with 1 additions and 1 deletions
  1. 1 1
      utils/rmwait/rmwait.pas

+ 1 - 1
utils/rmwait/rmwait.pas

@@ -395,7 +395,7 @@ begin
 end;
 end;
 
 
 
 
-procedure NewExit; far;
+procedure NewExit; {$IFNDEF FPC} far;{$ENDIF FPC}
 begin
 begin
   ExitProc := OldExit;
   ExitProc := OldExit;
   if (ErrorAddr <> nil) or (ExitCode <> 0) then
   if (ErrorAddr <> nil) or (ExitCode <> 0) then