h10Tests :: TestTree
h10Tests = decisionTestGroup "h10" "If-Unmodified-Since exists?"
  [ testCase "True ==> h11" $
      let rq = req { reqHeaders = HashMap.singleton hIfUnmodifiedSince [dateStr] }
      in after' h10 resource rq @?= Decision' "h11"
  , testCase "False ==> i12" $
      after' h10 resource req @?= Decision' "i12"
  ]
h10Tests :: TestTree
h10Tests = decisionTestGroup "h10" "If-Unmodified-Since exists?"
  [ testCase "True ==> h11" $
      let rq = req { reqHeaders = HashMap.singleton hIfUnmodifiedSince [dateStr] }
      in after' h10 resource rq @?= Decision' "h11"
  , testCase "False ==> i12" $
      after' h10 resource req @?= Decision' "i12"
  ]
h10Tests = decisionTestGroup "h10" "If-Unmodified-Since exists?"
  [ testCase "True ==> h11" $
      let rq = req { reqHeaders = HashMap.singleton hIfUnmodifiedSince [dateStr] }
      in after' h10 resource rq @?= Decision' "h11"
  , testCase "False ==> i12" $
      after' h10 resource req @?= Decision' "i12"
  ]