Second try to fix tcl issue in allParam for Suse 13.1

diff --git a/allParam/tcl/tclParam.c b/allParam/tcl/tclParam.c
index 71efd95a7f4eab0d719f306d06a0928d5b68a419..5252040171095a991e1180ea1e586d49fd8ef1c4 100644 (file)
--- a/allParam/tcl/tclParam.c
+++ b/allParam/tcl/tclParam.c
@@ -19,12 +19,14 @@ static const char rcsId[] = "$Header: /misc/hadesprojects/daq/cvsroot/eventbuild
 #include <sys/stat.h>
 #include <sys/utsname.h>
 
+/* required for tcl>v8.6 thanks to Christian Simon for this hint:*/
+#define USE_INTERP_RESULT
+
+
 #include <tcl.h>
 
 #include "../include/allParam.h"
 
-/* required for tcl>v8.6 thanks to Christian Simon for this hint:*/
-#define USE_INTERP_RESULT
 
 /* Allow for registration of a user routine for output of error
  * messages and provide a default one