@@ -97,6 +97,12 @@ int mad_trace_level = 0;
97
97
int mad_trace_location = 0 ;
98
98
int mad_trace_fortid = 0 ;
99
99
100
+ str_t mad_release = MKSTR (MAD_VERSION )
101
+ #ifdef _OPENMP
102
+ "_P"
103
+ #endif
104
+ " (" LJ_OS_NAME " " MKSTR (LJ_ARCH_BITS ) ")" ;
105
+
100
106
/* Forward declarations. */
101
107
static int dofile (lua_State * L , str_t name );
102
108
static int dostring (lua_State * L , str_t s , str_t name );
@@ -120,11 +126,6 @@ static int lua_stdin_is_tty (void)
120
126
121
127
static void print_mad_version (void )
122
128
{
123
- str_t rel = MKSTR (MAD_VERSION )
124
- #ifdef _OPENMP
125
- "_P"
126
- #endif
127
- " (" LJ_OS_NAME " " MKSTR (LJ_ARCH_BITS ) ")" ;
128
129
str_t msg =
129
130
" ____ __ ______ ______ | Methodical Accelerator Design\n"
130
131
" / \\/ \\ / _ \\ / _ \\ | release: %s\n"
@@ -138,7 +139,7 @@ static void print_mad_version (void)
138
139
char buf [80 ];
139
140
140
141
strftime (buf , sizeof buf , "%Y-%m-%d %H:%M:%S" , tm );
141
- printf (msg , rel , buf );
142
+ printf (msg , mad_release , buf );
142
143
}
143
144
144
145
LUALIB_API void (mad_error ) (str_t fn , str_t fmt , ...)
@@ -452,9 +453,9 @@ static void mad_setenv (lua_State *L, int no_env)
452
453
#ifndef MADNG_NORUNINFO
453
454
{
454
455
char buf [1024 ];
455
- snprintf (buf , sizeof buf , "echo \"MADNG RUN INFO : %s %s [%s] [%s] [%s]\""
456
+ snprintf (buf , sizeof buf , "echo \"MADNG RUN: %s %s [%s] [%s] [%s]\""
456
457
" | mailx -s '-- madng run info --' %s.%s@%s" ,
457
- "$USER" , progname , "$HOME" , "`date`" , "`uname -a`" ,
458
+ "$USER" , progname , mad_release , "`date`" , "`uname -a`" ,
458
459
"laurent" , "deniau" , "cern.ch" );
459
460
system (buf );
460
461
}
0 commit comments