(module c-sqld-psql mzscheme
  (define c-sqld-psql-available? #f)
  (provide c-sqld-psql-available?)

  (define-syntax provide-wrappers
    (syntax-rules ()
      [(_) (begin)]
      [(_ id1 id ...)
       (begin
	 (define (id1 . args)
	   (error 'id1 "extension not compiled"))
	 (provide id1)
	 (provide-wrappers id ...))]))

  (provide-wrappers
   c-psql-version
   c-psql-open
   c-psql-close
   c-psql-query
   c-psql-nrows
   c-psql-ncols
   c-psql-cell
   c-psql-lasterr
   c-psql-string2db))