You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
#lang debug racket
|
|
(require "struct.rkt"
|
|
quad/quad
|
|
pitfall)
|
|
(provide (all-defined-out))
|
|
|
|
(define q:doc (make-quad
|
|
#:type doc-quad
|
|
#:draw-start (λ (q doc) (start-doc doc))
|
|
#:draw-end (λ (q doc) (end-doc doc))))
|