anchor.diff:      Outdir = filename:join(PrivDir, "asm"),
       ok = file:make_dir(Outdir),
   
  -    Wc = filename:join(filename:dirname(code:which(?MODULE)), "*.beam"),
  -    TestBeams = filelib:wildcard(Wc),
  +    TestBeams = get_unique_beam_files(),
       Res = test_lib:p_run(fun(F) -> do_asm(F, Outdir) end, TestBeams),
       Res.
   
  
positive.code: 
  %% Test that warnings contain filenames and line numbers.
  warnings(_Config) ->
      TestDir = filename:dirname(code:which(?MODULE)),
      Files = filelib:wildcard(filename:join(TestDir, "*.erl")),
      test_lib:p_run(fun do_warnings/1, Files).
  
  do_warnings(F) ->
  
negative.code:     Outdir = filename:join(PrivDir, "core"),
      ok = file:make_dir(Outdir),
  
      TestBeams = get_unique_beam_files(),
      Abstr = [begin {ok,{Mod,[{abstract_code,
  				    {raw_abstract_v1,Abstr}}]}} = 
  			     beam_lib:chunks(Beam, [abstract_code]),
  