/home/quintasan/sauce/teadb/src/Transaction.hs:7:20: error:
    • Couldn't match expected type ‘Hasql.Statement.Statement
                                      Text (Int32, Text)
                                    -> Text -> Transaction (Int32, Text)’
                  with actual type ‘Transaction b0’
    • The function ‘statement’ is applied to four arguments,
      but its type ‘Mode
                    -> Hasql.Statement.Statement Mode b0 -> Transaction b0’
      has only two
      In the expression:
        statement Write Serializable Statements.insertTeaStatement (name)
      In an equation for ‘insertTea’:
          insertTea name
            = statement Write Serializable Statements.insertTeaStatement (name)
  |
7 |   insertTea name = statement Write Serializable Statements.insertTeaStatement (name)
  |                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

/home/quintasan/sauce/teadb/src/Transaction.hs:7:36: error:
    • Couldn't match expected type ‘Hasql.Statement.Statement Mode b0’
                  with actual type ‘IsolationLevel’
    • In the second argument of ‘statement’, namely ‘Serializable’
      In the expression:
        statement Write Serializable Statements.insertTeaStatement (name)
      In an equation for ‘insertTea’:
          insertTea name
            = statement Write Serializable Statements.insertTeaStatement (name)
  |
7 |   insertTea name = statement Write Serializable Statements.insertTeaStatement (name)
  |                                    ^^^^^^^^^^^^