1313(defparameter *max-concurrent-connections* 8
1414 " The maximum amount of concurrent queries sent to a sparql endpoint." )
1515
16- (defparameter *log-sparql-query-roundtrip* nil )
16+ (defparameter *log-sparql-query-roundtrip* nil
17+ " When set to non-nil, we log both the outgoing query sent to and response received from the sparql endpoint." )
1718
18- (defparameter *aquire -db-semaphore-timeout* 55
19- " Amount of time (in seconds) to wait to aquire the semaphore (default is now 55).
19+ (defparameter *acquire -db-semaphore-timeout* 55
20+ " Amount of time (in seconds) to wait to acquire the semaphore (default is now 55).
2021
21- NIL symolizes to wait forever." )
22+ NIL symbolizes to wait forever." )
2223
2324; ; Overriding the default values here for now. Ideally these get calculated based on how much time we have left.
2425(setf dexador.util :*default-connect-timeout* 60 )
@@ -144,7 +145,7 @@ When the VERBOSE keyword is truethy, output is written to STDOUT."
144145(defun query (string &key (send-to-single nil ))
145146 " Sends a query to the backend and responds with the response body.
146147
147- When SEND-TO-SINGLE is truethy and multple endpoints are available, the request is sent to only one of them."
148+ When SEND-TO-SINGLE is truethy and multiple endpoints are available, the request is sent to only one of them."
148149 (ensure-backends-variable)
149150 (let* ((selected-endpoints
150151 (if send-to-single
@@ -157,7 +158,7 @@ When SEND-TO-SINGLE is truethy and multple endpoints are available, the request
157158 ; ; - a single failing endpoint will bring the whole setup down in this implementation
158159 ; ; - the implementation does not fire off the queries in parallel, we may want a thread per semaphore for that
159160 ; ; - a full-fledged and parallel implementation likely means rewriting this whole logic and the construction of the sparql-endpoint struct
160- (support :with-multiple-semaphores ((mapcar #' sparql-endpoint-semaphore selected-endpoints) :timeout *aquire -db-semaphore-timeout* )
161+ (support :with-multiple-semaphores ((mapcar #' sparql-endpoint-semaphore selected-endpoints) :timeout *acquire -db-semaphore-timeout* )
161162 (let ((post-handler (lambda () nil ))) ; overwritten with handler on error
162163 (unwind-protect
163164 (support :with-exponential-backoff-retry
0 commit comments