anchor.diff:  
   
   testfuns(Module) ->
  -    Exports = Module:module_info(exports),
  +    Exports = try
  +        Module:module_info(exports)
  +    catch
  +        _:_ ->
  +            ?stderr("etest: ~p: No such module~n", [Module]),
  +            erlang:halt(1)
  +    end,
   
       IsTest = fun({FunName, _}) ->
           nomatch =/= re:run(atom_to_list(FunName), "^test_")
  
positive.code: -module (etest_runner).
  -compile (export_all).
  
  
  % The runner will be called without arguments in case no tests were found .
  % Print a descriptive error message, then exit.
  run_all() ->
      io:put_chars(standard_error, "etest: No tests found"),
      erlang:halt().
  
  
  
negative.code:                 get(success),
                  get(tests) ]),
  
      erlang:halt(get(errors)).
  
  
  run(Module) ->
  