1#
2# We allow these routines for the example programs
3%mpe2Routines = (
4	'printf' => sys, 'fprintf' => sys , 'vprintf' => sys, 'fputs' => sys,
5	'sprintf' => sys,
6#	'strcpy' => sys, 'strncpy' => sys, 'strcat' => sys,
7	'malloc' => sys, 'free' => sys, 'calloc' => sys, 'strdup' => sys,
8	'realloc' => sys,
9	'assert' => sys,
10	);
11&PushAllowFuncNames( "mpe2Routines", "tree", "add" );
12
13# Allow #ifdef DEBUG in the examples
14%mpe2Defines = ( 'DEBUG' => 1, 'LOGGING' => 1, 'CLOG_NOMPI' => 1,
15	         'MPE_EXTENSION_INC' => 1, 'MPE_NOMPI' => 1,
16		 'MPE_GRAPHICS' => 1, 'MPE_INTERNAL' => 1,
17		 'MPE_HAS_PROCID' => 1,
18		 'FORTRAN_SPECIAL_FUNCTION_PTR' => 1,
19		 'DBX_IS_OSF' => 1,
20		 'POINTER_64_BITS' => 1,
21		 'PROTOFIX_INCLUDED' => 1,
22		 'MPI_Request_c2f' => 1,
23		 'MPI_Wtime' => 1,
24	         'MPI_IRIX' => 1,             # These arch-specific names
25		 'MPI_CRAY' => 1,             # should be removed
26	 	 'MPI_rs6000' => 1,
27		 'MPI_solaris' => 1,
28		 'MPI_hpux' => 1,
29	 );
30if (defined(&PushDefinesNames)) {
31   &PushDefinesNames( "mpe2Defines", "tree", "add" );
32}
33
34#
35# Tell the preamble code not to complain about missing mode comments
36if (defined(&PreambleCheckMode)) {
37    &PreambleCheckMode( 0 );
38}
39
401;
41