fix: omit last type param on BuilderT

This commit is contained in:
orion kindel 2023-12-18 09:10:39 -06:00
parent 30fff94a26
commit 80e264e7c6
Signed by: orion
GPG Key ID: 6D4165AE4C928719

View File

@ -11,7 +11,7 @@ import Data.Tuple.Nested (type (/\))
import Database.PostgreSQL (class ToSQLValue, toSQLValue)
import Foreign (Foreign)
type BuilderT m a = StateT { params :: Array Foreign, refs :: Set String } m a
type BuilderT m = StateT { params :: Array Foreign, refs :: Set String } m
runBuilder :: forall m a. BuilderT m a -> m (a /\ { params :: Array Foreign, refs :: Set String })
runBuilder = flip runStateT { params: [], refs: Set.empty }