From 5cc991f03df241fd5ad89b13385906f9fbe40b1c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Thu, 30 Nov 2000 19:19:48 -0800
Subject: [PATCH] fix for symlinks..
Rev: NT/tools/rntecl:1.11
---
NT/tools/rntecl | 8 +++-----
1 file changed, 3 insertions(+), 5 deletions(-)
diff --git a/NT/tools/rntecl b/NT/tools/rntecl
index c2a9cbbe43..4560bb0db3 100755
--- a/NT/tools/rntecl
+++ b/NT/tools/rntecl
@@ -1,7 +1,7 @@
#!/usr/local/bin/pike
// -*- Pike -*-
-// $Id: rntecl,v 1.10 2000/11/21 02:38:22 marcus Exp $
+// $Id: rntecl,v 1.11 2000/12/01 03:19:48 hubbe Exp $
// RNTECL, a front-end to Intel ECL with options similar to GCC
// Written by Fredrik Hubinette & Henrik Grubbstr�m.
@@ -381,10 +381,8 @@ int main(int argc, string *argv)
"int main(int argc, string *argv) {\n"
" if (lower_case(getenv(\"CROSSCOMPILING\")||\"no\") != \"no\")\n"
" exit(1);\n"
- " argv[0]+=\".exe\";\n"
- " argv[0]=getenv(\"NTDRIVE\")+fixpath(combine_path(getcwd(),argv[0]));\n"
- " int ret=silent_do_cmd(argv);\n"
- " exit(ret);\n"
+ " argv[0]=getenv(\"NTDRIVE\")+fixpath(follow_symlinks(combine_path(getcwd(),argv[0]))+\".exe\");\n"
+ " exit(silent_do_cmd(argv));\n"
"}\n");
chmod(output,0755);
}
--
GitLab