T2806.hs:13:11: warning: [GHC-21030] [-Wunbanged-strict-patterns (in -Wextra)]
    Pattern bindings containing unlifted types should use
    an outermost bang pattern:
      (I# _x) = 4