Overview
| Comment: | re-ordered imports as needed |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.7001-multi-db-wip | v1.7001-multi-db-rb01 |
| Files: | files | file ages | folders |
| SHA1: |
44a49092afe27c0f04c088023cdd0c1f |
| User & Date: | matt on 2022-04-10 20:35:45 |
| Other Links: | branch diff | manifest | tags |
Context
|
2022-04-11
| ||
| 22:09 | prefix debugprint module calls to prevent collision Closed-Leaf check-in: 81b5060fe1 user: matt tags: v1.7001-multi-db-wip, v1.7001-multi-db-rb01 | |
|
2022-04-10
| ||
| 20:35 | re-ordered imports as needed check-in: 44a49092af user: matt tags: v1.7001-multi-db-wip, v1.7001-multi-db-rb01 | |
| 20:05 | Merged Martin's fix. Got commonmod, debugprint and mtargs modules working check-in: 911725fc69 user: matt tags: v1.7001-multi-db-wip, v1.7001-multi-db-rb01 | |
Changes
Modified common.scm from [5763edddd8] to [151bd91410].
| ︙ | ︙ | |||
24 25 26 27 28 29 30 |
matchable regex posix (srfi 18) extras ;; tcp
(prefix nanomsg nmsg:)
(prefix sqlite3 sqlite3:)
pkts (prefix dbi dbi:)
)
(declare (unit common))
| | | | 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 |
matchable regex posix (srfi 18) extras ;; tcp
(prefix nanomsg nmsg:)
(prefix sqlite3 sqlite3:)
pkts (prefix dbi dbi:)
)
(declare (unit common))
(declare (uses commonmod))
(import commonmod)
(include "common_records.scm")
;; (require-library margs)
;; (include "margs.scm")
|
| ︙ | ︙ |
Modified server.scm from [6d65c175e8] to [738089147e].
| ︙ | ︙ | |||
20 21 22 23 24 25 26 |
(use srfi-1 posix regex regex-case srfi-69 hostinfo md5 message-digest
directory-utils posix-extras matchable utils)
(use spiffy uri-common intarweb http-client spiffy-request-vars)
(declare (unit server))
| < > > > | 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 |
(use srfi-1 posix regex regex-case srfi-69 hostinfo md5 message-digest
directory-utils posix-extras matchable utils)
(use spiffy uri-common intarweb http-client spiffy-request-vars)
(declare (unit server))
(declare (uses common))
(declare (uses db))
(declare (uses tasks)) ;; tasks are where stuff is maintained about what is running.
;; (declare (uses synchash))
(declare (uses http-transport))
;;(declare (uses rpc-transport))
(declare (uses launch))
;; (declare (uses daemon))
(declare (uses commonmod))
(import commonmod)
(include "common_records.scm")
(include "db_records.scm")
(define (server:make-server-url hostport)
(if (not hostport)
#f
|
| ︙ | ︙ |