anchor.diff:  module Codegen =
   
     open AST
  -  open LLVMSharp
  -
  -  let rec codegenExpr (namedValues: Map<string, LLVMValueRef>) =
  +
  +  let rec private codegenExpr (namedValues: Map<string, LLVMValueRef>) =
       function
       | Number n -> LLVM.ConstReal(LLVM.DoubleType(), n)
       | Variable name ->
  
positive.code:       LLVM.VerifyFunction(function', LLVMVerifierFailureAction.LLVMPrintMessageAction) |> ignore
        function', namedValues
  
  [<EntryPoint>]
  let main _ = 
    do 
  
negative.code: 
      let parse = parseTopLevel 
    
    let private parse = parseWhiteSpace >>. Decl.parse
  
    let run = runParserOnString parse () "" 
  
  