anchor.diff:          | FailedWith e -> m
   
   module Parser =
  -    let identToString (ident: LongIdentWithDots) = ident.Lid |> List.map (fun x -> x.idText) |> String.concat "."
  +    let identToString (ident: LongIdentWithDots) = ident.Lid |> List.map (fun x -> x.idText) |> String.concat "." 
  +
  +    let nothing = ()
   
       let checker = FSharpChecker.Create(keepAssemblyContents=true)
   
  
positive.code: 
      let visitPattern pattern = printf "pattern"
      
      let visitExpression expr = printf "expr"
      
      let rec typeToString = function
      | SynType.LongIdent (ident) -> identToString ident  
  
negative.code:                 do printfn "No support for interface files"
          | FailedWith error -> 
              do Console.WriteLine error
  