Differences From Artifact [6b720dfd33]:
- File rmtmod.scm — part of check-in [ce91ddc6d7] at 2020-07-19 23:45:20 on branch v1.66-captain-ulex — start of do-over of ulex (user: matt, size: 3417) [annotate] [blame] [check-ins using] [more...]
To Artifact [4f89f84546]:
- File attic/rmtmod.scm — part of check-in [101ee7c52b] at 2021-03-06 04:39:46 on branch v1.65-real-chicken-5 — Try a grounds-up switch to chicken-5 (user: matt, size: 3490) [annotate] [blame] [check-ins using]
- File rmtmod.scm — part of check-in [f8657e116c] at 2021-02-14 22:33:19 on branch v1.65-real — Synced minor changes from modularized v1.6569-mult-db-wip branch (user: matt, size: 3490) [annotate] [blame] [check-ins using]
| ︙ | |||
36 37 38 39 40 41 42 43 44 45 46 47 48 49 | 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 | + | (import (prefix ulex ulex:)) (defstruct alldat (areapath #f) (ulexdat #f) ) ;;====================================================================== ;; return the handle struct for sending queries to a specific database ;; - initializes the connection object if this is the first access ;; - finds the "captain" and asks who to talk to for the given dbfname ;; - establishes the connection to the current dbowner ;; #;(define (rmt:connect alldat dbfname dbtype) (let* ((ulexdat (or (alldat-ulexdat alldat) |
| ︙ |