expr      : if
            {
               # I doubt this should be in the grammar.
               $return = evaluate($main::c_v, $item[1]);
            }

if        : /if/i expr /then/i expr if_(?)
            { [ if => @item[2, 4, 5] ] }

if_       : elsif { $item[1] }
          | else  { $item[1] }

elsif     : /elsif/i expr /then/i expr if_
            { [ if => @item[2, 4, 5] ] }

else      : /else/i expr { $item[2] }