From f0fd3e6b6b5e6bfbb8c504bc636bbacabbd6e84b Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 27 Jul 2007 17:23:14 +0000 Subject: [PATCH] units chapter in reference svn: r6976 original commit: 08c04d2579c36bca447011c4b6b898cfcacaa7f1 --- collects/scribble/manual.ss | 1 + 1 file changed, 1 insertion(+) diff --git a/collects/scribble/manual.ss b/collects/scribble/manual.ss index 438f96c4..aa6cbcd9 100644 --- a/collects/scribble/manual.ss +++ b/collects/scribble/manual.ss @@ -303,6 +303,7 @@ [(_ [spec ...] desc ...) #'(defform*/subs [spec ...] () desc ...)])) (define-syntax (defform stx) (syntax-case stx () + [(_ #:literals (lit ...) spec desc ...) #'(defform*/subs #:literals (lit ...) [spec] () desc ...)] [(_ spec desc ...) #'(defform*/subs [spec] () desc ...)])) (define-syntax (defform/subs stx) (syntax-case stx ()