Megatest

Check-in [ee51b46291]
Login
Overview
Comment:made rpc default transport, not http.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.62-rpc
Files: files | file ages | folders
SHA1: ee51b46291855cbf783a9201521fdd2527ea9c64
User & Date: bjbarcla on 2016-12-08 14:54:05
Other Links: branch diff | manifest | tags
Context
2016-12-09
17:25
switched default transport back to http Closed-Leaf check-in: 37f53d58ab user: bjbarcla tags: v1.62-rpc
2016-12-08
14:54
made rpc default transport, not http. check-in: ee51b46291 user: bjbarcla tags: v1.62-rpc
14:46
fixed a few bugs - orphaned client tcp ports, sql error (Matt fixed in v1.63 which we are merging in this commit) check-in: e5d7dac0b8 user: bjbarcla tags: v1.62-rpc
Changes

Modified common.scm from [f821d893bb] to [98bfc33987].

121
122
123
124
125
126
127
128
129
130
131
132
133
134
135

(define (common:set-transport-type)
  (set! *transport-type*
        (string->symbol
         (or
          (args:get-arg "-transport")
          (configf:lookup *configdat* "server" "transport")
          "http")))
  *transport-type*)
  
(define *runremote*         #f)                ;; if set up for server communication this will hold <host port>
(define *max-cache-size*    0)
(define *logged-in-clients* (make-hash-table))
(define *server-id*         #f)
(define *server-info*       #f)







|







121
122
123
124
125
126
127
128
129
130
131
132
133
134
135

(define (common:set-transport-type)
  (set! *transport-type*
        (string->symbol
         (or
          (args:get-arg "-transport")
          (configf:lookup *configdat* "server" "transport")
          "rpc")))
  *transport-type*)
  
(define *runremote*         #f)                ;; if set up for server communication this will hold <host port>
(define *max-cache-size*    0)
(define *logged-in-clients* (make-hash-table))
(define *server-id*         #f)
(define *server-info*       #f)