Lines Matching defs:stat
11 integer :: stat
12 stat=99
13 allocate(a, stat=stat)
14 if (stat /= 0) call abort ()
15 allocate(a, stat=stat)
16 if (stat == 0) call abort ()
19 deallocate (b, stat=stat)
20 if (stat /= 0) call abort ()
21 deallocate (b, stat=stat)
22 if (stat == 0) call abort ()
24 deallocate (c, stat=stat)
25 if (stat == 0) call abort ()