anchor.diff:  //    doc.Add(new StoredField(strategy.GetFieldName(), pt.getX().ToString() + " " + pt.getY().ToString()))
   
   let executeTests() = 
  -    [| CodecsShouldLoadProperly; PostingsFormatShouldLoadProperly; IndexingTests; BooleanQueryCreationTests; RangeQueryCreationTests; |] 
  +    [| 
  +        CodecsShouldLoadProperly
  +        PostingsFormatShouldLoadProperly 
  +        IndexingTests
  +        BooleanQueryCreationTests 
  +        RangeQueryCreationTests 
  +        SimpleAnalyzerInitTest
  +        TokenizationTest
  +    |] 
       |> Array.iter exceptionWrapper
       if hasErrors then
           printfn "Some Tests failed"
  
positive.code: open Xunit
  open System
  open System.IO
  
  let mutable hasErrors = false
  let RootDirectory = __SOURCE_DIRECTORY__
  
negative.code:     with e -> 
          hasErrors <- true
          printfn "------------------------------------------------"
          printfn "Test case failed: %s" (meth.GetType().FullName)
          printfn "%A" e
          printfn "------------------------------------------------"
          
  let ShouldHaveCodec50() = Assert.True(Codec.AvailableCodecs().contains("Lucene50"), sprintf "Lucene50Codec not found. Available Codecs: %A" (Codec.AvailableCodecs()))
  let ShouldHaveCodec410() = Assert.True(Codec.AvailableCodecs().contains("Lucene410"), sprintf "Lucene410Codec not found. Available Codecs: %A" (Codec.AvailableCodecs()))
  
  