1! Test empty if statements.  We Used to fail this because we folded
2! the if stmt before we finished building it.
3program emptyif
4  implicit none
5  integer i
6
7  i=1
8  if(i .le. 0) then
9  else
10    i = 2
11  endif
12  if (i .ne. 2) call abort()
13
14  if (i .eq. 0) then
15  elseif (i .eq. 2) then
16    i = 3
17  end if
18  if (i .ne. 3) call abort()
19end
20
21