0 | module Postgres.Data.ConnectionStatus
3 | data ConnectionStatus = OK
15 | Show ConnectionStatus where
18 | show STARTED = "STARTED"
20 | show AWAITING_RESPONSE = "AWAITING_RESPONSE"
21 | show AUTH_OK = "AUTH_OK"
22 | show SETENV = "SETENV"
23 | show SSL_STARTUP = "SSL_STARTUP"
24 | show NEEDED = "NEEDED"
25 | show (OTHER x) = "OTHER " ++ (show x)