(module fetch ()
 
(import scheme)
(import (chicken port))
(import http-client)
 
(define uri "https://codeberg.org/jrapdx/leptonic/archive/0.2.0.tar.gz")
 
(call-with-input-request uri #f
  (lambda (i)
    (call-with-output-file "0.2.0.tar.gz"
      (lambda (o) (copy-port i o)))))
 
)