続・Formの自動処理 : (2004/12/09)

フォームの自動処理を修正
let式に似た形式で書けば、ハッシュテーブルを生成するように展開されるマクロを書く

(display
  (html-form-fill
    (call-with-input-file "tmpl.html" port->string)
    (
      ("text" "test-string")
      ("select" "4")
      ("cehck" (list "1" "4" "5")))))

html-form-fillは通常の関数とは違い、define-syntaxで定義されている
上記のコードは、以下のコードと同じ結果になる

(define form-param (make-hash-table 'string=?))
(hash-table-put! form-param "text" "test-string")
(hash-table-put! form-param "select" "4")
(hash-table-put! form-param "cehck" (list "1" "4" "5"))

(display
  (html-form-fill-by-hash-table
    (call-with-input-file "tmpl.html" port->string)
    form-param))

: back