anchor.diff:      Acc.
   
   %% for printing directory (t/1)
  -raw_short_print_info_etc(#cd_file_header{}, FileName,
  -			 _FileComment, _BExtraField, Acc) ->
  +raw_short_print_info_etc(CD, FileName, _FileComment, _BExtraField, Acc)
  +  when is_record(CD, cd_file_header) ->
       print_file_name(FileName),
       Acc;
  -raw_short_print_info_etc(#eocd{} = EOCD, X, Comment, Y, Acc) ->
  +raw_short_print_info_etc(EOCD, X, Comment, Y, Acc) when is_record(EOCD, eocd) ->
       raw_long_print_info_etc(EOCD, X, Comment, Y, Acc).
   
   print_file_name(FileName) ->
  
positive.code: %% %CopyrightEnd%
  %%
  -module(discozip).
  
  %% Basic api
  -export([unzip/1, unzip/2, extract/1, extract/2,
  
negative.code: 	       zip_comment_length}).
  
  
  -type zip_file() :: #zip_file{}.
  -type zip_comment() :: #zip_comment{}.
  
  %% Open a zip archive with options
  %%
  
  