Explorar o código

added a dummy implementation of GetLastOSError

git-svn-id: trunk@24652 -
Károly Balogh %!s(int64=12) %!d(string=hai) anos
pai
achega
24e2bd4364
Modificáronse 1 ficheiros con 6 adicións e 0 borrados
  1. 6 0
      rtl/morphos/sysutils.pp

+ 6 - 0
rtl/morphos/sysutils.pp

@@ -26,6 +26,7 @@ interface
 {$H+}
 
 {$DEFINE HAS_SLEEP}
+{$DEFINE HAS_OSERROR}
 { Include platform independent interface part }
 {$i sysutilh.inc}
 
@@ -561,6 +562,11 @@ begin
 {  Result:=StrError(ErrorCode);}
 end;
 
+function GetLastOSError: Integer;
+begin
+    result:=-1;
+end;
+
 {****************************************************************************
                               OS utility functions
 ****************************************************************************}