Artifact
b71aaa144e2222d3beea0665f5ba3d9c3d8d88d0:
0000: 3b 3b 20 63 68 6f 6f 73 65 20 79 6f 75 72 20 64 ;; choose your d
0010: 62 20 69 6e 74 65 72 66 61 63 65 20 61 73 20 61 b interface as a
0020: 70 70 72 6f 70 72 69 61 74 65 0a 28 72 65 71 75 ppropriate.(requ
0030: 69 72 65 2d 65 78 74 65 6e 73 69 6f 6e 20 73 71 ire-extension sq
0040: 6c 69 74 65 33 29 0a 28 69 6d 70 6f 72 74 20 28 lite3).(import (
0050: 70 72 65 66 69 78 20 73 71 6c 69 74 65 33 20 73 prefix sqlite3 s
0060: 71 6c 69 74 65 33 3a 29 29 0a 0a 3b 3b 20 28 72 qlite3:))..;; (r
0070: 65 71 75 69 72 65 2d 65 78 74 65 6e 73 69 6f 6e equire-extension
0080: 20 70 6f 73 74 67 72 65 73 71 6c 29 0a 3b 3b 20 postgresql).;;
0090: 28 69 6d 70 6f 72 74 20 28 70 72 65 66 69 78 20 (import (prefix
00a0: 70 6f 73 74 67 72 65 73 71 6c 20 70 67 3a 29 29 postgresql pg:))
00b0: 0a 0a 3b 3b 20 28 72 65 71 75 69 72 65 2d 65 78 ..;; (require-ex
00c0: 74 65 6e 73 69 6f 6e 20 63 67 69 2d 75 74 69 6c tension cgi-util
00d0: 29 0a 3b 3b 20 28 72 65 71 75 69 72 65 2d 65 78 ).;; (require-ex
00e0: 74 65 6e 73 69 6f 6e 20 63 6f 6f 6b 69 65 29 0a tension cookie).
00f0: 28 75 73 65 20 70 6f 73 69 78 29 0a 3b 3b 20 28 (use posix).;; (
0100: 72 65 71 75 69 72 65 2d 65 78 74 65 6e 73 69 6f require-extensio
0110: 6e 20 70 72 6f 70 6c 69 73 74 29 0a 28 75 73 65 n proplist).(use
0120: 20 72 65 67 65 78 29 0a 28 75 73 65 20 73 72 66 regex).(use srf
0130: 69 2d 31 29 20 0a 3b 3b 20 28 72 65 71 75 69 72 i-1) .;; (requir
0140: 65 2d 65 78 74 65 6e 73 69 6f 6e 20 74 69 6e 79 e-extension tiny
0150: 63 6c 6f 73 29 0a 28 75 73 65 20 73 72 66 69 2d clos).(use srfi-
0160: 36 39 29 0a 28 75 73 65 20 64 61 74 61 2d 73 74 69).(use data-st
0170: 72 75 63 74 75 72 65 73 29 0a ructures).