diff --git a/rtl/embedded/sysdir.inc b/rtl/embedded/sysdir.inc
index b89c4a2193..f65b0c8670 100644
--- a/rtl/embedded/sysdir.inc
+++ b/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;