52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
pgdatetime-get-microsecond
pgdatetime-set-year! pgdatetime-set-month! pgdatetime-set-day!
pgdatetime-set-hour! pgdatetime-set-minute! pgdatetime-set-second!
pgdatetime-set-microsecond!
lazy-bool)
(import chicken scheme srfi-1 srfi-13)
(use posix extras data-structures autoload sql-null)
(define-record-type db
(make-db dbtype dbconn)
db?
(dbtype db-dbtype db-dbtype-set!)
(dbconn db-conn db-conn-set!))
|
|
|
|
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
pgdatetime-get-microsecond
pgdatetime-set-year! pgdatetime-set-month! pgdatetime-set-day!
pgdatetime-set-hour! pgdatetime-set-minute! pgdatetime-set-second!
pgdatetime-set-microsecond!
lazy-bool)
(import (chicken base) (chicken process) (chicken file) (chicken time) (chicken string) (chicken format) (chicken time posix) scheme srfi-1 srfi-13)
(import (chicken condition) autoload sql-null)
(define-record-type db
(make-db dbtype dbconn)
db?
(dbtype db-dbtype db-dbtype-set!)
(dbconn db-conn db-conn-set!))
|