anchor.diff:  	false ->
   	    no_split;
   	true ->
  -	    ArchiveFile = reverse(Acc),
  +	    ArchiveFile = absname(reverse(Acc)),
   	    {archive, ArchiveFile, []}
       end.
   
  
positive.code: 	false ->
  	    archive_split(File, RevExt, [$/|Acc]);
  	true ->
  	    ArchiveFile = reverse(Acc),
  	    {archive, ArchiveFile, File}
      end;
  archive_split([H|T], RevExt, Acc) ->
  
negative.code: 	Archive ->
  	    Archive
      end;
  name_split(ArchiveFile, File0) ->
      %% Look first in primary archive
      File = absname(File0),
      case string_match(real_path(File), ArchiveFile, []) of
          no_match ->
              %% Archive or plain file
              name_split(undefined, File);
          {match, _RevPrimArchiveFile, FileInArchive} ->
              %% Primary archive
  	    {archive, ArchiveFile, FileInArchive}
  