anchor.diff:  printable_char() -> union([integer(32, 126), integer(160, 255)]).
   
   printable_string() -> list(printable_char()).
  +
   
   %%%===================================================================
   %%% Internal functions
  
positive.code:             lists:nth(4, Defun) =:=  Doc
            end).
  
  
  %%%===================================================================
  %%% defun shapes
  
negative.code:        prop_defun_simple(), 100}
      , {"A simple function with a docstring is correctly parsed.",
         prop_defun_simple_doc(), 100}
      , {"A function with pattern clauses produces an empty docstring.",
         prop_defun_match(), 30}
      , {"A function with pattern clauses and a docstring is correctly parsed.",
         prop_defun_match_doc(), 30}
      ],
    [{timeout, ?TIMEOUT,
      {Title, ?_assert(proper:quickcheck(Property, ?OPTIONS(NumTests)))}}
  