anchor.diff:      | exception_declaration 
       | record_declaration
       | table_declaration
  -    | create_procedure_body
  -    | create_function_body 
  +    | procedure_body
  +    | function_body 
       | procedure_spec
       | function_spec    
       ;
  
positive.code: fragment W: [wW];
  fragment X: [xX];
  fragment Y: [yY];
  fragment Z: [zZ];
  
negative.code:     ;
  
  create_function_body
      : CREATE (OR REPLACE)? FUNCTION function_name ('(' parameter (',' parameter)* ')')?
        RETURN type_spec (invoker_rights_clause|parallel_enable_clause|result_cache_clause|DETERMINISTIC)*
        ((PIPELINED? (IS | AS) (DECLARE? declare_spec* body | call_spec)) | (PIPELINED | AGGREGATE) USING implementation_type_name) ';'
      ;
  