-(format t "~&SELECT * FROM t1 ORDER BY f1 ==> ~A~%"
- (clsql:query "SELECT * FROM t1 ORDER BY f1"))
-(format t "~&SELECT * FROM t1 ORDER BY f2 ==> ~A~%"
- (clsql:query "SELECT * FROM t1 ORDER BY f2"))
+(format t "~&SELECT * FROM t1 ORDER BY f1 ==> ~A~%"
+ (clsql:query "SELECT * FROM t1 ORDER BY f1"))
+(format t "~&SELECT * FROM t1 ORDER BY f2 ==> ~A~%"
+ (clsql:query "SELECT * FROM t1 ORDER BY f2"))