# HG changeset patch # User koda # Date 1461443538 14400 # Node ID 2c21bc80c95d2eb9dee4c0a7a7fe6fe4410d1d1e # Parent 8fca9fd3135742ee4e29d7a90847e8527f521ace Implement GetCurrentDir in the c rtl diff -r 8fca9fd31357 -r 2c21bc80c95d hedgewars/pas2cRedo.pas --- a/hedgewars/pas2cRedo.pas Sat Apr 23 16:18:07 2016 -0400 +++ b/hedgewars/pas2cRedo.pas Sat Apr 23 16:32:18 2016 -0400 @@ -113,4 +113,5 @@ Load_GL_VERSION_2_0 : procedure; + GetCurrentDir : function : PChar; diff -r 8fca9fd31357 -r 2c21bc80c95d project_files/hwc/rtl/fileio.c --- a/project_files/hwc/rtl/fileio.c Sat Apr 23 16:18:07 2016 -0400 +++ b/project_files/hwc/rtl/fileio.c Sat Apr 23 16:32:18 2016 -0400 @@ -8,9 +8,11 @@ #include #include #include +#include io_result_t IOResult; int FileMode; +char cwd[1024]; static void init(File f) { f->fp = NULL; @@ -219,6 +221,17 @@ return false; } +char * fpcrtl_getCurrentDir(void) { + + IOResult = IO_NO_ERROR; + + if (getcwd(cwd, sizeof(cwd)) != NULL) + return cwd; + + IOResult = IO_ERROR_DUMMY; + return ""; +} + void __attribute__((overloadable)) fpcrtl_flush(Text f) { fflush(f->fp); } diff -r 8fca9fd31357 -r 2c21bc80c95d project_files/hwc/rtl/fileio.h --- a/project_files/hwc/rtl/fileio.h Sat Apr 23 16:18:07 2016 -0400 +++ b/project_files/hwc/rtl/fileio.h Sat Apr 23 16:32:18 2016 -0400 @@ -75,4 +75,7 @@ bool fpcrtl_fileExists(string255 filename); #define fpcrtl_FileExists fpcrtl_fileExists +char * fpcrtl_getCurrentDir(void); +#define fpcrtl_GetCurrentDir fpcrtl_getCurrentDir + #endif /* FILEIO_H_ */