(in-package #:clsql-tests)
-(defvar *report-stream* nil "Stream to send text report.")
+(defvar *report-stream* *standard-output* "Stream to send text report.")
(defvar *sexp-report-stream* nil "Stream to send sexp report.")
(defvar *rt-connection*)
(defvar *rt-fddl*)
:type (string 30)
:initarg :city)
(postal-code
- :column "zip"
+ :column zip
:type integer
:void-value 0
:initarg :postal-code))