[erlang-bugs] R13B-1 internal error in v3_codegen

[Paul Fisher]

Bjorn Gustavsson wrote:
> On Mon, Aug 3, 2009 at 12:08 AM, Paul Fisher<pfisher@REDACTED> wrote:
>> Is this a known issue, and is there a patch?
> 
> Can you post a compilable version of the source code?

The original was 3000+ lines, but i've reduced it to this:

-module(codegen).
-compile([export_all, debug_info]).

perform_select( {Type, Keyval} ) ->
     try
         if is_atom(Type) andalso length(Keyval) > 0 -> ok;
            true -> ok
         end
     catch
         _:_ -> fail
     end.


$ erlc codegen.erl
Function: perform_select/1
./codegen.erl:none: internal error in v3_codegen;
crash reason: {{case_clause,
                    {'EXIT',
                        {function_clause,
                            [{v3_codegen,longest,[[{ker2},{ker1}],[]]},
                             {v3_codegen,longest,2},
                             {v3_codegen,sr_merge,2},
                             {v3_codegen,match_cg,5},
                             {v3_codegen,guard_match_cg,6},
                             {v3_codegen,guard_cg,5},
                             {v3_codegen,'-guard_cg_list/6-anonymous-0-',4},
                             {v3_codegen,flatmapfoldl,3}]}}},
                [{compile,'-select_passes/2-anonymous-2-',2},
                 {compile,'-internal_comp/4-anonymous-1-',2},
                 {compile,fold_comp,3},
                 {compile,internal_comp,4},
                 {compile,internal,3}]}


--
paul