anchor.diff:                  keys.[!cur]
               
               member this.KeyCompare(k) =
  -                ByteComparer.Compare(keys.[!cur], k)
  +                ByteComparer.Compare (keys.[!cur]) k
   
               member this.Value() =
                   let v = pairs.[keys.[!cur]]
  
positive.code: module ByteComparer = 
      // this code is very non-F#-ish.  but it's much faster.
  
      let Compare (x:byte[], y:byte[]) =
          let xlen = x.Length
          let ylen = y.Length
          let len = if xlen<ylen then xlen else ylen
  
negative.code:         r
  
      member this.Compare(len, other) =
          ByteComparer.CompareWithin buf cur len other
  
      member this.PageType =
          buf.[0]
  
  