externalroutine toplev
! compiled with ./imps this gives a segfault but with ./bin/imps it compiles OK???!
! what in the prims.inc could cause that?
longreal lr1
integer i, i1 = 1, i2 = 2, i3 = 3
if i2 = i3 start
i = i1
finish
test3else:
if i2 = i3 then i = i1 else i = i2
test4else:
if i2 = i3 then start
i = i1
finish else i = i2
end
endoffile