Mercurial > octave

diff liboctave/lo-sysdep.cc @ 3069:db6d57d718f7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1997-07-10 23:34:03 by jwe]
author jwe
date Thu, 10 Jul 1997 23:34:07 +0000
parents 66ef74ee5d9f
children 92394a9e4784
line wrap: on
line diff
--- a/liboctave/lo-sysdep.cc	Tue Jul 08 02:18:21 1997 +0000
+++ b/liboctave/lo-sysdep.cc	Thu Jul 10 23:34:07 1997 +0000
@@ -47,22 +47,30 @@
 #include <sys/utsname.h>
 #endif
 
+#include "lo-error.h"
 #include "pathlen.h"
 
 string
 octave_getcwd (void)
 {
   string retval;
+
   char buf[MAXPATHLEN];
 
+  char *tmp = 0;
+
 #if defined (__EMX__)
-  char *tmp = _getcwd2 (buf, MAXPATHLEN);
-#else
-  char *tmp = getcwd (buf, MAXPATHLEN);
+  tmp = _getcwd2 (buf, MAXPATHLEN);
+#elif defined (HAVE_GETWD)
+  tmp = getwd (buf);
+#elif defined (HAVE_GETCWD)
+  tmp = getcwd (buf, MAXPATHLEN);
 #endif
 
   if (tmp)
     retval = tmp;
+  else
+    (*current_liboctave_error_handler) ("unable to find current directory");
 
   return retval;
 }