/usr/share/guile/site/database/postgres is in guile-pg 0.45-0ubuntu1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 | (define-module (database postgres) #:export (pg-lo-creat pg-lo-open pg-lo-unlink pg-lo-get-oid pg-lo-tell pg-lo-seek pg-lo-read pg-lo-import pg-lo-export pg-guile-pg-loaded pg-protocol-version pg-conndefaults pg-connectdb pg-connection? pg-finish pg-reset pg-server-version pg-escape-string-conn pg-escape-bytea-conn pg-unescape-bytea pg-exec pg-exec-params pg-exec-prepared pg-result? pg-result-error-field pg-result-error-message pg-error-message pg-get-db pg-get-user pg-get-pass pg-get-host pg-get-port pg-get-tty pg-get-options pg-backend-pid pg-transaction-status pg-parameter-status pg-result-status pg-ntuples pg-nfields pg-cmdtuples pg-oid-value pg-fname pg-fnumber pg-ftable pg-ftablecol pg-fformat pg-ftype pg-fsize pg-getvalue pg-getlength pg-getisnull pg-binary-tuples? pg-fmod pg-put-copy-data pg-put-copy-end pg-get-copy-data pg-getline pg-getlineasync pg-putline pg-endcopy pg-set-error-verbosity pg-trace pg-untrace pg-make-print-options pg-print pg-set-notice-out! pg-notifies pg-mblen pg-client-encoding pg-set-client-encoding! pg-set-nonblocking! pg-is-nonblocking? pg-send-query pg-send-query-params pg-send-query-prepared pg-get-result pg-consume-input pg-is-busy? pg-request-cancel pg-flush))
(dynamic-call "guile_pg_init_database_postgres_module" (dynamic-link "/usr/lib/guile-pg/postgres"))
|