anchor.diff:  gen_function_specs(ErlTypePrefix, FuncList) ->
       [ gen_function_spec(ErlTypePrefix, X) || X <- FuncList ].
   
  -
   gen_function_spec(ErlTypePrefix, F) ->
  +    gen_spec("-spec", ErlTypePrefix, F).
  +
  +gen_spec(SpecAttribute, ErlTypePrefix, F) ->
       ErlName = F#func.erlang_name,
       Input =
           case F#func.input of
  
positive.code:     ],
      Code.
  
  
  %
  % Generating Piqi-RCP function specs: <ErlMod>_impl.hrl
  
negative.code:     Error =
          case F#func.error of
              'undefined' -> "";
              _ -> [ " |\n    {error, ",  ErlTypePrefix, ErlName, "_error()}" ]
          end,
  
      [
          SpecAttribute, " ", ErlName, "(", Input, ") ->\n",
          "    ", Output,
          Error, ".\n\n"
      ].
  
  
  %
  