1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
;; this is a good place to populate the *functions* hash with
;; functions needed during the transition to modules
;;
;; NOTE: the definition in dbmod seems to "win" - make it available everywhere
;;
(set-fn 'client:setup client:setup)
;; (set-fn 'db:setup db:setup)
(set-fn 'server:expiration-timeout server:expiration-timeout)
(set-fn 'common:get-homehost common:get-homehost)
(set-fn 'server:check-if-running server:check-if-running)
(set-fn 'api:execute-requests api:execute-requests)
(set-fn 'http-transport:close-connections http-transport:close-connections )
(set-fn 'http-transport:client-api-send-receive http-transport:client-api-send-receive)
(set-fn 'server:kind-run server:kind-run)
(set-fn 'server:start-and-wait server:start-and-wait)
(set-fn 'server:check-if-running server:check-if-running)
(set-fn 'server:ping server:ping )
(set-fn 'common:force-server? common:force-server? )
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
;; this is a good place to populate the *functions* hash with
;; functions needed during the transition to modules
;;
;; NOTE: the definition in dbmod seems to "win" - make it available everywhere
;;
;; (set-fn 'client:setup client:setup)
;; ;; (set-fn 'db:setup db:setup)
;; (set-fn 'server:expiration-timeout server:expiration-timeout)
;; (set-fn 'common:get-homehost common:get-homehost)
;; (set-fn 'server:check-if-running server:check-if-running)
;; (set-fn 'api:execute-requests api:execute-requests)
;; (set-fn 'http-transport:close-connections http-transport:close-connections )
;; (set-fn 'http-transport:client-api-send-receive http-transport:client-api-send-receive)
;; (set-fn 'server:kind-run server:kind-run)
;; (set-fn 'server:start-and-wait server:start-and-wait)
;; (set-fn 'server:check-if-running server:check-if-running)
;; (set-fn 'server:ping server:ping )
;; (set-fn 'common:force-server? common:force-server? )
|