unboxed-bind.hs:11:11: error: [-Wunbanged-strict-patterns (in -Wextra), -Werror=unbanged-strict-patterns]
    Pattern bindings containing unlifted types should use
    an outermost bang pattern:
      P arg = x