+ ((or (equal? this-arg "-c")
+ (equal? this-arg "--certfile"))
+ (config-certfile-set! config (car rest-args))
+ (loop (cdr rest-args)))
+ ((or (equal? this-arg "-k")
+ (equal? this-arg "--keyfile"))
+ (config-keyfile-set! config (car rest-args))
+ (loop (cdr rest-args)))