Minor cleanup in utils.
This commit is contained in:
parent
7a31c966c8
commit
eaaa4b2923
|
@ -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
|
||||
|
|
|
@ -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))
|
||||
|
|
Loading…
Reference in New Issue
Block a user