anchor.diff:  %% tmpfile(ObjFile) -> TmpFile
   %%  Work out the correct input and output file names.
   
  +-spec iofile(atom() | file:filename_all()) ->
  +                    {file:name_all(),file:name_all()}.
  +
   iofile(File) when is_atom(File) ->
       iofile(atom_to_list(File));
   iofile(File) ->
  
positive.code: 	Other -> Other
      end.
  
  compile_asm(File0, _OutFile, Opts) ->
      File = shorten_filename(File0),
      case file(File, [from_asm|make_erl_options(Opts)]) of
  	{ok,_Mod} -> ok;
  	Other -> Other
      end.
  
  compile_core(File0, _OutFile, Opts) ->
      File = shorten_filename(File0),
  
negative.code: 	Other -> Other
      end.
  
  -spec compile_beam(file:filename(), _, #options{}) -> 'ok' | 'error'.
  
  compile_beam(File0, _OutFile, Opts) ->
      File = shorten_filename(File0),
      case file(File, [from_beam|make_erl_options(Opts)]) of
  