Rename generics => generic.

This commit is contained in:
Asumu Takikawa 2012-05-24 00:07:16 -04:00 committed by Vincent St-Amour
parent 11dc825126
commit a22633e348
24 changed files with 30 additions and 30 deletions

View File

@ -3,7 +3,7 @@
racket/contract/base
racket/string
ffi/unsafe/atomic
racket/private/generics)
racket/private/generic)
(define ordering/c
(or/c '= '< '>))

View File

@ -4,7 +4,7 @@
racket/contract
racket/dict
racket/base
racket/generics))
racket/generic))
@title{Orders and Ordered Dictionaries}

View File

@ -2,7 +2,7 @@
(require racket/match
racket/contract/base
racket/dict
racket/generics
racket/generic
"order.rkt")
;; owned by ryanc

View File

@ -4,7 +4,7 @@
racket/match
racket/dict
racket/contract/base
racket/generics
racket/generic
"order.rkt")
#|

View File

@ -1173,7 +1173,7 @@ path/s is either such a string or a list of them.
"collects/racket/contract/private/ds.rkt" responsible (robby)
"collects/racket/contract/private/guts.rkt" responsible (robby)
"collects/racket/contract/private/helpers.rkt" responsible (robby)
"collects/racket/generics.rkt" responsible (asumu stamourv)
"collects/racket/generic.rkt" responsible (asumu stamourv)
"collects/racket/gui/base.rkt" drdr:command-line (gracket "-t" *)
"collects/racket/gui/init.rkt" drdr:command-line (gracket "-t" *)
"collects/racket/gui.rkt" drdr:command-line (gracket "-t" *)
@ -1181,7 +1181,7 @@ path/s is either such a string or a list of them.
"collects/racket/match.rkt" responsible (samth)
"collects/racket/place" responsible (tewk)
"collects/racket/place/distributed/examples/hello-world.rkt" drdr:command-line #f
"collects/racket/private/generics.rkt" responsible (asumu stamourv)
"collects/racket/private/generic.rkt" responsible (asumu stamourv)
"collects/racket/slice.rkt" responsible (jay)
"collects/racklog" responsible (jay)
"collects/rackunit" responsible (jay noel ryanc)
@ -1286,7 +1286,7 @@ path/s is either such a string or a list of them.
"collects/scribblings/guide/read.scrbl" drdr:command-line #f
"collects/scribblings/raco" responsible (jay mflatt)
"collects/scribblings/reference/distributed.scrbl" responsible (tewk)
"collects/scribblings/reference/generics.scrbl" responsible (asumu stamourv)
"collects/scribblings/reference/generic.scrbl" responsible (asumu stamourv)
"collects/scriblib" responsible (mflatt)
"collects/setup" responsible (mflatt)
"collects/setup/main.rkt" drdr:command-line #f
@ -1498,7 +1498,7 @@ path/s is either such a string or a list of them.
"collects/tests/future" responsible (jamesswaine mflatt robby)
"collects/tests/future/future.rkt" drdr:timeout 200
"collects/tests/future/random-future.rkt" drdr:timeout 480
"collects/tests/generics" responsible (asumu stamourv)
"collects/tests/generic" responsible (asumu stamourv)
"collects/tests/gracket" responsible (mflatt)
"collects/tests/gracket/auto.rktl" drdr:command-line #f
"collects/tests/gracket/blits.rkt" drdr:command-line (gracket "-f" *)

View File

@ -1,13 +1,13 @@
#lang racket/base
(require (rename-in "private/generics.rkt"
(require (rename-in "private/generic.rkt"
[define-generics define-generics/pre])
(for-syntax racket/base racket/local))
;; Convenience layer on top of racket/private/generics.
;; To avoid circular dependencies, racket/private/generics cannot use
;; Convenience layer on top of racket/private/generic.
;; To avoid circular dependencies, racket/private/generic cannot use
;; `parse-keyword-options' (which depends on racket/dict). So we do
;; keyword argument parsing here.
;; Files that use racket/private/generics _must_ pass _all_ keyword
;; Files that use racket/private/generic _must_ pass _all_ keyword
;; arguments to define-generics _in_order_.
(provide define-generics define/generic)

View File

@ -1,6 +1,6 @@
#lang racket/base
(require racket/private/generics ; to avoid circular dependencies
(require racket/private/generic ; to avoid circular dependencies
(for-syntax racket/base))
(define-generics (dict gen:dict prop:dict dict? #:defined-table dict-def-table

View File

@ -12,7 +12,7 @@
(define-syntax (define-generics stx)
(syntax-case stx () ; can't use syntax-parse, since it depends on us
;; keyword arguments must _all_ be provided _in_order_. For the
;; user-facing version of `define-generics', see racket/generics.
;; user-facing version of `define-generics', see racket/generic.
;;
;; The `header` is the original name the library writer provides
;; that is used to define the `name`, `prop:name`, and `name?`

View File

@ -1,6 +1,6 @@
#lang racket/base
(require racket/private/generics
(require racket/private/generic
(rename-in "private/for.rkt"
[stream-ref stream-get-generics]
[stream-empty? -stream-empty]

View File

@ -1,6 +1,6 @@
#lang scribble/doc
@(require "mz.rkt" (for-syntax racket/base) (for-label racket/serialize
racket/generics))
racket/generic))
@(define posn-eval (make-base-eval))
@(interaction-eval #:eval posn-eval (require (for-syntax racket/base)))

View File

@ -1,8 +1,8 @@
#lang scribble/doc
@(require "mz.rkt" scribble/eval (for-label racket/generics))
@(require "mz.rkt" scribble/eval (for-label racket/generic))
@(define dict-eval (make-base-eval))
@(interaction-eval #:eval dict-eval (require racket/dict racket/generics))
@(interaction-eval #:eval dict-eval (require racket/dict racket/generic))
@title[#:tag "dicts"]{Dictionaries}

View File

@ -1,5 +1,5 @@
#lang scribble/manual
@(require (for-label racket/base racket/generics))
@(require (for-label racket/base racket/generic))
@title[#:tag "struct-generics"]{Generic Interfaces}
@; @author[@author+email["Eli Barzilay" "eli@racket-lang.org"]
@ -7,7 +7,7 @@
@; @author+email["Vincent St-Amour" "stamourv@racket-lang.org"]
@; @author+email["Asumu Takikawa" "asumu@racket-lang.org"]]
@defmodule[racket/generics]
@defmodule[racket/generic]
A @deftech{generic interface} allows per-type methods to be
associated with generic functions. Generic functions are defined
@ -72,7 +72,7 @@ with @racket[#:methods].
@(define (new-evaluator)
(let* ([e (make-base-eval)])
(e '(require (for-syntax racket/base)
racket/generics))
racket/generic))
e))
@(define evaluator (new-evaluator))

View File

@ -2,7 +2,7 @@
@(require "mz.rkt" scribble/scheme
(for-syntax racket/base)
(for-label racket/generator
racket/generics
racket/generic
racket/mpair))
@(define (info-on-seq where what)
@ -25,7 +25,7 @@ vice-versa.
@(define stream-evaluator
(let ([evaluator (make-base-eval)])
(evaluator '(require racket/generics))
(evaluator '(require racket/generic))
(evaluator '(require racket/list))
(evaluator '(require racket/stream))
evaluator))

View File

@ -405,7 +405,7 @@ Returns @racket[#t] if @racket[v] is an accessor procedure produced
by @racket[make-struct-type-property], @racket[#f] otherwise.}
@;------------------------------------------------------------------------
@include-section["generics.scrbl"]
@include-section["generic.scrbl"]
@;------------------------------------------------------------------------
@section[#:tag "struct-copy"]{Copying and Updating Structures}

View File

@ -1,6 +1,6 @@
#lang racket/base
(require racket/generics racket/dict racket/list)
(require racket/generic racket/dict racket/list)
(define-struct alist (v)
#:methods gen:dict

View File

@ -1,6 +1,6 @@
#lang racket/base
(require racket/generics
(require racket/generic
(only-in racket/dict
gen:dict prop:dict
dict?

View File

@ -1,6 +1,6 @@
#lang racket/base
(require racket/generics racket/port)
(require racket/generic racket/port)
(define-generics printable
(gen-print printable [port])

View File

@ -1,5 +1,5 @@
#lang racket
(require racket/generics
(require racket/generic
tests/eli-tester)
(define (massq idx l)

View File

@ -1,6 +1,6 @@
#lang racket/base
(require racket/private/generics racket/sequence)
(require racket/private/generic racket/sequence)
;; This was designed as a higher-level interface on top of sequences,
;; but it turns out streams can do all that already (including state),

View File

@ -1,6 +1,6 @@
#lang racket
(require racket/generics racket/stream)
(require racket/generic racket/stream)
(define-struct list-stream (v)
#:methods gen:stream