* minor update of the GetLastOSError support infrastructure

git-svn-id: trunk@29179 -

rtl/os2/sysutils.pp

@@ -977,8 +977,7 @@ Initialization
   InitInternational;    { Initialize internationalization settings }
   OnBeep:=@SysBeep;
   LastOSError := 0;
-  OrigOSErrorWatch := OSErrorWatch;
-  SetOSErrorTracking (@TrackLastOSError);
+  OrigOSErrorWatch := TOSErrorWatch (SetOSErrorTracking (@TrackLastOSError));
 Finalization
   DoneExceptions;
 end.