pike.git/ NT/ tools/ rntcl

2000-08-25

2000-08-25 17:08:30 by Martin Stjernholm <mast@lysator.liu.se>

• 6a444321b71c40364419fb1556f3ff6e45cdbfff (3 lines) (+2/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

Make remote jump scripts that handles being linked to.

Rev: NT/tools/rntcc:1.25
Rev: NT/tools/rntcl:1.8
Rev: NT/tools/rntecl:1.9

308:    "#!/usr/local/bin/pike\n"    "inherit \""+find_lib_location()+"\";\n"    "int main(int argc, string *argv) {\n" -  "argv[0]+=\".exe\";\n" +  "argv[0]=" + sprintf ("%O", output + ".exe") + ";\n"    "argv[0]=getenv(\"NTDRIVE\")+fixpath(combine_path(getcwd(),argv[0]));\n"    " int ret=silent_do_cmd(argv);\n"    " exit(ret);\n"