g8Tests :: TestTree
g8Tests = decisionTestGroup "g8" "If-Match exists?"
  [ testCase "True ==> g9" $
      let rq = req { reqHeaders = HashMap.singleton hIfMatch ["webcrank"] }
      in after' g8 resource rq @?= Decision' "g9"
  , testCase "False ==> h10" $
      after' g8 resource req @?= Decision' "h10"
  ]
g8Tests :: TestTree
g8Tests = decisionTestGroup "g8" "If-Match exists?"
  [ testCase "True ==> g9" $
      let rq = req { reqHeaders = HashMap.singleton hIfMatch ["webcrank"] }
      in after' g8 resource rq @?= Decision' "g9"
  , testCase "False ==> h10" $
      after' g8 resource req @?= Decision' "h10"
  ]
g8Tests = decisionTestGroup "g8" "If-Match exists?"
  [ testCase "True ==> g9" $
      let rq = req { reqHeaders = HashMap.singleton hIfMatch ["webcrank"] }
      in after' g8 resource rq @?= Decision' "g9"
  , testCase "False ==> h10" $
      after' g8 resource req @?= Decision' "h10"
  ]