#define sleep(x) smpi_sleep(x)
#define gettimeofday(x, y) smpi_gettimeofday(x, y)
+#ifdef _WIN32
+#define MPI_CALL(type,name,args) \
+ type name args; \
+ type P##name args
+#else
#define MPI_CALL(type,name,args) \
type name args __attribute__((weak)); \
type P##name args
+#endif
SG_BEGIN_DECL()
#define MPI_THREAD_SINGLE 0
//FIXME: End of all the not yet implemented stuff
// smpi functions
-XBT_IMPORT_NO_EXPORT(int) smpi_simulated_main(int argc, char **argv);
XBT_PUBLIC(MPI_Comm) smpi_process_comm_self(void);
/*
XBT_PUBLIC(void) smpi_exit(int);
: smpi_shared_set_call(#func, input, func(__VA_ARGS__)))
/* Fortran specific stuff */
-XBT_PUBLIC(int) MAIN__(void);
+XBT_PUBLIC(int) MAIN__(int (*realmain) (int argc, char *argv[]),int *argc, char *argv[]);
XBT_PUBLIC(int) smpi_process_index(void);