: smpi_shared_set_call(#func, input, func(__VA_ARGS__)))
/* Fortran specific stuff */
-XBT_PUBLIC(int) MAIN__(int (*realmain) (int argc, char *argv[]),int *argc, char *argv[]);
+XBT_PUBLIC(int) __attribute__((weak)) smpi_simulated_main(int argc, char** argv);
+XBT_PUBLIC(int) MAIN__(int (*realmain) (int argc, char *argv[]),int argc, char *argv[]);
XBT_PUBLIC(int) smpi_process_index(void);
/*** SURF Globals **************************/
/*******************************************/
XBT_PUBLIC_DATA(xbt_cfg_t) _surf_cfg_set;
-XBT_PUBLIC(int) surf_cfg_get_int(char* name);
-XBT_PUBLIC(double) surf_cfg_get_double(char* name);
-XBT_PUBLIC(char*) surf_cfg_get_string(char* name);
+XBT_PUBLIC(int) surf_cfg_get_int(const char* name);
+XBT_PUBLIC(double) surf_cfg_get_double(const char* name);
+XBT_PUBLIC(char*) surf_cfg_get_string(const char* name);
XBT_PUBLIC(void) surf_cfg_get_peer(const char *name, char **peer, int *port);
-XBT_PUBLIC(xbt_dynar_t) surf_cfg_get_dynar(char* name);
+XBT_PUBLIC(xbt_dynar_t) surf_cfg_get_dynar(const char* name);
/** \ingroup SURF_simulation
* \brief Initialize SURF
}
int __attribute__((weak)) main(int argc, char** argv) {
- return MAIN__(&smpi_simulated_main,argc,argv);
+ return MAIN__(smpi_simulated_main,argc,argv);
}
-int MAIN__(int (*realmain) (int argc, char *argv[]),int *argc, char *argv[])
+int MAIN__(int (*realmain) (int argc, char *argv[]),int argc, char *argv[])
{
srand(SMPI_RAND_SEED);
XBT_LOG_CONNECT(smpi_replay);
#ifdef HAVE_TRACING
- TRACE_global_init(argc, argv);
+ TRACE_global_init(&argc, argv);
#endif
- SIMIX_global_init(argc, argv);
+ SIMIX_global_init(&argc, argv);
#ifdef HAVE_TRACING
TRACE_start();
};
#endif /* #ifdef _XBT_WIN32 */
-int surf_cfg_get_int(char* name)
+int surf_cfg_get_int(const char* name)
{
return xbt_cfg_get_int(_surf_cfg_set,name);
}
-double surf_cfg_get_double(char* name)
+double surf_cfg_get_double(const char* name)
{
return xbt_cfg_get_double(_surf_cfg_set,name);
}
-char* surf_cfg_get_string(char* name)
+char* surf_cfg_get_string(const char* name)
{
return xbt_cfg_get_string(_surf_cfg_set,name);
}
{
xbt_cfg_get_peer(_surf_cfg_set,name, peer, port);
}
-xbt_dynar_t surf_cfg_get_dynar(char* name)
+xbt_dynar_t surf_cfg_get_dynar(const char* name)
{
return xbt_cfg_get_dynar(_surf_cfg_set,name);
}