Welcome to the CHICKEN Scheme pasting service

;; The URL points to a Dropbox shared folder. The dl=1 param makes it into a downloadable zip, after a couple of 302 redirects.
;;
;; This hangs with C6 http-client. OpenSSL was compiled from svn release/6/openssl/trunk
;;
;; On C5, it succeeds with "Got 248 bytes". This is consistent with `curl -sL "https://www.dropbox.com/scl/fo/f62170qvvvatutn7r39eq/ANQJ31fXhaLLPeByeUupBI4?rlkey=w0p96owi9vmz8gl2zr40z5kj7&st=fwel8620&dl=1" | wc -c`


(import (http-client)
        (chicken io))

(let* ((url "https://www.dropbox.com/scl/fo/f62170qvvvatutn7r39eq/ANQJ31fXhaLLPeByeUupBI4?rlkey=w0p96owi9vmz8gl2zr40z5kj7&st=fwel8620&dl=1")
       (data (with-input-from-request url #f read-string)))
  (print "Got " (string-length data) " bytes"))