| taggen-2.scm - Functions that generate single and double tags. | Lecture 4 - slide 27 : 34 Program 2 |
(define (single-tag name attributes)
(start-tag name attributes))
(define (double-tag name contents attributes)
(string-append (start-tag name attributes)
(as-string contents)
(end-tag name)))