(require (lib "unitsig.ss")
	 (lib "servlet-sig.ss" "web-server")
	 (lib "servlet-helpers.ss" "web-server")
	 (lib "xml.ss" "xml"))

(unit/sig ()
    (import servlet^)

  ;;; Servlet code

  (define (say-hello)
    `(html (head (title "Hallo!"))
	   (body ((bgcolor "white"))
		 (h2 "Hallo Welt!")
		 (p "Wie geht's denn so?"))))

  (say-hello))