bugfix: correcly obtain self path on Solaris.

* configure: Add detection for getexecname.

* sysif.c (getcwd_wrap): Change static function to external.

* sysif.h (getcwd_wrap): Declared.

* txr.c (get_self_path): New implementation for Solaris
using getexecname, which requires us to prepend the current
directory name if the result is a relative path.

1 files changed, 3 insertions, 0 deletions

diff --git a/sysif.h b/sysif.h
index a9c13cd5..bae55147 100644
--- a/sysif.h
+++ b/sysif.h
@@ -69,4 +69,7 @@ INLINE void repress_privilege(void) { }
 INLINE void drop_privilege(void) { }
 INLINE void simulate_setuid_setgid(val open_script) { }
 #endif
+#if HAVE_UNISTD_H
+val getcwd_wrap(void);
+#endif
 void sysif_init(void);