Compiler bug

[James Hague]

I found a compiler bug in R8B-0.  Here is the simplest test case
I could come up with:

-module(compiler_bug).
-export([test/1]).

test(A) when not is_list(A) -> A.


Compiling this with c(compiler_bug) results in:

./compiler_bug.erl:none: internal error in v3_codegen;
crash reason: {{case_clause,{'EXIT',{function_clause,
                                        
[{v3_codegen,fetch_stack,[cor0,[],0]},
                                         {v3_codegen,gen_moves,4},
                                         {v3_codegen,cg_call_args,4},
                                         
{v3_codegen,cg_setup_call,4},
                                         {v3_codegen,return_cg,5},
                                         
{v3_codegen,cg_basic_block,4},
                                         {v3_codegen,flatmapfoldl,3},
                                         
{v3_codegen,cg_basic_block,7}|
                                         more]}}},
               [{compile,'-select_passes/2-fun-0-',2},
                {compile,'-internal_comp/4-fun-1-',2},
                {compile,fold_comp,3},
                {compile,internal_comp,4},
                {compile,internal,3}]}
error