Welcome to the CHICKEN Scheme pasting service

(use awful awful-postgresql awful-ssql)
(enable-db)
(enable-ssql #t)

($db '(select (columns userhandle) (from users)))


--  Output --
Error: bad argument type - not a string: (select (columns userhandle) (from users))

	Call history:

	<syntax>	  (##core#quote awful-ssql)
	<syntax>	  (import awful-ssql)
	<syntax>	  (##core#undefined)
	<syntax>	  (##core#undefined)
	<syntax>	  (enable-db)
	<syntax>	  (##core#begin (enable-ssql #t) ($db (quote (select (columns userhandle) (from users)))))
	<syntax>	  (enable-ssql #t)
	<syntax>	  ($db (quote (select (columns userhandle) (from users))))
	<syntax>	  (quote (select (columns userhandle) (from users)))
	<syntax>	  (##core#quote (select (columns userhandle) (from users)))
	<eval>	  (##sys#require (quote awful))
	<eval>	  (##sys#require (quote awful-postgresql))
	<eval>	  (##sys#require (quote awful-ssql))
	<eval>	  (enable-db)
	<eval>	  (enable-ssql #t)
	<eval>	  ($db (quote (select (columns userhandle) (from users))))	<--
(#("<syntax>" (##core#quote awful-ssql) #f)
 #("<syntax>" (import awful-ssql) #f)
 #("<syntax>" (##core#undefined) #f)
 #("<syntax>" (##core#undefined) #f)
 #("<syntax>" (enable-db) #f)
 #("<syntax>"
   (##core#begin
     (enable-ssql #t)
     ($db '(select (columns userhandle) (from users))))
   #f)
 #("<syntax>" (enable-ssql #t) #f)
 #("<syntax>" ($db '(select (columns userhandle) (from users))) #f)
 #("<syntax>" '(select (columns userhandle) (from users)) #f)
 #("<syntax>" (##core#quote (select (columns userhandle) (from users))) #f)
 #("<eval>" (##sys#require 'awful) #<frameinfo>)
 #("<eval>" (##sys#require 'awful-postgresql) #<frameinfo>)
 #("<eval>" (##sys#require 'awful-ssql) #<frameinfo>)
 #("<eval>" (enable-db) #<frameinfo>)
 #("<eval>" (enable-ssql #t) #<frameinfo>)
 #("<eval>" ($db '(select (columns userhandle) (from users))) #<frameinfo>))