Skip to content

Commit

Permalink
Move all binary modules into subcollection
Browse files Browse the repository at this point in the history
  • Loading branch information
jackfirth committed May 19, 2019
1 parent bebd1ab commit 49ffb66
Show file tree
Hide file tree
Showing 9 changed files with 15 additions and 15 deletions.
File renamed without changes.
File renamed without changes.
File renamed without changes.
6 changes: 3 additions & 3 deletions private/bit.scrbl
Expand Up @@ -2,17 +2,17 @@

@(require (for-label racket/base
racket/contract/base
rebellion/bit)
rebellion/binary/bit)
(submod rebellion/private/scribble-evaluator-factory doc)
scribble/example)

@(define make-evaluator
(make-module-sharing-evaluator-factory
#:public (list 'rebellion/bit)
#:public (list 'rebellion/binary/bit)
#:private (list 'racket/base)))

@title{Bits}
@defmodule[rebellion/bit]
@defmodule[rebellion/binary/bit]

A @deftech{bit} is either zero or one. Eight bits form a @tech{byte}, and a
@tech{bitstring} is an arbitrary-length sequence of bits.
Expand Down
4 changes: 2 additions & 2 deletions private/bitstring.rkt
Expand Up @@ -20,8 +20,8 @@
racket/list
racket/math
racket/struct
rebellion/bit
rebellion/byte
rebellion/binary/bit
rebellion/binary/byte
rebellion/equal+hash/tuple
rebellion/tuple-type
rebellion/tuple-type-definition)
Expand Down
6 changes: 3 additions & 3 deletions private/bitstring.scrbl
Expand Up @@ -3,17 +3,17 @@
@(require (for-label racket/base
racket/contract/base
racket/math
rebellion/bitstring)
rebellion/binary/bitstring)
(submod rebellion/private/scribble-evaluator-factory doc)
scribble/example)

@(define make-evaluator
(make-module-sharing-evaluator-factory
#:public (list 'rebellion/bitstring)
#:public (list 'rebellion/binary/bitstring)
#:private (list 'racket/base)))

@title{Bitstrings}
@defmodule[rebellion/bitstring]
@defmodule[rebellion/binary/bitstring]

A @deftech{bitstring} is an immutable, contiguous sequence of @tech{bits}.
Bitstrings are represented compactly; a bitstring of 8N bits consumes N bytes of
Expand Down
2 changes: 1 addition & 1 deletion private/byte.rkt
Expand Up @@ -10,7 +10,7 @@
[byte-drop-rightmost-bits (-> byte? (integer-in 0 8) byte?)]
[byte-ref (-> byte? (integer-in 0 7) bit?)]))

(require rebellion/bit)
(require rebellion/binary/bit)

(module+ test
(require (submod "..")
Expand Down
8 changes: 4 additions & 4 deletions private/byte.scrbl
Expand Up @@ -2,18 +2,18 @@

@(require (for-label racket/base
racket/contract/base
rebellion/bit
rebellion/byte)
rebellion/binary/bit
rebellion/binary/byte)
(submod rebellion/private/scribble-evaluator-factory doc)
scribble/example)

@(define make-evaluator
(make-module-sharing-evaluator-factory
#:public (list 'rebellion/byte)
#:public (list 'rebellion/binary/byte)
#:private (list 'racket/base)))

@title{Bytes}
@defmodule[rebellion/byte]
@defmodule[rebellion/binary/byte]

A @deftech{byte} is a sequence of eight @tech{bits}, represented as an exact
integer between @racket[0] and @racket[255].
Expand Down
4 changes: 2 additions & 2 deletions private/octet-stream.rkt
Expand Up @@ -14,15 +14,15 @@
[octet-stream->bitstring (-> octet-stream? bitstring?)]
[octet-stream->media (-> octet-stream? media?)]))

(require rebellion/bitstring
(require rebellion/binary/bitstring
rebellion/media
rebellion/record
rebellion/tuple-type-definition)

(module+ test
(require (submod "..")
rackunit
rebellion/byte))
rebellion/binary/byte))

;@------------------------------------------------------------------------------

Expand Down

0 comments on commit 49ffb66

Please sign in to comment.