(eq p (clsql-sys::find-or-create-connection-pool nil :dummy))
(eq p (clsql-sys::find-or-create-connection-pool :spec :dummy))))
nil T nil)
(eq p (clsql-sys::find-or-create-connection-pool nil :dummy))
(eq p (clsql-sys::find-or-create-connection-pool :spec :dummy))))
nil T nil)