Explorar o código

rigsc: fix detection of rig bin path more

Kyle P Davis %!s(int64=10) %!d(string=hai) anos
pai
achega
362b1aa167
Modificáronse 1 ficheiros con 6 adicións e 1 borrados
  1. 6 1
      rigsc.446/src/rc_.c

+ 6 - 1
rigsc.446/src/rc_.c

@@ -740,7 +740,12 @@ _L97:
     if (V.batfile == NULL)
       _EscIO(FileNotFound);
     fprintf(V.batfile, "#!/bin/csh -f\n");
-    fprintf(V.batfile, "if !($?rig) set rig=`dirname \"%s\"`\n", getenv("_"));
+
+    char *binpath = realpath(an_argv[0], NULL);
+    if (binpath == NULL) binpath = strdup(getenv("_"));
+    fprintf(V.batfile, "if !($?rig) set rig=`dirname \"%s\"`\n", binpath);
+    free(binpath);
+
     fprintf(V.batfile, "$rig/anrig -p N.TMP\n");
     fprintf(V.batfile, "$rig/genrigd  S -p N.TMP\n");
     fprintf(V.batfile, " cc   -w ");