diff --git a/all.options b/all.options new file mode 100644 index 0000000..1d65c46 --- /dev/null +++ b/all.options @@ -0,0 +1,3 @@ +;; csm options file -*- lisp-data -*- +"-program" "rain" +"-optimize-level" "3" diff --git a/rain.scm b/rain.scm old mode 100755 new mode 100644 index a373d91..b3e8b7e --- a/rain.scm +++ b/rain.scm @@ -1,19 +1,5 @@ -#!/bin/sh -#| -*- scheme -*- -exec csi -ss "$0" "$@" -|# - (define parallel 1) -(import (chicken io) - (chicken format) - (chicken port) - (chicken process-context) - (html-parser) - (http-client) - (matchable) - (srfi-18)) - (define (find-comic-image index) (call-with-current-continuation (lambda (k) diff --git a/rain.sld b/rain.sld new file mode 100755 index 0000000..0c2c22e --- /dev/null +++ b/rain.sld @@ -0,0 +1,20 @@ +#!/bin/sh +#| -*- scheme -*- +exec csi -s "$0" "$@" +|# +(define-library (rain) + (import + (scheme base) + (scheme file) + (chicken base) + (chicken io) + (chicken format) + (chicken port) + (chicken process-context) + (html-parser) + (openssl) ; has to be before http-client + (http-client) + (matchable) + (srfi-18)) + (include "rain.scm") + (begin (main (command-line-arguments))))