anchor.diff:  #endif
   
   %s
  -"           body
  +"           header
   
  -let generateCDeclFunctionPrototypeCode =
  +let generateCDeclFunctionPrototypeCode returnType name parameterTypes =
       sprintf """
   FEROP_EXPORT %s FEROP_DECL %s (%s);
   """
  +        returnType name parameterTypes
   
   let generateCDeclFunctionCode = 
       sprintf """
  
positive.code: """
          name name name name name
  
  let generateCDeclStructCode =
      sprintf """
  typedef struct {
  %s
  } %s;
  """
  
  let generateHeaderIncludeCode name = sprintf "#include \"%s.h\" \n" name
  
  
negative.code:     Header : string
      Source : string }
  
  let generateHeaderCode (name : string) header =
      let name = name.ToUpper ()
      sprintf """
  #ifndef __%s_H__
  #define __%s_H__
  %s
  #endif
  """ 
          name name header
  
  let generateMainHeaderCode name header =
      generateHeaderCode name <| sprintf
          @"
  #include <stdint.h>
  