Test output for html-form [ok]
Testing time: 0s
/home/mario/local/chicken-4.8.0.3/bin/csi -script run.scm < /dev/null ((div (@ (id Personal-Data)) (fieldset (@ (class repeat)) (legend ("Personal Data")) (((div (@ ()) (span (@ (class oneField)) (label (@ (for First-Name) (class preField)) ("First Name * ")) () (input (@ (name First-Name) (id First-Name) (title ("First Name * ")) (value "") (type "text") ())))) "\n") ((div (@ ()) (span (@ (class oneField)) (label (@ (for Last-Name) (class preField)) ("Last Name * ")) () (input (@ (name Last-Name) (id Last-Name) (title ("Last Name * ")) (value "") (type "text") ())))) "\n") ((div (@ ()) (span (@ (class oneField)) (label (@ (for email) (class preField)) ("Email address * ")) () (input (@ (name email) (id email) (title ("Email address * ")) (value "") (type "text") ())))) "\n") ((div (@ ()) (span (@ (class oneField)) (label (@ (for Nationality) (class preField)) ("Nationality *")) () ((select (@ (name Nationality) (id Nationality) (title ("Nationality *")) () ()) (((option (@ (value "Afghanistan") (label "Afghanistan")) "Afghanistan") "\n") ((option (@ (value "Albania") (label "Albania")) "Albania") "\n") ((option (@ (value "Algeria") (label "Algeria")) "Algeria") "\n") ((option (@ (value "American Samoa") (label "American Samoa")) "American Samoa") "\n") ((option (@ (value "Andorra") (label "Andorra")) "Andorra") "\n")))))) "\n") ((div (@ ()) (span (@ (class oneField)) (label (@ (for Birth-Year) (class preField)) ("Year of birth *")) () ((select (@ (name Birth-Year) (id Birth-Year) (title ("Year of birth *")) () ()) (((option (@ (value "1940") (label "1940")) "1940") "\n") ((option (@ (value "1941") (label "1941")) "1941") "\n") ((option (@ (value "1942") (label "1942")) "1942") "\n") ((option (@ (value "1943") (label "1943")) "1943") "\n") ((option (@ (value "1944") (label "1944")) "1944") "\n") ((option (@ (value "1945") (label "1945")) "1945") "\n") ((option (@ (value "1946") (label "1946")) "1946") "\n") ((option (@ (value "1947") (label "1947")) "1947") "\n") ((option (@ (value "1948") (label "1948")) "1948") "\n") ((option (@ (value "1949") (label "1949")) "1949") "\n") ((option (@ (value "1950") (label "1950")) "1950") "\n") ((option (@ (value "1951") (label "1951")) "1951") "\n") ((option (@ (value "1952") (label "1952")) "1952") "\n") ((option (@ (value "1953") (label "1953")) "1953") "\n") ((option (@ (value "1954") (label "1954")) "1954") "\n") ((option (@ (value "1955") (label "1955")) "1955") "\n") ((option (@ (value "1956") (label "1956")) "1956") "\n") ((option (@ (value "1957") (label "1957")) "1957") "\n") ((option (@ (value "1958") (label "1958")) "1958") "\n") ((option (@ (value "1959") (label "1959")) "1959") "\n") ((option (@ (value "1960") (label "1960")) "1960") "\n") ((option (@ (value "1961") (label "1961")) "1961") "\n") ((option (@ (value "1962") (label "1962")) "1962") "\n") ((option (@ (value "1963") (label "1963")) "1963") "\n") ((option (@ (value "1964") (label "1964")) "1964") "\n") ((option (@ (value "1965") (label "1965")) "1965") "\n") ((option (@ (value "1966") (label "1966")) "1966") "\n") ((option (@ (value "1967") (label "1967")) "1967") "\n") ((option (@ (value "1968") (label "1968")) "1968") "\n") ((option (@ (value "1969") (label "1969")) "1969") "\n") ((option (@ (value "1970") (label "1970")) "1970") "\n") ((option (@ (value "1971") (label "1971")) "1971") "\n") ((option (@ (value "1972") (label "1972")) "1972") "\n") ((option (@ (value "1973") (label "1973")) "1973") "\n") ((option (@ (value "1974") (label "1974")) "1974") "\n") ((option (@ (value "1975") (label "1975")) "1975") "\n") ((option (@ (value "1976") (label "1976")) "1976") "\n") ((option (@ (value "1977") (label "1977")) "1977") "\n") ((option (@ (value "1978") (label "1978")) "1978") "\n") ((option (@ (value "1979") (label "1979")) "1979") "\n") ((option (@ (value "1980") (label "1980")) "1980") "\n") ((option (@ (value "1981") (label "1981")) "1981") "\n") ((option (@ (value "1982") (label "1982")) "1982") "\n") ((option (@ (value "1983") (label "1983")) "1983") "\n") ((option (@ (value "1984") (label "1984")) "1984") "\n") ((option (@ (value "1985") (label "1985")) "1985") "\n") ((option (@ (value "1986") (label "1986")) "1986") "\n") ((option (@ (value "1987") (label "1987")) "1987") "\n") ((option (@ (value "1988") (label "1988")) "1988") "\n") ((option (@ (value "1989") (label "1989")) "1989") "\n")))))) "\n") ((div (@ ()) (span (@ (class oneField)) (label (@ (for Gender) (class preField)) ("Gender *")) () ((select (@ (name Gender) (id Gender) (title ("Gender *")) () ()) (((option (@ (value "Female") (label "Female")) "Female") "\n") ((option (@ (value "Male") (label "Male")) "Male") "\n")))))) "\n")))) (div (@ (id Education)) (fieldset (@ (class repeat)) (legend ("Education & professional background")) (((div (@ ()) (span (@ (class oneField)) (label (@ (for Degree) (class preField)) ("Degrees obtained ")) () (((br) (input (@ (type checkbox) (name Degree) (value "Bachelor of Science;") ())) "Bachelor of Science") ((br) (input (@ (type checkbox) (name Degree) (value "Master of Science;") ())) "Master of Science") ((br) (input (@ (type checkbox) (name Degree) (value "Ph.D.;") ())) "Ph.D.") ((br) (input (@ (type checkbox) (name Degree) (value "Current undergraduate student;") ())) "Current undergraduate student")))) "\n") ((div (@ ()) (span (@ (class oneField)) (label (@ (for Major) (class preField)) ("Academic major ")) () ((select (@ (name Major) (id Major) (title ("Academic major ")) () (multiple "yes")) (((option (@ (value "Artificial Intelligence") (label "Artificial Intelligence")) "Artificial Intelligence") "\n") ((option (@ (value "Biochemistry") (label "Biochemistry")) "Biochemistry") "\n") ((option (@ (value "Biology") (label "Biology")) "Biology") "\n") ((option (@ (value "Biomedicine") (label "Biomedicine")) "Biomedicine") "\n") ((option (@ (value "Biophysics") (label "Biophysics")) "Biophysics") "\n") ((option (@ (value "Biotechnology") (label "Biotechnology")) "Biotechnology") "\n") ((option (@ (value "Chemistry") (label "Chemistry")) "Chemistry") "\n") ((option (@ (value "Cognitive science") (label "Cognitive science")) "Cognitive science") "\n") ((option (@ (value "Computational Biology") (label "Computational Biology")) "Computational Biology") "\n") ((option (@ (value "Computational Neuroscience") (label "Computational Neuroscience")) "Computational Neuroscience") "\n") ((option (@ (value "Computer Science") (label "Computer Science")) "Computer Science") "\n") ((option (@ (value "Engineering") (label "Engineering")) "Engineering") "\n") ((option (@ (value "Genetics") (label "Genetics")) "Genetics") "\n") ((option (@ (value "Mathematics") (label "Mathematics")) "Mathematics") "\n") ((option (@ (value "Medicine") (label "Medicine")) "Medicine") "\n") ((option (@ (value "Neural Networks") (label "Neural Networks")) "Neural Networks") "\n") ((option (@ (value "Neuroinformatics") (label "Neuroinformatics")) "Neuroinformatics") "\n") ((option (@ (value "Neuroscience") (label "Neuroscience")) "Neuroscience") "\n") ((option (@ (value "Physics") (label "Physics")) "Physics") "\n") ((option (@ (value "Psychology") (label "Psychology")) "Psychology") "\n") ((option (@ (value "Systems Biology") (label "Systems Biology")) "Systems Biology") "\n") ((option (@ (value "Other") (label "Other")) "Other") "\n")))))) "\n") ((div (@ ()) (span (@ (class oneField)) (label (@ (for Degree-Other) (class preField)) ("Degree obtained if other ")) () (input (@ (name Degree-Other) (id Degree-Other) (title ("Degree obtained if other ")) (value "") (type "text") ())))) "\n") ((div (@ ()) (span (@ (class oneField)) (label (@ (for Education-History) (class preField)) ("Education history")) (p (@ (class inlineLabel)) ("Please list year, institution, and highest degree obtained. ")) (((textarea (@ (name Education-History) (id Education-History) (rows 10) (cols 60) (title ("Education history")) ()) "\n" ("" " ")) (p))))) "\n")))))