* fix sysdir.inc dummy for embedded targets

git-svn-id: trunk@18868 -

rtl/embedded/sysdir.inc

@@ -5,7 +5,7 @@
     Low level directory functions
     GBA does not have any drive, so no directory handling is needed.
     Copyright (c) 2006 by Francesco Lombardi
-    
+
     See the file COPYING.FPC, included in this distribution,
     for details about the copyright.
 
@@ -19,20 +19,24 @@
 {*****************************************************************************
                            Directory Handling
 *****************************************************************************}
-procedure mkdir(const s : string);[IOCheck];
+procedure mkdir(s: pchar;len:sizeuint);[IOCheck];
 begin
+  InOutRes:=3;
 end;
 
-procedure rmdir(const s : string);[IOCheck];
+procedure rmdir(s: pchar;len:sizeuint);[IOCheck];
 begin
+  InOutRes:=3;
 end;
 
-procedure chdir(const s : string);[IOCheck];
+procedure chdir(s: pchar;len:sizeuint);[IOCheck];
 begin
+  InOutRes:=3;
 end;
 
 procedure GetDir (DriveNr: byte; var Dir: ShortString);
 begin
+  InOutRes:=3;
 end;