audit requires of files that require misc.rkt in racket/contract

This commit is contained in:
Robby Findler 2015-12-22 16:26:17 -06:00
parent 7708b2056a
commit badf2bd19e
13 changed files with 5 additions and 24 deletions

View File

@ -7,7 +7,6 @@
[module-identifier-mapping-get free-identifier-mapping-get]
[module-identifier-mapping-put! free-identifier-mapping-put!]
[module-identifier-mapping-for-each free-identifier-mapping-for-each])
"application-arity-checking.rkt"
"arr-util.rkt"
(for-template racket/base
"misc.rkt"))

View File

@ -8,8 +8,6 @@
"misc.rkt"
"prop.rkt"
"guts.rkt"
"generate.rkt"
racket/stxparam
(prefix-in arrow: "arrow.rkt"))
(provide (for-syntax build-chaperone-constructor/real)

View File

@ -3,7 +3,6 @@
"application-arity-checking.rkt"
"arr-util.rkt")
"kwd-info-struct.rkt"
"arity-checking.rkt"
"blame.rkt"
"misc.rkt"
"prop.rkt"

View File

@ -4,7 +4,6 @@
"blame.rkt"
"prop.rkt"
"misc.rkt"
"generate.rkt"
racket/stxparam
racket/private/performance-hint)
(require (for-syntax racket/base)

View File

@ -13,10 +13,7 @@
"guts.rkt"
"blame.rkt"
"prop.rkt"
"arrow.rkt"
"misc.rkt"
"generate.rkt"
)
"generate.rkt")
(begin-for-syntax
(define lifted-key (gensym 'contract:lifted))

View File

@ -3,8 +3,7 @@
(require (for-syntax racket/base)
"prop.rkt"
"blame.rkt"
"guts.rkt"
"misc.rkt")
"guts.rkt")
(provide box-immutable/c
(rename-out [wrap-box/c box/c]))

View File

@ -20,8 +20,7 @@ it around flattened out.
(require "guts.rkt"
"prop.rkt"
"blame.rkt"
"opt.rkt"
"misc.rkt")
"opt.rkt")
(require (for-syntax racket/base)
(for-syntax "ds-helpers.rkt")
(for-syntax "helpers.rkt")

View File

@ -4,8 +4,7 @@
syntax/location
"guts.rkt"
"blame.rkt"
"prop.rkt"
"misc.rkt")
"prop.rkt")
(provide (rename-out [wrap-hash/c hash/c])
hash/dc)

View File

@ -1,6 +1,5 @@
#lang racket/base
(require "prop.rkt"
"misc.rkt"
"blame.rkt"
"guts.rkt"
"base.rkt"

View File

@ -4,7 +4,6 @@
"guts.rkt"
"arrow.rkt"
"blame.rkt"
"misc.rkt"
"arrow.rkt"
"arrow-val-first.rkt"
"orc.rkt"

View File

@ -1,7 +1,6 @@
#lang racket/base
(require "prop.rkt"
"blame.rkt"
"misc.rkt"
"guts.rkt"
(for-syntax "arr-util.rkt" racket/base))
(provide parametric->/c)

View File

@ -26,14 +26,10 @@
[make-module-identifier-mapping make-free-identifier-mapping]
[module-identifier-mapping-get free-identifier-mapping-get]
[module-identifier-mapping-put! free-identifier-mapping-put!]))
"arrow.rkt"
"arrow-val-first.rkt"
"base.rkt"
"guts.rkt"
"misc.rkt"
"exists.rkt"
"opt.rkt"
"prop.rkt"
"blame.rkt"
syntax/location
syntax/srcloc)

View File

@ -1,8 +1,7 @@
#lang racket/base
(require "guts.rkt"
"blame.rkt"
"prop.rkt"
"misc.rkt")
"prop.rkt")
(provide (rename-out [struct-type-property/c* struct-type-property/c]))
(define (get-stpc-late-neg-proj stpc)