2 Old Functions
(apply proc v ... lst) → any proc : procedure? v : any/c lst : list?
Like apply from scheme/base, but without support
for keyword arguments.
Like prop:procedure from scheme/base, but even
if the property’s value for a structure type is a procedure that
accepts keyword arguments, then instances of the structure type still
do not accept keyword arguments. (In contrast, if the property’s value
is an integer for a field index, then a keyword-accepting procedure in
the field for an instance causes the instance to accept keyword
arguments.)
(open-input-file file [mode]) → input-port? file : path-string? mode : (one-of/c 'text 'binary) = 'binary
(open-output-file file [mode exists]) → input-port? file : path-string? mode : (one-of/c 'text 'binary) = 'binary
exists :
(one-of/c 'error 'append 'update 'replace 'truncate 'truncate/replace) = 'error
(open-input-output-file file [mode exists])
→
input-port? output-port? file : path-string? mode : (one-of/c 'text 'binary) = 'binary
exists :
(one-of/c 'error 'append 'update 'replace 'truncate 'truncate/replace) = 'error
(with-input-from-file file thunk [mode]) → any file : path-string? thunk : (-> any) mode : (one-of/c 'text 'binary) = 'binary
(with-output-to-file file thunk [mode exists]) → any file : path-string? thunk : (-> any) mode : (one-of/c 'text 'binary) = 'binary
exists :
(one-of/c 'error 'append 'update 'replace 'truncate 'truncate/replace) = 'error
(call-with-input-file file proc [mode]) → any file : path-string? proc : (input-port? -> any) mode : (one-of/c 'text 'binary) = 'binary
(call-with-output-file file proc [mode exists]) → any file : path-string? proc : (output-port? -> any) mode : (one-of/c 'text 'binary) = 'binary
exists :
(one-of/c 'error 'append 'update 'replace 'truncate 'truncate/replace) = 'error
Like open-input-file, etc. from scheme/base, but
mode and exists arguments are not keyword
arguments. When both mode and exists are accepted,
they are accepted in either order.
(syntax-object->datum stx) → any stx : syntax?
(datum->syntax-object ctxt v srcloc [prop cert]) → syntax? ctxt : (or/c syntax? false/c) v : any/c
srcloc :
(or/c syntax? false/c (list/c any/c (or/c exact-positive-integer? false/c) (or/c exact-nonnegative-integer? false/c) (or/c exact-nonnegative-integer? false/c) (or/c exact-positive-integer? false/c)) (vector/c any/c (or/c exact-positive-integer? false/c) (or/c exact-nonnegative-integer? false/c) (or/c exact-nonnegative-integer? false/c) (or/c exact-positive-integer? false/c))) prop : (or/c syntax? false/c) = #f cert : (or/c syntax? false/c) = #f
The same as syntax->datum and datum->syntax.
(module-identifier=? a-id b-id) → boolean? a-id : syntax? b-id : syntax?
(module-transformer-identifier=? a-id b-id) → boolean? a-id : syntax? b-id : syntax?
(module-template-identifier=? a-id b-id) → boolean? a-id : syntax? b-id : syntax?
(module-label-identifier=? a-id b-id) → boolean? a-id : syntax? b-id : syntax?
(free-identifier=? a-id b-id) → boolean? a-id : syntax? b-id : syntax?
The free-identifier=? procedure returns
(and (eq? (syntax-e a) (syntax-e b)) (module-identifier=? a b))
(make-namespace [mode]) → namespace? mode : (one-of/c 'initial 'empty) = 'initial
Creates a namespace with mzscheme attached. If the
mode is empty, the namespace’s top-level environment is left
empty. If mode is 'initial, then the namespace’s
top-level environment is initialized with
(namespace-require/copy 'mzscheme). See also
make-base-empty-namespace.
(namespace-transformer-require req) → void? req : any/c
(transcript-on filename) → any filename : any/c
(transcript-off) → any
Raises exn:fail, because the operations are not supported.
(hash-table? v) → hash-table? v : any/c (hash-table? v flag) → hash-table? v : any/c flag : (one-of/c 'weak 'equal 'eqv) (hash-table? v flag flag2) → hash-table? v : any/c flag : (one-of/c 'weak 'equal 'eqv) flag2 : (one-of/c 'weak 'equal 'eqv)
Returns #t if v is a hash table created by
make-hash-table or make-immutable-hash-table with the
given flags (or more), #f otherwise. If flag2
is provided, it must be distinct from flag and 'equal
cannot be used with 'eqv, otherwise the
exn:fail:contract exception is raised.
(make-hash-table) → hash-table? (make-hash-table flag) → hash-table? flag : (one-of/c 'weak 'equal 'eqv) (make-hash-table flag flag2) → hash-table? flag : (one-of/c 'weak 'equal 'eqv) flag2 : (one-of/c 'weak 'equal 'eqv)
Creates and returns a new hash table. If provided, each flag
must one of the following:
'weak —
creates a hash table with weakly-held keys via make-weak-hash, make-weak-hasheq, or make-weak-hasheqv. 'equal —
creates a hash table that compares keys using equal? instead of eq? using make-hash or make-weak-hash. 'eqv —
creates a hash table that compares keys using eqv? instead of eq? using make-hasheqv or make-weak-hasheqv.
By default, key comparisons use eq? (i.e., the hash table is created with make-hasheq). If flag2 is redundant or 'equal is provided with 'eqv, the exn:fail:contract exception is raised.
(make-immutable-hash-table assocs) → (and/c hash-table? immutable?) assocs : (listof pair?) (make-immutable-hash-table assocs flag) → (and/c hash-table? immutable?) assocs : (listof pair?) flag : (one-of/c 'equal 'eqv)
Like make-immutable-hash, make-immutable-hasheq, or
make-immutable-hasheqv, depending on whether an
'equal or 'eqv flag is provided.