anchor.diff:  	    error
       end.
   
  -error(Reason) ->
  -    erlang:error({badpattern,Reason}).
  +badpattern(Reason) ->
  +    error({badpattern,Reason}).
   
   eval_read_file_info(File, file) ->
       file:read_file_info(File);
  
positive.code:     compile_part(Part, true, []).
  
  compile_part([], true, _) ->
      error(missing_delimiter);
  compile_part([$,|Rest], true, Result) ->
      {ok, $,, lists:reverse(Result), Rest};
  compile_part([$}|Rest], true, Result) ->
  
negative.code: -module(filelib).
  
  %% File utilities.
  -export([wildcard/1, wildcard/2, is_dir/1, is_file/1, is_regular/1, 
  	 compile_wildcard/1]).
  -export([fold_files/5, last_modified/1, file_size/1, ensure_dir/1]).
  