If.sed

#  Fixup if statements:

#     if [ expr ]             if ( expr ) then
#     then              -->
#        :                       :
#     fi                      end

/^[   ]*then[  ]*$/d
/^[   ]*if[[(  ].*;[    ]*"\{,1\}then"\{,1\}/s/[   ]*;[  ]*"\{,1\}then"\{,1\}//
/^[   ]*if/s/[[(]\(.*\)[])]$/(\1) then/
/^[   ]*fi[    ]*$/s/fi/end/}