init_lh_constants_map in Init, Init_thread

Author: aeblyve

mpi-proxy-split/mpi-wrappers/mpi_wrappers.cpp

@@ -66,8 +66,12 @@ USER_DEFINED_WRAPPER(int, Init, (int *) argc, (char ***) argv) {
 
   JUMP_TO_LOWER_HALF(lh_info.fsaddr);
   retval = NEXT_FUNC(Init)(argc, argv);
+  RETURN_TO_UPPER_HALF();
+  init_lh_constants_map();
+  JUMP_TO_LOWER_HALF(lh_info.fsaddr);
   // Create a duplicate of REAL_CONSTANT(COMM_WORLD) for internal use.
   NEXT_FUNC(Comm_dup)(REAL_CONSTANT(COMM_WORLD), &g_world_comm);
+  init_lh_constants_map();
   RETURN_TO_UPPER_HALF();
 
   recordPostMpiInitMaps();
@@ -91,6 +95,9 @@ USER_DEFINED_WRAPPER(int, Init_thread, (int *) argc, (char ***) argv,
 
   JUMP_TO_LOWER_HALF(lh_info.fsaddr);
   retval = NEXT_FUNC(Init_thread)(argc, argv, required, provided);
+  RETURN_TO_UPPER_HALF();
+  init_lh_constants_map();
+  JUMP_TO_LOWER_HALF(lh_info.fsaddr);
   // Create a duplicate of REAL_CONSTANT(COMM_WORLD) for internal use.
   NEXT_FUNC(Comm_dup)(REAL_CONSTANT(COMM_WORLD), &g_world_comm);
   RETURN_TO_UPPER_HALF();