Browse Source

added a dummy implementation of GetLastOSError

git-svn-id: trunk@24652 -
Károly Balogh 12 years ago
parent
commit
24e2bd4364
1 changed files with 6 additions and 0 deletions
  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
 ****************************************************************************}