(set! connection (connect))
(query "do something" connection)
(query "do something else" connection)

(set! instance (closure-over-connection (connect)))
(query "do something" (instance))
(query "do something else" (instance))