(clsql:connect `(,*tutorial-database-server*
,*tutorial-database-name*
,*tutorial-database-user*
,*tutorial-database-password*)
:database-type *tutorial-database-type*))
(clsql:connect `(,*tutorial-database-server*
,*tutorial-database-name*
,*tutorial-database-user*
,*tutorial-database-password*)
:database-type *tutorial-database-type*))