anchor.diff:  """
           name name name name name
   
  -let generateCDeclStructCode =
  +let generateCDeclStructCode fields name =
       sprintf """
   typedef struct {
   %s
   } %s;
   """
  +        fields name
   
   let generateHeaderIncludeCode name = sprintf "#include \"%s.h\" \n" name
   
  
positive.code: #endif
  
  %s
  "           body
  
  let generateCDeclFunctionPrototypeCode =
      sprintf """
  FEROP_EXPORT %s FEROP_DECL %s (%s);
  """
  
  let generateCDeclFunctionCode = 
      sprintf """
  
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>
  