Minor cleanup in utils.

original commit: eaaa4b2923ab1cfb6dc2f81b272af5ba26580dc7
This commit is contained in:
Eric Dobson 2013-11-16 14:02:04 -08:00
parent 9b6f54cb10
commit e461393ea8
2 changed files with 1 additions and 3 deletions

View File

@ -1,7 +1,6 @@
#lang racket/base
(require (for-template racket/base) racket/dict
syntax/parse syntax/id-table unstable/sequence)
(require racket/dict syntax/parse syntax/id-table unstable/sequence)
;; find and add to mapping all the set!'ed variables in form
;; if the supplied mapping is mutable, mutates it

View File

@ -139,7 +139,6 @@ at least theoretically.
(make-rename-transformer #'provide/contract)
(lambda (stx)
(define-syntax-class clause
#:literals ()
#:attributes (i)
(pattern [(~datum struct) (~or nm:id (nm:id super:id)) (flds ...)]
#:with i #'(struct-out nm))