Remove old testsuite
[dyninst.git] / newtestsuite / src / dyninst / test1_25F_common.h
1         IMPLICIT NONE
2
3         INTEGER test1_25_globalVariable1,
4
5 #if defined(alpha_dec_osf4_0_test)
6      & test1_25_globalVariable2*8,
7 #else
8      & test1_25_globalVariable2,
9 #endif
10      & test1_25_globalVariable3, test1_25_globalVariable4,
11      & test1_25_globalVariable5,
12      & test1_25_globalVariable6, test1_25_globalVariable7, passedTest
13
14 ! **********************************************************************
15 ! The following common block (globals) has a corresponding c structure 
16 ! (struct block_) defined in test1.mutateeFortC.c.  Make sure all changes
17 ! to this structure are reflected in the other. (Including the size of
18 ! each memeber defined above)
19 ! **********************************************************************
20         common /test1_25f_globals/ test1_25_globalVariable1, test1_25_globalVariable2,
21      & test1_25_globalVariable3,
22      & test1_25_globalVariable4, test1_25_globalVariable5,
23      & test1_25_globalVariable6,
24      & test1_25_globalVariable7,
25      & passedTest
26