mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-04-30 03:40:34 +02:00
Fix typos throughout codebase.
* NEWS: * doc/ref/api-control.texi: * doc/ref/api-data.texi: * doc/ref/api-debug.texi: * doc/ref/api-deprecated.texi: * doc/ref/api-evaluation.texi: * doc/ref/api-foreign.texi: * doc/ref/api-i18n.texi: * doc/ref/api-io.texi: * doc/ref/api-languages.texi: * doc/ref/api-macros.texi: * doc/ref/api-memory.texi: * doc/ref/api-modules.texi: * doc/ref/api-options.texi: * doc/ref/api-peg.texi: * doc/ref/api-procedures.texi: * doc/ref/api-scheduling.texi: * doc/ref/api-undocumented.texi: * doc/ref/api-utility.texi: * doc/ref/expect.texi: * doc/ref/goops.texi: * doc/ref/misc-modules.texi: * doc/ref/posix.texi: * doc/ref/repl-modules.texi: * doc/ref/scheme-ideas.texi: * doc/ref/scheme-scripts.texi: * doc/ref/srfi-modules.texi: * gc-benchmarks/larceny/dynamic.sch: * gc-benchmarks/larceny/twobit-input-long.sch: * gc-benchmarks/larceny/twobit.sch: * libguile/gc.h: * libguile/ioext.c: * libguile/list.c: * libguile/options.c: * libguile/posix.c: * libguile/threads.c: * module/ice-9/boot-9.scm: * module/ice-9/optargs.scm: * module/ice-9/ports.scm: * module/ice-9/pretty-print.scm: * module/ice-9/psyntax.scm: * module/language/elisp/parser.scm: * module/language/tree-il/compile-bytecode.scm: * module/srfi/srfi-37.scm: * module/srfi/srfi-43.scm: * module/statprof.scm: * module/texinfo/reflection.scm: * test-suite/tests/eval.test: * test-suite/tests/fluids.test: Fix typos. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
parent
5fcf6ff17a
commit
f27e8b855f
49 changed files with 409 additions and 400 deletions
|
@ -2750,8 +2750,8 @@ are not themselves bound to a defined value."
|
|||
|
||||
(define (module-symbol-local-binding m v . opt-val)
|
||||
"Return the binding of variable V specified by name within module M,
|
||||
signalling an error if the variable is unbound. If the OPT-VALUE is
|
||||
passed, then instead of signalling an error, return OPT-VALUE."
|
||||
signaling an error if the variable is unbound. If the OPT-VALUE is
|
||||
passed, then instead of signaling an error, return OPT-VALUE."
|
||||
(let ((var (module-local-variable m v)))
|
||||
(if (and var (variable-bound? var))
|
||||
(variable-ref var)
|
||||
|
@ -2761,8 +2761,8 @@ passed, then instead of signalling an error, return OPT-VALUE."
|
|||
|
||||
(define (module-symbol-binding m v . opt-val)
|
||||
"Return the binding of variable V specified by name within module M,
|
||||
signalling an error if the variable is unbound. If the OPT-VALUE is
|
||||
passed, then instead of signalling an error, return OPT-VALUE."
|
||||
signaling an error if the variable is unbound. If the OPT-VALUE is
|
||||
passed, then instead of signaling an error, return OPT-VALUE."
|
||||
(let ((var (module-variable m v)))
|
||||
(if (and var (variable-bound? var))
|
||||
(variable-ref var)
|
||||
|
@ -3452,7 +3452,7 @@ error if selected binding does not exist in the used module."
|
|||
;; FIXME: Avoid use of `apply'.
|
||||
(apply module-autoload! module autoloads)
|
||||
(let ((duplicates (or duplicates
|
||||
;; Avoid stompling a previously installed
|
||||
;; Avoid stomping a previously installed
|
||||
;; duplicates handlers if possible.
|
||||
(and (not (module-duplicates-handlers module))
|
||||
;; Note: If you change this default,
|
||||
|
|
|
@ -196,7 +196,7 @@
|
|||
;;
|
||||
;; lambda* creates a procedure that takes optional arguments. These
|
||||
;; are specified by putting them inside brackets at the end of the
|
||||
;; paramater list, but before any dotted rest argument. For example,
|
||||
;; parameter list, but before any dotted rest argument. For example,
|
||||
;; (lambda* (a b #:optional c d . e) '())
|
||||
;; creates a procedure with fixed arguments a and b, optional arguments c
|
||||
;; and d, and rest argument e. If the optional arguments are omitted
|
||||
|
|
|
@ -461,7 +461,7 @@ never again be used for a read or write operation."
|
|||
|
||||
(define* (call-with-output-file file proc #:key (binary #f) (encoding #f))
|
||||
"PROC should be a procedure of one argument, and FILE should be a
|
||||
string naming a file. The behaviour is unspecified if the file
|
||||
string naming a file. The behavior is unspecified if the file
|
||||
already exists. These procedures call PROC
|
||||
with one argument: the port obtained by opening the named file for
|
||||
input or output. If the file cannot be opened, an error is
|
||||
|
|
|
@ -320,7 +320,7 @@ into @var{width} characters. By default, @var{x} will be printed using
|
|||
@code{write}, though that behavior can be overriden via the
|
||||
@var{display?} keyword argument.
|
||||
|
||||
The default behaviour is to print depth-first, meaning that the entire
|
||||
The default behavior is to print depth-first, meaning that the entire
|
||||
remaining width will be available to each sub-expression of @var{x} --
|
||||
e.g., if @var{x} is a vector, each member of @var{x}. One can attempt to
|
||||
\"ration\" the available width, trying to allocate it equally to each
|
||||
|
|
|
@ -481,7 +481,7 @@
|
|||
;; (lexical . <var>) lexical variables
|
||||
;; (ellipsis . <identifier>) custom ellipsis
|
||||
;; (displaced-lexical) displaced lexicals
|
||||
;; <level> ::= <nonnegative integer>
|
||||
;; <level> ::= <non-negative integer>
|
||||
;; <var> ::= variable returned by build-lexical-var
|
||||
|
||||
;; a macro is a user-defined syntactic-form. a core is a
|
||||
|
|
|
@ -37,7 +37,7 @@
|
|||
|
||||
;;; For parsing circular structures, we keep track of definitions in a
|
||||
;;; hash-map that maps the id's to their values. When defining a new
|
||||
;;; id, though, we immediatly fill the slot with a promise before
|
||||
;;; id, though, we immediately fill the slot with a promise before
|
||||
;;; parsing and setting the real value, because it must already be
|
||||
;;; available at that time in case of a circular reference. The promise
|
||||
;;; refers to a local variable that will be set when the real value is
|
||||
|
|
|
@ -1124,7 +1124,7 @@ in the frame with for the lambda-case clause @var{clause}."
|
|||
(0
|
||||
(emit-load-static-procedure asm dst label))
|
||||
(nfree
|
||||
;; Stage closure in 0 to avoid stompling captured free
|
||||
;; Stage closure in 0 to avoid stomping captured free
|
||||
;; vars.
|
||||
(emit-allocate-closure asm 0 nfree label 1)
|
||||
(init-free-vars 0 free-vars env 1 2)
|
||||
|
@ -1148,7 +1148,7 @@ in the frame with for the lambda-case clause @var{clause}."
|
|||
frame-size)))
|
||||
|
||||
(($ <primcall> src (? variadic-constructor? name) args)
|
||||
;; Stage result in 0 to avoid stompling args.
|
||||
;; Stage result in 0 to avoid stomping args.
|
||||
(let ((args (for-args args env)))
|
||||
(maybe-emit-source src)
|
||||
(match name
|
||||
|
|
|
@ -84,7 +84,7 @@
|
|||
|
||||
(define (build-options-lookup options)
|
||||
"Answer an `equal?' Guile hash-table that maps OPTIONS' names back
|
||||
to the containing options, signalling an error if a name is
|
||||
to the containing options, signaling an error if a name is
|
||||
encountered more than once."
|
||||
(let ((lookup (make-hash-table (* 2 (length options)))))
|
||||
(for-each
|
||||
|
|
|
@ -546,7 +546,7 @@ left-to-right."
|
|||
|
||||
(define vector-count
|
||||
(case-lambda
|
||||
"(vector-count pred? vec1 vec2 ...) -> exact nonnegative integer
|
||||
"(vector-count pred? vec1 vec2 ...) -> exact non-negative integer
|
||||
|
||||
Count the number of indices i for which (PRED? VEC1[i] VEC2[i] ...)
|
||||
returns true, where i is less than the length of the shortest vector
|
||||
|
@ -586,7 +586,7 @@ passed."
|
|||
|
||||
(define vector-index
|
||||
(case-lambda
|
||||
"(vector-index pred? vec1 vec2 ...) -> exact nonnegative integer or #f
|
||||
"(vector-index pred? vec1 vec2 ...) -> exact non-negative integer or #f
|
||||
|
||||
Find and return the index of the first elements in VEC1 VEC2 ... that
|
||||
satisfy PRED?. If no matching element is found by the end of the
|
||||
|
@ -624,7 +624,7 @@ shortest vector, return #f."
|
|||
|
||||
(define vector-index-right
|
||||
(case-lambda
|
||||
"(vector-index-right pred? vec1 vec2 ...) -> exact nonnegative integer or #f
|
||||
"(vector-index-right pred? vec1 vec2 ...) -> exact non-negative integer or #f
|
||||
|
||||
Find and return the index of the last elements in VEC1 VEC2 ... that
|
||||
satisfy PRED?, searching from right-to-left. If no matching element
|
||||
|
@ -662,7 +662,7 @@ is found before the end of the shortest vector, return #f."
|
|||
|
||||
(define vector-skip
|
||||
(case-lambda
|
||||
"(vector-skip pred? vec1 vec2 ...) -> exact nonnegative integer or #f
|
||||
"(vector-skip pred? vec1 vec2 ...) -> exact non-negative integer or #f
|
||||
|
||||
Find and return the index of the first elements in VEC1 VEC2 ... that
|
||||
do not satisfy PRED?. If no matching element is found by the end of
|
||||
|
@ -700,7 +700,7 @@ the shortest vector, return #f."
|
|||
|
||||
(define vector-skip-right
|
||||
(case-lambda
|
||||
"(vector-skip-right pred? vec1 vec2 ...) -> exact nonnegative integer or #f
|
||||
"(vector-skip-right pred? vec1 vec2 ...) -> exact non-negative integer or #f
|
||||
|
||||
Find and return the index of the last elements in VEC1 VEC2 ... that
|
||||
do not satisfy PRED?, searching from right-to-left. If no matching
|
||||
|
@ -748,7 +748,7 @@ element is found before the end of the shortest vector, return #f."
|
|||
((positive? c) (loop lo i))
|
||||
((negative? c) (loop (+ i 1) hi)))))))
|
||||
(case-lambda
|
||||
"(vector-binary-search vec value cmp [start [end]]) -> exact nonnegative integer or #f
|
||||
"(vector-binary-search vec value cmp [start [end]]) -> exact non-negative integer or #f
|
||||
|
||||
Find and return an index of VEC between START and END whose value is
|
||||
VALUE using a binary search. If no matching element is found, return
|
||||
|
|
|
@ -319,7 +319,7 @@ than @code{statprof-stop}, @code{#f} otherwise."
|
|||
|
||||
;; Do not call this from statprof internal functions -- user only.
|
||||
(define* (statprof-stop #:optional (state (ensure-profiler-state)))
|
||||
"Stop the profiler.@code{}"
|
||||
"Stop the profiler."
|
||||
;; After some head-scratching, I don't *think* I need to mask/unmask
|
||||
;; signals here, but if I'm wrong, please let me know.
|
||||
(set-profile-level! state (- (profile-level state) 1))
|
||||
|
|
|
@ -20,7 +20,7 @@
|
|||
|
||||
;;; Commentary:
|
||||
;;
|
||||
;;Routines to generare @code{stexi} documentation for objects and
|
||||
;;Routines to generate @code{stexi} documentation for objects and
|
||||
;;modules.
|
||||
;;
|
||||
;;Note that in this context, an @dfn{object} is just a value associated
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue