Changeset 758

Timestamp:

Apr 2, 2004, 10:08:24 PM (21 years ago)

Author:

Gary Byers

Message:

Use readlink() to determine executable pathname under Linux. Use PATH_MAX
on both platforms.

File:

• trunk/ccl/lisp-kernel/pmcl-kernel.c (modified) (1 diff)

trunk/ccl/lisp-kernel/pmcl-kernel.c

@@ -920 +920 @@
 #endif
 #ifdef LINUX
-#error use readlink() on /proc/self/exe
+  char exepath[PATH_MAX], *p;
+  int n;
+
+  if ((n = readlink("/proc/self/exe", exepath, PATH_MAX)) > 0) {
+    p = malloc(n+1);
+    bcopy(exepath,p,n);
+    p[n]=0;
+    return p;
+  }
+  return argv0;
 #endif
 }