Webアプリケーションへの応用

フローの途中で入力が欲しい
form
リンクのクリック
      (define (download context)
        (if (logged-in? context)
          (redirect-to-download-link)
          (show-login-form
            (lambda (username password)
              (login username password download)))))