#lang scribble/doc @(require "mz.ss") @title[#:style 'toc #:tag "data"]{Primitive Datatypes} Each of the built-in datatypes comes with a set of procedures for manipulating members of the datatype. @local-table-of-contents[] @; ------------------------------------------------------------ @section[#:tag "booleans"]{Booleans} True and false are represented by the values @scheme[#t] and @scheme[#f], respectively, though operations that depend a boolean value typically treat anything other than @scheme[#f] as true. See also: @scheme[and], @scheme[or], @scheme[andmap], @scheme[ormap]. @defproc[(boolean? [v any/c]) boolean?]{ Returns @scheme[#t] if @scheme[v] is @scheme[#t] or @scheme[#f], @scheme[#f] otherwise.} @defproc[(not [v any/c]) boolean?]{ Returns @scheme[#t] if @scheme[v] is @scheme[#f], @scheme[#f] otherwise. } @defproc[(equal? [v1 any/c] [v2 any/c]) boolean?]{ Two values are @scheme[equal?] if and only if they are @scheme[eqv?], unless otherwise specified for a particular datatype. Datatypes with further specification of @scheme[equal?] include strings, byte strings, numbers, pairs, mutable pairs, vectors, hash tables, and inspectable structures. In the last five cases, equality is recursively defined; if both @scheme[v1] and @scheme[v2] contain reference cycles, they are equal when the infinite unfoldings of the values would be equal. See also @scheme[prop:equal+hash].} @defproc[(eqv? [v1 any/c] [v2 any/c]) boolean?]{ Two values are @scheme[eqv?] if and only if they are @scheme[eq?], unless otherwise specified for a particular datatype. The number and character datatypes are the only ones for which @scheme[eqv?] differs from @scheme[eq?].} @defproc[(eq? [v1 any/c] [v2 any/c]) boolean?]{ Return @scheme[#t] if @scheme[v1] and @scheme[v2] refer to the same object, @scheme[#f] otherwise. See also @secref["model-eq"].} @defproc[(immutable? [v any/c]) boolean?]{ Returns @scheme[#t] if @scheme[v] is an immutable string, byte string, vector, or box, @scheme[#f] otherwise.} @defthing[prop:equal+hash struct-type-property?]{ A @tech{structure type property} (see @secref["structprops"]) that supplies an equality predicate and hashing functions for a structure type. The property value must be a list of three procedures: @itemize{ @item{@scheme[_equal-proc : (any/c any/c (any/c any/c . -> . boolean?) . -> . any/c)] --- tests whether the first two arguments are equal, where both values are instances of the structure type to which the property is associated (or a subtype of the structure type). The third argument is an @scheme[equal?] predicate to use for recursive equality checks; use the given predicate instead of @scheme[equal?] to ensure that data cycles are handled properly. The @scheme[_equal-proc] is called for a pair of structures only when they are not @scheme[eq?], and only when they both have a @scheme[prop:equal+hash] value inherited from the same structure type. With this strategy, the order in which @scheme[equal?] receives two structures does not matter. It also means that, by default, a structure sub-type inherits the equality predicate of its parent, if any.} @item{@scheme[_hash-proc : (any/c (any/c . -> . exact-integer?) . -> . exact-integer?)] --- computes a hash code for the given structure, like @scheme[equal-hash-code]. The first argument is an instance of the structure type (or one of its subtypes) to which the property is associated. The second argument is a @scheme[equal-hash-code]-like procedure to use for recursive hash-code computation; use the given procedure instead of @scheme[equal-hash-code] to ensure that data cycles are handled properly.} @item{@scheme[_hash2-proc : (any/c (any/c . -> . exact-integer?) . -> . exact-integer?)] --- computes a secondary hash code for the given structure. This procedure is like @scheme[_hash-proc], but analogous to @scheme[equal-secondary-hash-code].} } Take care to ensure that @scheme[_hash-proc] and @scheme[_hash2-proc] are consistent with @scheme[_equal-proc]. Specifically, @scheme[_hash-proc] and @scheme[_hash2-proc] should produce the same value for any two structures for which @scheme[_equal-proc] produces a true value. When a structure type has no @scheme[prop:equal+hash] property, then transparent structures (i.e., structures with an @tech{inspector} that is controlled by the current @tech{inspector}) are @scheme[equal?] when they are instances of the same structure type (not counting sub-types), and when they have @scheme[equal?] field values. For transparent structures, @scheme[equal-hash-code] and @scheme[equal-secondary-hash-code] derive hash code using the field values. For opaque structure types, @scheme[equal?] is the same as @scheme[eq?], and @scheme[equal-hash-code] and @scheme[equal-secondary-hash-code] results are based only on @scheme[eq-hash-code].} @subsection{Boolean Synonyms} @note-lib[scheme/bool] @defthing[true boolean?]{A synonym for @scheme[#t].} @defthing[false boolean?]{A synonym for @scheme[#f].} @defproc[(symbol=? [a symbol?] [b symbol?]) boolean?]{ Returns @scheme[(equal? a b)].} @defproc[(boolean=? [a boolean?] [b boolean?]) boolean?]{ Returns @scheme[(equal? a b)].} @; ------------------------------------------------------------ @include-section["numbers.scrbl"] @; ------------------------------------------------------------ @include-section["strings.scrbl"] @; ------------------------------------------------------------ @include-section["bytes.scrbl"] @; ------------------------------------------------------------ @include-section["chars.scrbl"] @; ------------------------------------------------------------ @section[#:tag "symbols"]{Symbols} @guideintro["symbols"]{symbols} @section-index["symbols" "generating"] @section-index["symbols" "unique"] A symbol is like an immutable string, but symbols are normally @deftech{interned}, so that two symbols with the same character content are normally @scheme[eq?]. All symbols produced by the default reader (see @secref["parse-symbol"]) are interned. The two procedures @scheme[string->uninterned-symbol] and @scheme[gensym] generate @deftech{uninterned} symbols, i.e., symbols that are not @scheme[eq?], @scheme[eqv?], or @scheme[equal?] to any other symbol, although they may print the same as other symbols. Regular (interned) symbols are only weakly held by the internal symbol table. This weakness can never affect the result of an @scheme[eq?], @scheme[eqv?], or @scheme[equal?] test, but a symbol may disappear when placed into a weak box (see @secref["weakbox"]) used as the key in a weak @tech{hash table} (see @secref["hashtables"]), or used as an ephemeron key (see @secref["ephemerons"]). @defproc[(symbol? [v any/c]) boolean?]{Returns @scheme[#t] if @scheme[v] is a symbol, @scheme[#f] otherwise.} @examples[(symbol? 'Apple) (symbol? 10)] @defproc[(symbol->string [sym symbol?]) symbol?]{Returns a freshly allocated mutable string whose characters are the same as in @scheme[sym].} @examples[(symbol->string 'Apple)] @defproc[(string->symbol [str string?]) symbol?]{Returns an @tech{interned} symbol whose characters are the same as in @scheme[str].} @examples[(string->symbol "Apple") (string->symbol "1")] @defproc[(string->uninterned-symbol [str string?]) symbol?]{Like @scheme[(string->symbol str)], but the resulting symbol is a new @tech{uninterned} symbol. Calling @scheme[string->uninterned-symbol] twice with the same @scheme[str] returns two distinct symbols.} @examples[(string->uninterned-symbol "Apple") (eq? 'a (string->uninterned-symbol "a"))] @defproc[(gensym [base (or/c string? symbol?) "g"]) symbol?]{Returns a new @tech{uninterned} symbol with an automatically-generated name. The optional @scheme[base] argument is a prefix symbol or string.} @examples[(gensym "apple")] @; ------------------------------------------------------------ @include-section["regexps.scrbl"] @; ------------------------------------------------------------ @section[#:tag "keywords"]{Keywords} @guideintro["keywords"]{keywords} A keyword is like an @tech{interned} symbol, but its printed form starts with @litchar{#:}, and a keyword cannot be used as an identifier. Furthermore, a keyword by itself is not a valid expression, though a keyword can be @scheme[quote]d to form an expression that produces the symbol. Two keywords are @scheme[eq?] if and only if they print the same. Like symbols, keywords are only weakly held by the internal keyword table; see @secref["symbols"] for more information. @defproc[(keyword? [v any/c]) boolean?]{ Returns @scheme[#t] if @scheme[v] is a keyword, @scheme[#f] otherwise.} @defproc[(keyword->string [keyword keyword?]) string?]{ Returns a string for the @scheme[display]ed form of @scheme[keyword], not including the leading @litchar{#:}.} @defproc[(string->keyword [str string?]) keyword]{ Returns a keyword whose @scheme[display]ed form is the same as that of @scheme[str], but with a leading @litchar{#:}.} @defproc[(keywordstring] and @scheme[stringlist [vec vector?]) list?]{ Returns a list with the same length and elements as @scheme[vec].} @defproc[(list->vector [lst list?]) vector?]{ Returns a mutable vector with the same length and elements as @scheme[lst].} @defproc[(vector->immutable-vector [vec vector?]) (and/c vector? immutable?)]{ Returns an immutable vector with the same length and elements as @scheme[vec]. If @scheme[vec] is itself immutable, then it is returned as the result.} @defproc[(vector-fill! [vec (and/c vector? (not/c immutable?))] [v any/c]) void?]{ Changes all slots of @scheme[vec] to contain @scheme[v].} @defproc[(vector-copy! [dest (and/c vector? (not/c immutable?))] [dest-start exact-nonnegative-integer?] [src vector?] [src-start exact-nonnegative-integer? 0] [src-end exact-nonnegative-integer? (vector-length src)]) void?]{ Changes the elements of @scheme[dest] starting at position @scheme[dest-start] to match the elements in @scheme[src] from @scheme[src-start] (inclusive) to @scheme[src-end] (exclusive). The vectors @scheme[dest] and @scheme[src] can be the same vector, and in that case the destination region can overlap with the source region; the destination elements after the copy match the source elements from before the copy. If any of @scheme[dest-start], @scheme[src-start], or @scheme[src-end] are out of range (taking into account the sizes of the vectors and the source and destination regions), the @exnraise[exn:fail:contract]. @examples[(define v (vector 'A 'p 'p 'l 'e)) (vector-copy! v 4 #(y)) (vector-copy! v 0 v 3 4) v]} @defproc[(vector->values [vec vector?] [start-pos nonnegative-exact-integer? 0] [end-pos nonnegative-exact-integer? (vector-length vec)]) any]{ Returns @math{@scheme[end-pos] - @scheme[start-pos]} values, which are the elements of @scheme[vec] from @scheme[start-pos] (inclusive) to @scheme[end-pos] (exclusive). If @scheme[start-pos] or @scheme[end-pos] are greater than @scheme[(vector-length vec)], or if @scheme[end-pos] is less than @scheme[start-pos], the @exnraise[exn:fail:contract].} @defproc[(build-vector [n exact-nonnegative-integer?] [proc (exact-nonnegative-integer? . -> . any.c)]) vector?]{ Creates a vector of @scheme[n] elements by applying @scheme[proc] to the integers from @scheme[0] to @scheme[(sub1 n)] in order. If @scheme[_vec] is the resulting vector, then @scheme[(vector-ref _vec _i)] is the value produced by @scheme[(proc _i)]. @examples[ (build-vector 5 add1) ]} @; ------------------------------------------------------------ @section[#:tag "boxes"]{Boxes} @defproc[(box? [v any/c]) boolean?]{ Returns @scheme[#t] if @scheme[v] is a box, @scheme[#f] otherwise.} @defproc[(box [v any/c]) box?]{ Returns a new mutable box that contains @scheme[v].} @defproc[(box-immutable [v any/c]) (and/c box? immutable?)]{ Returns a new immutable box that contains @scheme[v].} @defproc[(unbox [box box?]) any/c]{ Returns the content of @scheme[box]. For any @scheme[v], @scheme[(unbox (box @scheme[v]))] returns @scheme[v].} @defproc[(set-box! [box (and/c box? (not/c immutable?))] [v any/c]) void?]{ Sets the content of @scheme[box] to @scheme[v].} @; ---------------------------------------------------------------------- @section[#:tag "hashtables"]{Hash Tables} A @deftech{hash table} (or simply @deftech{hash}) maps each of its keys to a single value. For a given hash table, keys are equivalent via @scheme[equal?] or @scheme[eq?], and keys are retained either strongly or weakly (see @secref["weakbox"]). A hash table is also either mutable or immutable; immutable tables support constant-time functional update. A hash table can be used as a two-valued @tech{sequence} (see @secref["sequences"]). The keys and values of the hash table serve as elements of the sequence (i.e., each element is a key and its associated value). If a mapping is added to or removed from the hash table during iteration, then an iteration step may fail with @scheme[exn:fail:contract], or the iteration may skip or duplicate keys and values. See also @scheme[in-hash], @scheme[in-hash-keys], @scheme[in-hash-values], and @scheme[in-hash-pairs]. Two hash tables are @scheme[equal?] if they use the same key-comparison procedure (@scheme[equal?] or @scheme[eq?]), if they both hold keys strongly or weakly, and if they have the same mutability. @bold{Caveats concerning concurrent modification:} A mutable hash table can be manipulated with @scheme[hash-ref], @scheme[hash-set!], and @scheme[hash-remove!] concurrently by multiple threads, and the operations are protected by a table-specific semaphore as needed. Two caveats apply, however: @itemize{ @item{If a thread is terminated while applying @scheme[hash-ref], @scheme[hash-set!], or @scheme[hash-remove!] to a hash table that uses @scheme[equal?] key comparisons, all current and future operations on the hash table block indefinitely.} @item{The @scheme[hash-map] and @scheme[hash-for-each] procedures do not use the table's semaphore. Consequently, if a hash table is extended with new keys by another thread while a map or for-each traversal is in process, arbitrary key--value pairs can be dropped or duplicated in the traversal. Similarly, if a map or for-each procedure itself extends the table, arbitrary key--value pairs can be dropped or duplicated. However, key mappings can be deleted or remapped by any thread with no adverse affects (i.e., the change does not affect a traversal if the key has been seen already, otherwise the traversal skips a deleted key or uses the remapped key's new value).} } @bold{Caveat concerning mutable keys:} If a key into an @scheme[equal?]-based hash table is mutated (e.g., a key string is modified with @scheme[string-set!]), then the hash table's behavior for insertion and lookup operations becomes unpredictable. @defproc[(hash? [v any/c]) boolean?]{ Returns @scheme[#t] if @scheme[v] is a @tech{hash table}, @scheme[#f] otherwise.} @defproc[(hash-eq? [hash hash?]) boolean?]{ Returns @scheme[#t] if @scheme[hash] compares keys with @scheme[eq?], @scheme[#f] if it compares with @scheme[equal?].} @defproc[(hash-weak? [hash hash?]) boolean?]{ Returns @scheme[#t] if @scheme[hash] retains its keys weakly, @scheme[#f] if it retains keys strongly.} @defproc[(make-hash) hash?]{ Creates an empty mutable hash table that holds keys strongly and that uses @scheme[equal?] to compare keys.} @defproc[(make-hasheq) (and/c hash? hash-eq?)]{ Creates an empty mutable hash table that holds keys strongly and that uses @scheme[eq?] to compare keys.} @defproc[(make-weak-hash) (and/c hash? hash-weak?)]{ Creates an empty mutable hash table that holds keys weakly and that uses @scheme[equal?] to compare keys.} @defproc[(make-weak-hasheq) (and/c hash? hash-eq? hash-weak?)]{ Creates an empty mutable hash table that holds keys weakly and that uses @scheme[eq?] to compare keys.} @defproc[(make-immutable-hash [assocs (listof pair?)]) (and/c hash? immutable?)]{ Creates an immutable hash table that compares keys with @scheme[equal?]. In each element of @scheme[assocs], the @scheme[car] of each pair is a key, and the @scheme[cdr] is the corresponding value. The mappings are added to the table in the order that they appear in @scheme[assocs], so later mappings can hide earlier mappings.} @defproc[(make-immutable-hasheq [assocs (listof pair?)]) (and/c hash? hash-eq? immutable?)]{ Like @scheme[make-immutable-hash], but the resulting hash table compares keys with @scheme[eq?].} @defproc[(hash-set! [hash (and/c hash? (not/c immutable?))] [key any/c] [v any/c]) void?]{ Maps @scheme[key] to @scheme[v] in @scheme[hash], overwriting any existing mapping for @scheme[key].} @defproc[(hash-set [hash (and/c hash? immutable?)] [key any/c] [v any/c]) (and/c hash? immutable?)]{ Functionally extends @scheme[hash] by mapping @scheme[key] to @scheme[v], overwriting any existing mapping for @scheme[key], and returning an extended hash table.} @defproc[(hash-ref [hash hash?] [key any/c] [failure-result any/c (lambda () (raise (make-exn:fail ....)))]) any]{ Returns the value for @scheme[key] in @scheme[hash]. If no value is found for @scheme[key], then @scheme[failure-result] determines the result: @itemize{ @item{If @scheme[failure-result] is a procedure, it is called (through a tail call) with no arguments to produce the result.} @item{Otherwise, @scheme[failure-result] is returned as the result.} }} @defproc[(hash-remove! [hash (and/c hash? (not/c immutable?))] [key any/c]) void?]{ Removes any existing mapping for @scheme[key] in @scheme[hash].} @defproc[(hash-remove [hash (and/c hash? immutable?)] [key any/c]) (and/c hash? immutable?)]{ Functionally removes any existing mapping for @scheme[key] in @scheme[hash], returning the updated hash table.} @defproc[(hash-map [hash hash?] [proc (any/c any/c . -> . any/c)]) (listof any/c)]{ Applies the procedure @scheme[proc] to each element in @scheme[hash] in an unspecified order, accumulating the results into a list. The procedure @scheme[proc] is called each time with a key and its value. See the caveat above about concurrent modification.} @defproc[(hash-for-each [hash hash?] [proc (any/c any/c . -> . any)]) void?]{ Applies @scheme[proc] to each element in @scheme[hash] (for the side-effects of @scheme[proc]) in an unspecified order. The procedure @scheme[proc] is called each time with a key and its value. See the caveat above about concurrent modification.} @defproc[(hash-count [hash hash?]) nonnegative-exact-integer?]{ Returns the number of keys mapped by @scheme[hash]. If @scheme[hash] is not created with @scheme['weak], then the result is computed in constant time and atomically. If @scheme[hash] is created with @scheme['weak], see the caveat above about concurrent modification.} @defproc[(hash-iterate-first [hash hash?]) (or/c false/c nonnegative-exact-integer?)]{ Returns @scheme[#f] if @scheme[hash] contains no elements, otherwise it returns an integer that is a index to the first element in the hash table; ``first'' refers to an unspecified ordering of the table elements, and the index values are not necessarily consecutive integers. For a mutable @scheme[hash], this index is guaranteed to refer to the first item only as long as no items are added to or removed from @scheme[hash].} @defproc[(hash-iterate-next [hash hash?] [prev nonnegative-exact-integer?]) (or/c false/c nonnegative-exact-integer?)]{ Returns either an integer that is an index to the element in @scheme[hash] after the element indexed by @scheme[pos] (which is not necessarily one more than @scheme[pos]) or @scheme[#f] if @scheme[pos] refers to the last element in @scheme[hash]. If @scheme[pos] is not a valid index, then the @exnraise[exn:fail:contract]. For a mutable @scheme[hash], the result index is guaranteed to refer to its item only as long as no items are added to or removed from @scheme[hash].} @defproc[(hash-iterate-key [hash hash?] [pos nonnegative-exact-integer?]) any]{ Returns the key for the element in @scheme[hash] at index @scheme[pos]. If @scheme[pos] is not a valid index for @scheme[hash], the @exnraise[exn:fail:contract].} @defproc[(hash-iterate-value [hash hash?] [pos nonnegative-exact-integer?]) any]{ Returns the value for the element in @scheme[hash] at index @scheme[pos]. If @scheme[pos] is not a valid index for @scheme[hash], the @exnraise[exn:fail:contract].} @defproc[(hash-copy [hash hash?]) (and/c hash? (not/c immutable?))]{ Returns a mutable hash table with the same mappings, same key-comparison mode, and same key-holding strength as @scheme[hash].} @defproc[(eq-hash-code [v any/c]) exact-integer?]{ Returns an exact integer; for any two @scheme[eq?] values, the returned integer is the same. Furthermore, for the result integer @scheme[k] and any other exact integer @scheme[j], @scheme[(= k j)] implies @scheme[(eq? k j)].} @defproc[(equal-hash-code [v any/c]) exact-integer?]{ Returns an exact integer; for any two @scheme[equal?] values, the returned integer is the same. Furthermore, for the result integer @scheme[k] and any other exact integer @scheme[j], @scheme[(= k j)] implies @scheme[(eq? k j)]. A has code is computed even when @scheme[v] contains a cycle through pairs, vectors, boxes, and/or inspectable structure fields. See also @scheme[prop:equal+hash].} @defproc[(equal-secondary-hash-code [v any/c]) exact-integer?]{ Like @scheme[equal-hash-code], but computes a secondary value suitable for use in double hashing.} @; ---------------------------------------------------------------------- @include-section["sequences.scrbl"] @; ---------------------------------------------------------------------- @include-section["procedures.scrbl"] @; ---------------------------------------------------------------------- @section[#:tag "void"]{Void and Undefined} The constant @|void-const| is returned by most forms and procedures that have a side-effect and no useful result. The constant @|undefined-const| is used as the initial value for @scheme[letrec] bindings. @defproc[(void? [v any/c]) void?]{Returns @scheme[#t] if @scheme[v] is the constant @|void-const|, @scheme[#f] otherwise.} @defproc[(void [v any/c] ...) void?]{Returns the constant @|void-const|. Each @scheme[v] argument is ignored.}