8 |
|
void (*p2) initFortranList, |
9 |
|
void (*p3) doForceLoopList )); |
10 |
|
|
11 |
< |
void wrapsimmod_ ( void (*wrapFunction)( void (*p1) setFortranSimList ) ); |
11 |
> |
void wrapsimmod_ ( void (*wrapFunction)( void (*p1) setFortranSimList, |
12 |
> |
void (*p2) setFortranBoxList) ); |
13 |
|
|
14 |
|
#ifdef IS_MPI |
15 |
|
void wrapsimparallelmod_( void (*wrapFunction)(void (*p1) setFortranMPIlist ) ); |
23 |
|
void (*newAtype) newAtypeList; |
24 |
|
void (*initFortranFF) initFortranList; |
25 |
|
|
26 |
< |
void wrapSimInfo( void (*p1) setFortranSimList ); |
26 |
> |
void wrapSimInfo( void (*p1) setFortranSimList, void (*p2) setFortranBoxList ); |
27 |
|
|
28 |
|
#ifdef IS_MPI |
29 |
|
void wrapSimParallel(void (*p1) setFortranMPIlist ); |
58 |
|
wrapsimmod_( wrapSimInfo ); |
59 |
|
} |
60 |
|
|
61 |
< |
void wrapSimInfo( void (*p1) setFortranSimList ){ |
61 |
> |
void wrapSimInfo( void (*p1) setFortranSimList, void (*p2) setFortranBoxList ){ |
62 |
|
|
63 |
< |
currentPlug->setInternal( p1 ); |
63 |
> |
currentPlug->setInternal( p1, p2 ); |
64 |
|
} |
65 |
|
|
66 |
|
|