Welcome to the CHICKEN Scheme pasting service
Separating view from action added by arthurmaciel on Wed Apr 24 23:31:17 2013
;; page.sxml `(p "hello, " ,name "!") ;; test.scm (use awful) (enable-sxml #t) (define-syntax render (syntax-rules () ((_ file) (include file)))) (define-page "test1" (lambda () (let ((name "Chicken")) (render "page.sxml")))) (define-page "test2" (lambda () (with-request-variables (name) (render "page.sxml")))) ;; http://localhost:8080/test1 ;; => hello, Chicken! ;; http://localhost:8080/test2 ;; => hello, ! ;; http://localhost:8080/test2?name=awful ;; => hello, awful!