*** src/gap.c	Wed Jun 24 21:25:40 1998
--- patch/gap.c	Thu Jul  2 00:48:47 1998
***************
*** 92,98 ****
--- 92,102 ----
  #include        "sysfiles.h"            /* file input/output               */
  #include        "weakptr.h"             /* weak pointers                   */
  
+ #ifdef GAPMPI
+ #include        "gapmpi.h"              /* GAPMPI			   */
+ #endif
  
+ 
  /****************************************************************************
  **
  
***************
*** 3002,3007 ****
--- 3006,3016 ----
      /* main module                                                         */
      InitInfoGap,
  
+ #ifdef GAPMPI
+     /* GAPMPI module							   */
+     InitInfoGapmpi,
+ #endif
+ 
      0
  };
  
***************
*** 3105,3110 ****
--- 3114,3124 ----
  
  
      /* initialize the basic system and gasman                              */
+ #ifdef GAPMPI
+     /* GAPMPI needs to call MPI_Init() first to remove command line args */
+     InitGapmpi( pargc, &argv, &BreakOnError );
+ #endif
+ 
      InitSystem( *pargc, argv );
  
      InitBags( SyAllocBags, SyStorMin,