anchor.diff:                      let neededForKeyOverflow = neededForKeyBase + neededForOverflowPageNumber
                       let neededForBothOverflow = neededForKeyOverflow + neededForValueOverflow
                       let fitBothOverflow = (available >= neededForBothOverflow)
  -                    let flushThisPage = (st.keys.Length > 0) && (not fitBothInline) && (wouldFitBothInlineOnNextPage || ( (not fitKeyInlineValueOverflow) && (not fitBothOverflow) ) )
  +                    let flushThisPage = (not (List.isEmpty st.keys)) && (not fitBothInline) && (wouldFitBothInlineOnNextPage || ( (not fitKeyInlineValueOverflow) && (not fitBothOverflow) ) )
   
                       if flushThisPage then
                           flushLeaf st false
  
positive.code:             let lastChild = List.head children
              let initialState = {nextGeneration=[];sofar=0;items=[];nextPage=startingPageNumber;boundaryPage=startingBoundaryPageNumber;overflows=Map.empty}
              let middleState = List.foldBack folder (List.tail children) initialState 
              let isRootNode = (middleState.nextGeneration.Length=0)
              let finalState = flushParentPage middleState lastChild isRootNode
              let {nextPage=n;boundaryPage=b;nextGeneration=ng} = finalState
              (n,b,ng)
  
negative.code:             let flushLeaf st isRootPage = 
                  pb.PutInt16At (OFFSET_COUNT_PAIRS, st.keys.Length)
                  let thisPageNumber = st.nextPage
                  let firstLeaf = if List.isEmpty st.leaves then thisPageNumber else st.firstLeaf
                  let (nextN,nextB) = 
                      if isRootPage then
                          let blockListPage = pageManager.ReserveBlockList(token, thisPageNumber)
  