summaryrefslogtreecommitdiff
path: root/otherlibs/unix/getcwd.c
diff options
context:
space:
mode:
Diffstat (limited to 'otherlibs/unix/getcwd.c')
-rw-r--r--otherlibs/unix/getcwd.c33
1 files changed, 0 insertions, 33 deletions
diff --git a/otherlibs/unix/getcwd.c b/otherlibs/unix/getcwd.c
deleted file mode 100644
index 7bbddf12df..0000000000
--- a/otherlibs/unix/getcwd.c
+++ /dev/null
@@ -1,33 +0,0 @@
-#include <mlvalues.h>
-#include <alloc.h>
-#include "unix.h"
-
-#ifdef HAS_GETCWD
-
-#include <sys/param.h>
-
-value unix_getcwd() /* ML */
-{
- char buff[MAXPATHLEN];
- if (getcwd(buff, sizeof(buff)) == 0) uerror("getcwd", NULL);
- return copy_string(buff);
-}
-
-#else
-#ifdef HAS_GETWD
-
-#include <sys/param.h>
-
-value unix_getcwd()
-{
- char buff[MAXPATHLEN];
- if (getwd(buff) == 0) uerror("getcwd", buff);
- return copy_string(buff);
-}
-
-#else
-
-value unix_getcwd() { invalid_argument("getcwd not implemented"); }
-
-#endif
-#endif