(module bindings mzscheme

  (provide (all-defined))

  (require (lib "cgi.ss" "net"))

  (define bindings (get-bindings))

  (define ebs 
    (lambda (s)
      (extract-binding/single s bindings)))

  (define exists-binding?
    (lambda (sym)
      (if (assoc sym bindings)
	  #t
	  #f)))
)