html macro: Code/Data Mixing

((:table :border "1" :cellpadding "3")

;; Column headers

(:tr (:th "Days")

;; Service Names

(dolist (service service-rates)

(html (:th (:princ-safe (first service))))))

;; Row-generation loop

(loop

(when (>= start end)

(return))

(html

(:tr

;; Column 1: Hours

(:td (:princ (format nil "~d" start)))

;; Remaining columns are calculated based on

;; the service-rates data.

(dolist (service service-rates)

(html (:td (:princ ...

Syntax

programming

(e.g., loops)

driving

HTML

generation.

Previous slide Next slide Back to first slide View graphic version