removed useless requires

original commit: c7f86d276c68b12e87dc46cef4a8e1b95538f88d
This commit is contained in:
Ryan Culpepper 2011-09-25 17:35:04 -06:00
parent 5faa598ff1
commit 02d8332600
44 changed files with 43 additions and 100 deletions

View File

@ -7,9 +7,8 @@
"html-properties.rkt"
scheme/list
scheme/class
scheme/contract
racket/contract/base
setup/main-collects
syntax/modresolve
(for-syntax scheme/base))
;; ----------------------------------------

View File

@ -1,4 +1,4 @@
#lang scheme
#lang racket/base
(require scribble/doclang scribble/base)
(provide (all-from-out scribble/doclang
scribble/base))

View File

@ -1,8 +1,7 @@
(module bnf mzscheme
(require "struct.rkt"
"decode.rkt"
mzlib/kw
mzlib/class)
mzlib/kw)
(provide BNF
nonterm

View File

@ -1,7 +1,7 @@
#lang scheme/base
(require "private/provide-structs.rkt"
scheme/serialize
scheme/contract
racket/contract/base
file/convertible)
;; ----------------------------------------

View File

@ -1,7 +1,5 @@
#lang scheme/base
(require "core.rkt"
"private/provide-structs.rkt")
(require "private/provide-structs.rkt")
(provide-structs
[part-index-desc ()])

View File

@ -2,8 +2,7 @@
(require "core.rkt"
"private/provide-structs.rkt"
"decode-struct.rkt"
scheme/contract
scheme/class
racket/contract/base
scheme/list)
(define (pre-content? i)

View File

@ -1,7 +1,6 @@
#lang racket/base
(require "struct.rkt"
"decode.rkt"
(require "decode.rkt"
(for-syntax racket/base
syntax/kerncase))

View File

@ -1,8 +1,9 @@
#lang racket/base
(require "manual.rkt" "struct.rkt" "scheme.rkt" "decode.rkt"
racket/string racket/list racket/file
racket/sandbox racket/promise racket/port file/convertible
racket/list
file/convertible ;; attached into new namespace via anchor
racket/sandbox racket/promise racket/port
racket/gui/dynamic
(for-syntax racket/base))

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require "private/provide-structs.rkt"
scheme/contract)
racket/contract/base)
(provide-structs
[body-id ([value string?])]

View File

@ -26,7 +26,7 @@
;; rendering; they will also be rendered in turn until no more resources are
;; created.
(require racket/list racket/string scribble/text "xml.rkt")
(require scribble/text)
;; default file, urls to it will point to its directory instead, and a
;; /-suffixed path will render to this file

View File

@ -1,8 +1,6 @@
#lang scheme/base
(require scribble/doclang
scribble/core
(except-in scribble/base author)
scribble/decode
scribble/jfp
setup/main-collects
"../private/defaults.rkt"

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require "private/provide-structs.rkt"
scheme/contract)
racket/contract/base)
(provide-structs
[tex-addition ([path (or/c path-string? (cons/c 'collects (listof bytes?)))])]

View File

@ -1,12 +1,10 @@
#lang scheme/base
(require "core.rkt"
"latex-properties.rkt"
"private/render-utils.rkt"
scheme/class
scheme/runtime-path
scheme/port
scheme/path
scheme/string
scheme/list
setup/main-collects

View File

@ -6,16 +6,15 @@
(prefix-in s/b: scribble/base)
scribble/decode
"../private/defaults.rkt"
(for-syntax racket/base racket/list)
setup/main-collects
scribble/html-properties
scribble/latex-properties
racket/stxparam
net/ftp
file/gunzip
(for-syntax racket/stxparam-exptime
racket/base
setup/dirs))
(for-syntax racket/base
racket/list
racket/stxparam-exptime))
(provide (except-out (all-from-out scribble/doclang) #%module-begin)
(all-from-out scribble/base)

View File

@ -1,4 +1,3 @@
#lang scheme
#lang racket/base
(require scribble/private/lp)
(provide chunk)

View File

@ -3,7 +3,7 @@
(provide (except-out (all-from-out scheme/base) #%module-begin)
(rename-out [module-begin #%module-begin]))
(require (for-syntax scheme/base syntax/boundmap scheme/list syntax/kerncase
(require (for-syntax scheme/base syntax/boundmap scheme/list
syntax/strip-context))
;; --- MF: bad hack for getting rid of comments

View File

@ -1,8 +1,7 @@
#lang scheme/base
(require "core.rkt"
"private/provide-structs.rkt"
scheme/contract)
racket/contract/base)
(provide-structs
[module-path-index-desc ()]

View File

@ -1,6 +1,6 @@
#lang racket/base
(require racket/class racket/file racket/path racket/port)
(require racket/class racket/file racket/path)
(provide make-indirect-renderer-mixin)

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require (for-syntax scheme/base syntax/boundmap scheme/list syntax/kerncase)
(require (for-syntax scheme/base syntax/boundmap)
scribble/scheme scribble/decode scribble/manual scribble/struct)
(begin-for-syntax

View File

@ -1,5 +1,5 @@
#lang scheme/base
(require scheme/contract
(require racket/contract/base
"../decode.rkt"
"../struct.rkt"
"../basic.rkt"

View File

@ -1,25 +1,15 @@
#lang scheme/base
(require "../decode.rkt"
"../struct.rkt"
(require "../struct.rkt"
"../scheme.rkt"
"../search.rkt"
"../basic.rkt"
"../manual-struct.rkt"
"manual-ex.rkt"
scheme/string
scheme/contract
scheme/list
scheme/class
scheme/stxparam
scheme/serialize
setup/main-collects
(for-syntax scheme/base
syntax/boundmap
syntax/kerncase)
racket/contract/base
(for-syntax scheme/base)
(for-label scheme/base
scheme/class))
(provide definition-site
libs->taglet
annote-exporting-library

View File

@ -9,14 +9,11 @@
scheme/serialize
scheme/stxparam
"manual-utils.rkt"
"manual-vars.rkt"
"manual-style.rkt"
"manual-scheme.rkt"
"manual-bind.rkt"
"manual-method.rkt"
"manual-proc.rkt"
"manual-ex.rkt"
scheme/string
scheme/list
(for-syntax scheme/base)
(for-label scheme/base

View File

@ -2,7 +2,6 @@
(require syntax/strip-context
syntax-color/module-lexer
"../racket.rkt"
"../core.rkt"
"../base.rkt"
"manual-scheme.rkt"
"manual-style.rkt"

View File

@ -2,23 +2,17 @@
(require "../decode.rkt"
"../struct.rkt"
"../scheme.rkt"
"../search.rkt"
"../basic.rkt"
"../manual-struct.rkt"
"qsloc.rkt"
"manual-utils.rkt"
"manual-vars.rkt"
"manual-style.rkt"
"manual-scheme.rkt"
"manual-bind.rkt"
"manual-method.rkt"
"manual-ex.rkt"
scheme/string
scheme/list
(for-syntax scheme/base)
(for-label scheme/base))
(provide defform defform* defform/subs defform*/subs defform/none
defidform defidform/inline
specform specform/subs

View File

@ -6,8 +6,6 @@
"manual-ex.rkt"
"manual-style.rkt"
"manual-scheme.rkt"
scheme/string
scheme/list
(for-syntax scheme/base)
(for-label scheme/base))

View File

@ -1,8 +1,6 @@
#lang racket/base
(require "../decode.rkt"
"../struct.rkt"
(require "../struct.rkt"
"../scheme.rkt"
"../search.rkt"
"../basic.rkt"
"../manual-struct.rkt"
(only-in "../core.rkt"

View File

@ -4,10 +4,8 @@
"../scheme.rkt"
"../search.rkt"
"../basic.rkt"
(only-in "../core.rkt" make-style box-mode)
racket/list
"manual-utils.rkt"
"manual-style.rkt"
"manual-utils.rkt" ;; used via datum->syntax
(for-syntax racket/base)
(for-label racket/base))

View File

@ -1,10 +1,8 @@
#lang scheme/base
(require "../html-properties.rkt"
"../latex-properties.rkt"
"on-demand.rkt"
setup/main-collects
scheme/promise)
setup/main-collects)
(provide scheme-properties)

View File

@ -11,7 +11,7 @@
"on-demand.rkt"
"manual-sprop.rkt"
racket/list
racket/contract
racket/contract/base
racket/string)
(provide (rename-out [hyperlink link])

View File

@ -1,8 +1,7 @@
#lang scheme/base
(require scheme/contract
(require racket/contract/base
"../decode.rkt"
"../struct.rkt"
"../basic.rkt"
"manual-utils.rkt"
"manual-style.rkt")

View File

@ -1,17 +1,11 @@
#lang scheme/base
(require "../decode.rkt"
"../struct.rkt"
"../scheme.rkt"
"../search.rkt"
"../basic.rkt"
"manual-utils.rkt"
"manual-vars.rkt"
"manual-style.rkt"
"manual-scheme.rkt"
"manual-bind.rkt"
"manual-ex.rkt"
"manual-proc.rkt"
scheme/contract
racket/contract/base
(for-syntax scheme/base)
(for-label scheme/base))

View File

@ -1,10 +1,9 @@
#lang scheme/base
(require "../struct.rkt"
"../decode.rkt"
"../base.rkt"
(only-in "../core.rkt"
content?)
scheme/contract
racket/contract/base
scheme/list)
(provide doc-prefix)

View File

@ -6,7 +6,7 @@
make-style style-name
nested-flow? nested-flow-blocks nested-flow-style)
"../html-properties.rkt"
scheme/contract
racket/contract/base
(for-syntax scheme/base
syntax/kerncase
syntax/boundmap)

View File

@ -1,4 +1,6 @@
#lang scheme
#lang racket/base
(require racket/promise
(for-syntax racket/base))
(provide define-on-demand)
(define-syntax-rule (define-on-demand id rhs)

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require scheme/serialize
scheme/contract
racket/contract/base
(for-syntax scheme/base))
(provide provide-structs)

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require scheme/system scheme/port scheme/promise)
(require scheme/system scheme/port)
(provide run-pdflatex)

View File

@ -4,10 +4,6 @@
"search.rkt"
"private/manual-sprop.rkt"
"private/on-demand.rkt"
mzlib/class
mzlib/for
syntax/modresolve
syntax/modcode
file/convertible
(for-syntax racket/base))

View File

@ -5,7 +5,7 @@
"xref.rkt"
racket/file
racket/class
racket/contract
racket/contract/base
(prefix-in html: "html-render.rkt"))
(provide/contract

View File

@ -1,7 +1,6 @@
(module search racket/base
(require "struct.rkt"
"basic.rkt"
setup/main-collects
syntax/modcode)
(provide find-racket-tag

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require setup/main-collects
scheme/contract
racket/contract/base
scribble/core
scribble/base
scribble/decode

View File

@ -2,7 +2,6 @@
(require scribble/doclang
scribble/core
scribble/base
scribble/decode
scribble/sigplan
racket/list
"../private/defaults.rkt"

View File

@ -1,6 +1,5 @@
#lang scheme/base
(require scheme/contract
(require racket/contract/base
(for-syntax scheme/base)
"provide-doc-transform.rkt")

View File

@ -7,7 +7,7 @@
"html-properties.rkt"
scheme/provide-syntax
scheme/struct-info
scheme/contract
racket/contract/base
(for-syntax scheme/base))
(define-provide-syntax (compat**-out stx)

View File

@ -1,15 +1,11 @@
#lang scheme/base
(require scribble/struct
scribble/manual-struct
scribble/decode-struct
scribble/base-render
scribble/search
(prefix-in html: scribble/html-render)
scheme/class
mzlib/serialize
scheme/path
setup/main-collects)
scheme/path)
(provide load-xref
xref?