From 2af296a3d2290c96090520c47d35273e40521891 Mon Sep 17 00:00:00 2001
From: Douglas Clowes <dcl@ansto.gov.au>
Date: Mon, 10 Dec 2012 14:53:13 +1100
Subject: [PATCH] use saved argv0 - not sure if needed

---
 macro.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/macro.c b/macro.c
index b3a3e03a..7924c9bf 100644
--- a/macro.c
+++ b/macro.c
@@ -323,6 +323,8 @@ Tcl_Interp *MacroInit(SicsInterp * pSics)
   assert(pSics);
 
   /* create interpreter and unknown */
+  extern const char *argv0;
+  Tcl_FindExecutable(argv0);
   pInter = Tcl_CreateInterp();
   pUnknown = (struct __SicsUnknown *) malloc(sizeof(struct __SicsUnknown));
   if ((!pInter) || (!pUnknown)) {