# SOME DESCRIPTIVE TITLE # Copyright (C) YEAR Free Software Foundation, Inc. # This file is distributed under the same license as the PACKAGE package. # FIRST AUTHOR , YEAR. # #, fuzzy msgid "" msgstr "" "Project-Id-Version: PACKAGE VERSION\n" "POT-Creation-Date: 2021-11-07 12:11+0900\n" "PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n" "Last-Translator: FULL NAME \n" "Language-Team: LANGUAGE \n" "Language: \n" "MIME-Version: 1.0\n" "Content-Type: text/plain; charset=UTF-8\n" "Content-Transfer-Encoding: 8bit\n" #. type: node #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:6 #, no-wrap msgid "Sequences Arrays Vectors" msgstr "" #. type: chapter #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:7 #, no-wrap msgid "Sequences, Arrays, and Vectors" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:8 #, no-wrap msgid "sequence" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:14 msgid "" "The @dfn{sequence} type is the union of two other Lisp types: lists and " "arrays. In other words, any list is a sequence, and any array is a " "sequence. The common property that all sequences have is that each is an " "ordered collection of elements." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:18 msgid "" "An @dfn{array} is a fixed-length object with a slot for each of its " "elements. All the elements are accessible in constant time. The four types " "of arrays are strings, vectors, char-tables and bool-vectors." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:24 msgid "" "A list is a sequence of elements, but it is not a single primitive object; " "it is made of cons cells, one cell per element. Finding the @var{n}th " "element requires looking through @var{n} cons cells, so elements farther " "from the beginning of the list take longer to access. But it is possible to " "add elements to the list, or remove elements." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:26 msgid "The following diagram shows the relationship between these types:" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:45 #, no-wrap msgid "" " _____________________________________________\n" " | |\n" " | Sequence |\n" " | ______ ________________________________ |\n" " | | | | | |\n" " | | List | | Array | |\n" " | | | | ________ ________ | |\n" " | |______| | | | | | | |\n" " | | | Vector | | String | | |\n" " | | |________| |________| | |\n" " | | ____________ _____________ | |\n" " | | | | | | | |\n" " | | | Char-table | | Bool-vector | | |\n" " | | |____________| |_____________| | |\n" " | |________________________________| |\n" " |_____________________________________________|\n" msgstr "" #. type: node #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:59 #, no-wrap msgid "Sequence Functions" msgstr "" #. type: menuentry #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 msgid "Functions that accept any kind of sequence." msgstr "" #. type: section #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1170 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1171 #, no-wrap msgid "Arrays" msgstr "" #. type: menuentry #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 msgid "Characteristics of arrays in Emacs Lisp." msgstr "" #. type: node #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1238 #, no-wrap msgid "Array Functions" msgstr "" #. type: menuentry #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 msgid "Functions specifically for arrays." msgstr "" #. type: section #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1341 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1342 #, no-wrap msgid "Vectors" msgstr "" #. type: menuentry #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 msgid "Special characteristics of Emacs Lisp vectors." msgstr "" #. type: node #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1381 #, no-wrap msgid "Vector Functions" msgstr "" #. type: menuentry #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 msgid "Functions specifically for vectors." msgstr "" #. type: section #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1471 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1472 #, no-wrap msgid "Char-Tables" msgstr "" #. type: menuentry #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 msgid "How to work with char-tables." msgstr "" #. type: node #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1646 #, no-wrap msgid "Bool-Vectors" msgstr "" #. type: menuentry #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 msgid "How to work with bool-vectors." msgstr "" #. type: node #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1763 #, no-wrap msgid "Rings" msgstr "" #. type: menuentry #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:57 msgid "Managing a fixed-size ring of objects." msgstr "" #. type: section #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:60 #, no-wrap msgid "Sequences" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:63 msgid "This section describes functions that accept any kind of sequence." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:64 #, no-wrap msgid "sequencep object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:68 msgid "" "This function returns @code{t} if @var{object} is a list, vector, string, " "bool-vector, or char-table, @code{nil} otherwise. See also @code{seqp} " "below." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:70 #, no-wrap msgid "length sequence" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:71 #, no-wrap msgid "string length" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:72 #, no-wrap msgid "list length" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:73 #, no-wrap msgid "vector length" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:74 #, no-wrap msgid "sequence length" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:75 #, no-wrap msgid "bool-vector length" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:76 #, no-wrap msgid "char-table length" msgstr "" #. type: anchor{#1} #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:84 msgid "Definition of length" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:84 msgid "" "This function returns the number of elements in @var{sequence}. The " "function signals the @code{wrong-type-argument} error if the argument is not " "a sequence or is a dotted list; it signals the @code{circular-list} error if " "the argument is a circular list. For a char-table, the value returned is " "always one more than the maximum Emacs character code." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:86 msgid "" "@xref{Definition of safe-length}, for the related function " "@code{safe-length}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:91 #, no-wrap msgid "" "(length '(1 2 3))\n" " @result{} 3\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:95 #, no-wrap msgid "" "(length ())\n" " @result{} 0\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:99 #, no-wrap msgid "" "(length \"foobar\")\n" " @result{} 6\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:103 #, no-wrap msgid "" "(length [1 2 3])\n" " @result{} 3\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:107 #, no-wrap msgid "" "(length (make-bool-vector 5 nil))\n" " @result{} 5\n" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:113 msgid "See also @code{string-bytes}, in @ref{Text Representations}." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:118 msgid "" "If you need to compute the width of a string on display, you should use " "@code{string-width} (@pxref{Size of Displayed Text}), not @code{length}, " "since @code{length} only counts the number of characters, but does not " "account for the display width of each character." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:119 #, no-wrap msgid "length< sequence length" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:123 msgid "" "Return non-@code{nil} if @var{sequence} is shorter than @var{length}. This " "may be more efficient than computing the length of @var{sequence} if " "@var{sequence} is a long list." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:125 #, no-wrap msgid "length> sequence length" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:127 msgid "Return non-@code{nil} if @var{sequence} is longer than @var{length}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:129 #, no-wrap msgid "length= sequence length" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:132 msgid "" "Return non-@code{nil} if the length of @var{sequence} is equal to " "@var{length}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:134 #, no-wrap msgid "elt sequence index" msgstr "" #. type: anchor{#1} #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:136 msgid "Definition of elt" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:136 #, no-wrap msgid "elements of sequences" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:143 msgid "" "This function returns the element of @var{sequence} indexed by @var{index}. " "Legitimate values of @var{index} are integers ranging from 0 up to one less " "than the length of @var{sequence}. If @var{sequence} is a list, " "out-of-range values behave as for @code{nth}. @xref{Definition of nth}. " "Otherwise, out-of-range values trigger an @code{args-out-of-range} error." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:148 #, no-wrap msgid "" "(elt [1 2 3 4] 2)\n" " @result{} 3\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:152 #, no-wrap msgid "" "(elt '(1 2 3 4) 2)\n" " @result{} 3\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:157 #, no-wrap msgid "" ";; @r{We use @code{string} to show clearly which character @code{elt} " "returns.}\n" "(string (elt \"1234\" 2))\n" " @result{} \"3\"\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:161 #, no-wrap msgid "" "(elt [1 2 3 4] 4)\n" " @error{} Args out of range: [1 2 3 4], 4\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:165 #, no-wrap msgid "" "(elt [1 2 3 4] -1)\n" " @error{} Args out of range: [1 2 3 4], -1\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:170 msgid "" "This function generalizes @code{aref} (@pxref{Array Functions}) and " "@code{nth} (@pxref{Definition of nth})." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:172 #, no-wrap msgid "copy-sequence seqr" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:173 #, no-wrap msgid "copying sequences" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:180 msgid "" "This function returns a copy of @var{seqr}, which should be either a " "sequence or a record. The copy is the same type of object as the original, " "and it has the same elements in the same order. However, if @var{seqr} is " "empty, like a string or a vector of zero length, the value returned by this " "function might not be a copy, but an empty object of the same type and " "identical to @var{seqr}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:186 msgid "" "Storing a new element into the copy does not affect the original @var{seqr}, " "and vice versa. However, the elements of the copy are not copies; they are " "identical (@code{eq}) to the elements of the original. Therefore, changes " "made within these elements, as found via the copy, are also visible in the " "original." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:191 msgid "" "If the argument is a string with text properties, the property list in the " "copy is itself a copy, not shared with the original's property list. " "However, the actual values of the properties are shared. @xref{Text " "Properties}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:194 msgid "" "This function does not work for dotted lists. Trying to copy a circular " "list may cause an infinite loop." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:198 msgid "" "See also @code{append} in @ref{Building Lists}, @code{concat} in " "@ref{Creating Strings}, and @code{vconcat} in @ref{Vector Functions}, for " "other ways to copy sequences." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:203 #, no-wrap msgid "" "(setq bar (list 1 2))\n" " @result{} (1 2)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:207 #, no-wrap msgid "" "(setq x (vector 'foo bar))\n" " @result{} [foo (1 2)]\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:211 #, no-wrap msgid "" "(setq y (copy-sequence x))\n" " @result{} [foo (1 2)]\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:216 #, no-wrap msgid "" "(eq x y)\n" " @result{} nil\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:220 #, no-wrap msgid "" "(equal x y)\n" " @result{} t\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:224 #, no-wrap msgid "" "(eq (elt x 1) (elt y 1))\n" " @result{} t\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:231 #, no-wrap msgid "" ";; @r{Replacing an element of one sequence.}\n" "(aset x 0 'quux)\n" "x @result{} [quux (1 2)]\n" "y @result{} [foo (1 2)]\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:238 #, no-wrap msgid "" ";; @r{Modifying the inside of a shared element.}\n" "(setcar (aref x 1) 69)\n" "x @result{} [quux (69 2)]\n" "y @result{} [foo (69 2)]\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:242 #, no-wrap msgid "reverse sequence" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:243 #, no-wrap msgid "string reverse" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:244 #, no-wrap msgid "list reverse" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:245 #, no-wrap msgid "vector reverse" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:246 #, no-wrap msgid "sequence reverse" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:250 msgid "" "This function creates a new sequence whose elements are the elements of " "@var{sequence}, but in reverse order. The original argument @var{sequence} " "is @emph{not} altered. Note that char-tables cannot be reversed." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:255 #, no-wrap msgid "" "(setq x '(1 2 3 4))\n" " @result{} (1 2 3 4)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:261 #, no-wrap msgid "" "(reverse x)\n" " @result{} (4 3 2 1)\n" "x\n" " @result{} (1 2 3 4)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:265 #, no-wrap msgid "" "(setq x [1 2 3 4])\n" " @result{} [1 2 3 4]\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:271 #, no-wrap msgid "" "(reverse x)\n" " @result{} [4 3 2 1]\n" "x\n" " @result{} [1 2 3 4]\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:275 #, no-wrap msgid "" "(setq x \"xyzzy\")\n" " @result{} \"xyzzy\"\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:281 #, no-wrap msgid "" "(reverse x)\n" " @result{} \"yzzyx\"\n" "x\n" " @result{} \"xyzzy\"\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:285 #, no-wrap msgid "nreverse sequence" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:286 #, no-wrap msgid "reversing a string" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:287 #, no-wrap msgid "reversing a list" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:288 #, no-wrap msgid "reversing a vector" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:291 msgid "" "This function reverses the order of the elements of @var{sequence}. Unlike " "@code{reverse} the original @var{sequence} may be modified." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:293 msgid "For example:" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:298 #, no-wrap msgid "" "(setq x (list 'a 'b 'c))\n" " @result{} (a b c)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:304 #, no-wrap msgid "" "x\n" " @result{} (a b c)\n" "(nreverse x)\n" " @result{} (c b a)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:309 #, no-wrap msgid "" ";; @r{The cons cell that was first is now last.}\n" "x\n" " @result{} (a)\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:314 msgid "" "To avoid confusion, we usually store the result of @code{nreverse} back in " "the same variable which held the original list:" msgstr "" #. type: example #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:317 #, no-wrap msgid "(setq x (nreverse x))\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:321 msgid "" "Here is the @code{nreverse} of our favorite example, @code{(a b c)}, " "presented graphically:" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:332 #, no-wrap msgid "" "@r{Original list head:} @r{Reversed list:}\n" " ------------- ------------- ------------\n" "| car | cdr | | car | cdr | | car | cdr |\n" "| a | nil |<-- | b | o |<-- | c | o |\n" "| | | | | | | | | | | | |\n" " ------------- | --------- | - | -------- | -\n" " | | | |\n" " ------------- ------------\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:336 msgid "For the vector, it is even simpler because you don't need setq:" msgstr "" #. type: example #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:344 #, no-wrap msgid "" "(setq x (copy-sequence [1 2 3 4]))\n" " @result{} [1 2 3 4]\n" "(nreverse x)\n" " @result{} [4 3 2 1]\n" "x\n" " @result{} [4 3 2 1]\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:350 msgid "" "Note that unlike @code{reverse}, this function doesn't work with strings. " "Although you can alter string data by using @code{aset}, it is strongly " "encouraged to treat strings as immutable even when they are mutable. " "@xref{Mutability}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:353 #, no-wrap msgid "sort sequence predicate" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:354 #, no-wrap msgid "stable sort" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:355 #, no-wrap msgid "sorting lists" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:356 #, no-wrap msgid "sorting vectors" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:364 msgid "" "This function sorts @var{sequence} stably. Note that this function doesn't " "work for all sequences; it may be used only for lists and vectors. If " "@var{sequence} is a list, it is modified destructively. This functions " "returns the sorted @var{sequence} and compares elements using " "@var{predicate}. A stable sort is one in which elements with equal sort " "keys maintain their relative order before and after the sort. Stability is " "important when successive sorts are used to order elements according to " "different criteria." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:369 msgid "" "The argument @var{predicate} must be a function that accepts two arguments. " "It is called with two elements of @var{sequence}. To get an increasing " "order sort, the @var{predicate} should return non-@code{nil} if the first " "element is ``less'' than the second, or @code{nil} if not." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:378 msgid "" "The comparison function @var{predicate} must give reliable results for any " "given pair of arguments, at least within a single call to @code{sort}. It " "must be @dfn{antisymmetric}; that is, if @var{a} is less than @var{b}, " "@var{b} must not be less than @var{a}. It must be @dfn{transitive}---that " "is, if @var{a} is less than @var{b}, and @var{b} is less than @var{c}, then " "@var{a} must be less than @var{c}. If you use a comparison function which " "does not meet these requirements, the result of @code{sort} is " "unpredictable." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:384 msgid "" "The destructive aspect of @code{sort} for lists is that it rearranges the " "cons cells forming @var{sequence} by changing @sc{cdr}s. A nondestructive " "sort function would create new cons cells to store the elements in their " "sorted order. If you wish to make a sorted copy without destroying the " "original, copy it first with @code{copy-sequence} and then sort." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:390 msgid "" "Sorting does not change the @sc{car}s of the cons cells in @var{sequence}; " "the cons cell that originally contained the element @code{a} in " "@var{sequence} still has @code{a} in its @sc{car} after sorting, but it now " "appears in a different position in the list due to the change of @sc{cdr}s. " "For example:" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:395 #, no-wrap msgid "" "(setq nums (list 1 3 2 6 5 4 0))\n" " @result{} (1 3 2 6 5 4 0)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:399 #, no-wrap msgid "" "(sort nums #'<)\n" " @result{} (0 1 2 3 4 5 6)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:403 #, no-wrap msgid "" "nums\n" " @result{} (1 2 3 4 5 6)\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:413 msgid "" "@strong{Warning}: Note that the list in @code{nums} no longer contains 0; " "this is the same cons cell that it was before, but it is no longer the first " "one in the list. Don't assume a variable that formerly held the argument " "now holds the entire sorted list! Instead, save the result of @code{sort} " "and use that. Most often we store the result back into the variable that " "held the original list:" msgstr "" #. type: example #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:416 #, no-wrap msgid "(setq nums (sort nums #'<))\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:423 msgid "" "For the better understanding of what stable sort is, consider the following " "vector example. After sorting, all items whose @code{car} is 8 are grouped " "at the beginning of @code{vector}, but their relative order is preserved. " "All items whose @code{car} is 9 are grouped at the end of @code{vector}, but " "their relative order is also preserved:" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:432 #, no-wrap msgid "" "(setq\n" " vector\n" " (vector '(8 . \"xxx\") '(9 . \"aaa\") '(8 . \"bbb\") '(9 . \"zzz\")\n" " '(9 . \"ppp\") '(8 . \"ttt\") '(8 . \"eee\") '(9 . \"fff\")))\n" " @result{} [(8 . \"xxx\") (9 . \"aaa\") (8 . \"bbb\") (9 . \"zzz\")\n" " (9 . \"ppp\") (8 . \"ttt\") (8 . \"eee\") (9 . \"fff\")]\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:437 #, no-wrap msgid "" "(sort vector (lambda (x y) (< (car x) (car y))))\n" " @result{} [(8 . \"xxx\") (8 . \"bbb\") (8 . \"ttt\") (8 . \"eee\")\n" " (9 . \"aaa\") (9 . \"zzz\") (9 . \"ppp\") (9 . \"fff\")]\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:443 msgid "" "@xref{Sorting}, for more functions that perform sorting. See " "@code{documentation} in @ref{Accessing Documentation}, for a useful example " "of @code{sort}." msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:445 #, no-wrap msgid "sequence functions in seq" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:446 #, no-wrap msgid "seq library" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:447 #, no-wrap msgid "sequences, generalized" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:451 msgid "" "The @file{seq.el} library provides the following additional sequence " "manipulation macros and functions, prefixed with @code{seq-}. To use them, " "you must first load the @file{seq} library." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:457 msgid "" "All functions defined in this library are free of side-effects; i.e., they " "do not modify any sequence (list, vector, or string) that you pass as an " "argument. Unless otherwise stated, the result is a sequence of the same " "type as the input. For those functions that take a predicate, this should " "be a function of one argument." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:462 msgid "" "The @file{seq.el} library can be extended to work with additional types of " "sequential data-structures. For that purpose, all functions are defined " "using @code{cl-defgeneric}. @xref{Generic Functions}, for more details " "about using @code{cl-defgeneric} for adding extensions." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:463 #, no-wrap msgid "seq-elt sequence index" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:469 msgid "" "This function returns the element of @var{sequence} at the specified " "@var{index}, which is an integer whose valid value range is zero to one less " "than the length of @var{sequence}. For out-of-range values on built-in " "sequence types, @code{seq-elt} behaves like @code{elt}. For the details, " "see @ref{Definition of elt}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:474 #, no-wrap msgid "" "(seq-elt [1 2 3 4] 2)\n" "@result{} 3\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:479 msgid "" "@code{seq-elt} returns places settable using @code{setf} (@pxref{Setting " "Generalized Variables})." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:486 #, no-wrap msgid "" "(setq vec [1 2 3 4])\n" "(setf (seq-elt vec 2) 5)\n" "vec\n" "@result{} [1 2 5 4]\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:490 #, no-wrap msgid "seq-length sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:494 msgid "" "This function returns the number of elements in @var{sequence}. For " "built-in sequence types, @code{seq-length} behaves like @code{length}. " "@xref{Definition of length}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:496 #, no-wrap msgid "seqp object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:501 msgid "" "This function returns non-@code{nil} if @var{object} is a sequence (a list " "or array), or any additional type of sequence defined via @file{seq.el} " "generic functions. This is an extensible variant of @code{sequencep}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:506 #, no-wrap msgid "" "(seqp [1 2])\n" "@result{} t\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:510 #, no-wrap msgid "" "(seqp 2)\n" "@result{} nil\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:514 #, no-wrap msgid "seq-drop sequence n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:518 msgid "" "This function returns all but the first @var{n} (an integer) elements of " "@var{sequence}. If @var{n} is negative or zero, the result is " "@var{sequence}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:523 #, no-wrap msgid "" "(seq-drop [1 2 3 4 5 6] 3)\n" "@result{} [4 5 6]\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:527 #, no-wrap msgid "" "(seq-drop \"hello world\" -4)\n" "@result{} \"hello world\"\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:531 #, no-wrap msgid "seq-take sequence n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:535 msgid "" "This function returns the first @var{n} (an integer) elements of " "@var{sequence}. If @var{n} is negative or zero, the result is @code{nil}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:540 #, no-wrap msgid "" "(seq-take '(1 2 3 4) 3)\n" "@result{} (1 2 3)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:544 #, no-wrap msgid "" "(seq-take [1 2 3 4] 0)\n" "@result{} []\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:548 #, no-wrap msgid "seq-take-while predicate sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:551 msgid "" "This function returns the members of @var{sequence} in order, stopping " "before the first one for which @var{predicate} returns @code{nil}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:556 #, no-wrap msgid "" "(seq-take-while (lambda (elt) (> elt 0)) '(1 2 3 -1 -2))\n" "@result{} (1 2 3)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:560 #, no-wrap msgid "" "(seq-take-while (lambda (elt) (> elt 0)) [-1 4 6])\n" "@result{} []\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:564 #, no-wrap msgid "seq-drop-while predicate sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:567 msgid "" "This function returns the members of @var{sequence} in order, starting from " "the first one for which @var{predicate} returns @code{nil}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:572 #, no-wrap msgid "" "(seq-drop-while (lambda (elt) (> elt 0)) '(1 2 3 -1 -2))\n" "@result{} (-1 -2)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:576 #, no-wrap msgid "" "(seq-drop-while (lambda (elt) (< elt 0)) [1 4 6])\n" "@result{} [1 4 6]\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:580 #, no-wrap msgid "seq-do function sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:584 msgid "" "This function applies @var{function} to each element of @var{sequence} in " "turn (presumably for side effects), and returns @var{sequence}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:586 #, no-wrap msgid "seq-map function sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:589 msgid "" "This function returns the result of applying @var{function} to each element " "of @var{sequence}. The returned value is a list." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:594 #, no-wrap msgid "" "(seq-map #'1+ '(2 4 6))\n" "@result{} (3 5 7)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:598 #, no-wrap msgid "" "(seq-map #'symbol-name [foo bar])\n" "@result{} (\"foo\" \"bar\")\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:602 #, no-wrap msgid "seq-map-indexed function sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:606 msgid "" "This function returns the result of applying @var{function} to each element " "of @var{sequence} and its index within @var{seq}. The returned value is a " "list." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:613 #, no-wrap msgid "" "(seq-map-indexed (lambda (elt idx)\n" " (list idx elt))\n" " '(a b c))\n" "@result{} ((0 a) (1 b) (2 c))\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:617 #, no-wrap msgid "seq-mapn function &rest sequences" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:623 msgid "" "This function returns the result of applying @var{function} to each element " "of @var{sequences}. The arity (@pxref{What Is a Function, subr-arity}) of " "@var{function} must match the number of sequences. Mapping stops at the end " "of the shortest sequence, and the returned value is a list." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:628 #, no-wrap msgid "" "(seq-mapn #'+ '(2 4 6) '(20 40 60))\n" "@result{} (22 44 66)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:632 #, no-wrap msgid "" "(seq-mapn #'concat '(\"moskito\" \"bite\") [\"bee\" \"sting\"])\n" "@result{} (\"moskitobee\" \"bitesting\")\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:636 #, no-wrap msgid "seq-filter predicate sequence" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:637 #, no-wrap msgid "filtering sequences" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:640 msgid "" "This function returns a list of all the elements in @var{sequence} for which " "@var{predicate} returns non-@code{nil}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:645 #, no-wrap msgid "" "(seq-filter (lambda (elt) (> elt 0)) [1 -1 3 -3 5])\n" "@result{} (1 3 5)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:649 #, no-wrap msgid "" "(seq-filter (lambda (elt) (> elt 0)) '(-1 -3 -5))\n" "@result{} nil\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:653 #, no-wrap msgid "seq-remove predicate sequence" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:654 #, no-wrap msgid "removing from sequences" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:657 msgid "" "This function returns a list of all the elements in @var{sequence} for which " "@var{predicate} returns @code{nil}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:662 #, no-wrap msgid "" "(seq-remove (lambda (elt) (> elt 0)) [1 -1 3 -3 5])\n" "@result{} (-1 -3)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:666 #, no-wrap msgid "" "(seq-remove (lambda (elt) (< elt 0)) '(-1 -3 -5))\n" "@result{} nil\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:670 #, no-wrap msgid "seq-reduce function sequence initial-value" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:671 #, no-wrap msgid "reducing sequences" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:677 msgid "" "This function returns the result of calling @var{function} with " "@var{initial-value} and the first element of @var{sequence}, then calling " "@var{function} with that result and the second element of @var{sequence}, " "then with that result and the third element of @var{sequence}, etc. " "@var{function} should be a function of two arguments." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:681 msgid "" "@var{function} is called with two arguments. @var{intial-value} (and then " "the accumulated value) is used as the first argument, and the elements in " "@var{sequence} are used for the second argument." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:684 msgid "" "If @var{sequence} is empty, this returns @var{initial-value} without calling " "@var{function}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:689 #, no-wrap msgid "" "(seq-reduce #'+ [1 2 3 4] 0)\n" "@result{} 10\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:693 #, no-wrap msgid "" "(seq-reduce #'+ '(1 2 3 4) 5)\n" "@result{} 15\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:697 #, no-wrap msgid "" "(seq-reduce #'+ '() 3)\n" "@result{} 3\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:701 #, no-wrap msgid "seq-some predicate sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:704 msgid "" "This function returns the first non-@code{nil} value returned by applying " "@var{predicate} to each element of @var{sequence} in turn." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:709 #, no-wrap msgid "" "(seq-some #'numberp [\"abc\" 1 nil])\n" "@result{} t\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:713 #, no-wrap msgid "" "(seq-some #'numberp [\"abc\" \"def\"])\n" "@result{} nil\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:717 #, no-wrap msgid "" "(seq-some #'null [\"abc\" 1 nil])\n" "@result{} t\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:721 #, no-wrap msgid "" "(seq-some #'1+ [2 4 6])\n" "@result{} 3\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:725 #, no-wrap msgid "seq-find predicate sequence &optional default" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:729 msgid "" "This function returns the first element in @var{sequence} for which " "@var{predicate} returns non-@code{nil}. If no element matches " "@var{predicate}, the function returns @var{default}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:733 msgid "" "Note that this function has an ambiguity if the found element is identical " "to @var{default}, as in that case it cannot be known whether an element was " "found or not." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:738 #, no-wrap msgid "" "(seq-find #'numberp [\"abc\" 1 nil])\n" "@result{} 1\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:742 #, no-wrap msgid "" "(seq-find #'numberp [\"abc\" \"def\"])\n" "@result{} nil\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:746 #, no-wrap msgid "seq-every-p predicate sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:749 msgid "" "This function returns non-@code{nil} if applying @var{predicate} to every " "element of @var{sequence} returns non-@code{nil}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:754 #, no-wrap msgid "" "(seq-every-p #'numberp [2 4 6])\n" "@result{} t\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:758 #, no-wrap msgid "" "(seq-every-p #'numberp [2 4 \"6\"])\n" "@result{} nil\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:762 #, no-wrap msgid "seq-empty-p sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:764 msgid "This function returns non-@code{nil} if @var{sequence} is empty." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:769 #, no-wrap msgid "" "(seq-empty-p \"not empty\")\n" "@result{} nil\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:773 #, no-wrap msgid "" "(seq-empty-p \"\")\n" "@result{} t\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:777 #, no-wrap msgid "seq-count predicate sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:780 msgid "" "This function returns the number of elements in @var{sequence} for which " "@var{predicate} returns non-@code{nil}." msgstr "" #. type: example #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:784 #, no-wrap msgid "" "(seq-count (lambda (elt) (> elt 0)) [-1 2 0 3 -2])\n" "@result{} 2\n" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:787 #, no-wrap msgid "sorting sequences" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:788 #, no-wrap msgid "seq-sort function sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:792 msgid "" "This function returns a copy of @var{sequence} that is sorted according to " "@var{function}, a function of two arguments that returns non-@code{nil} if " "the first argument should sort before the second." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:794 #, no-wrap msgid "seq-sort-by function predicate sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:798 msgid "" "This function is similar to @code{seq-sort}, but the elements of " "@var{sequence} are transformed by applying @var{function} on them before " "being sorted. @var{function} is a function of one argument." msgstr "" #. type: example #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:802 #, no-wrap msgid "" "(seq-sort-by #'seq-length #'> [\"a\" \"ab\" \"abc\"])\n" "@result{} [\"abc\" \"ab\" \"a\"]\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:806 #, no-wrap msgid "seq-contains-p sequence elt &optional function" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:811 msgid "" "This function returns non-@code{nil} if at least one element in " "@var{sequence} is equal to @var{elt}. If the optional argument " "@var{function} is non-@code{nil}, it is a function of two arguments to use " "instead of the default @code{equal}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:816 #, no-wrap msgid "" "(seq-contains-p '(symbol1 symbol2) 'symbol1)\n" "@result{} t\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:820 #, no-wrap msgid "" "(seq-contains-p '(symbol1 symbol2) 'symbol3)\n" "@result{} nil\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:825 #, no-wrap msgid "seq-set-equal-p sequence1 sequence2 &optional testfn" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:830 msgid "" "This function checks whether @var{sequence1} and @var{sequence2} contain the " "same elements, regardless of the order. If the optional argument " "@var{testfn} is non-@code{nil}, it is a function of two arguments to use " "instead of the default @code{equal}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:835 #, no-wrap msgid "" "(seq-set-equal-p '(a b c) '(c b a))\n" "@result{} t\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:839 #, no-wrap msgid "" "(seq-set-equal-p '(a b c) '(c b))\n" "@result{} nil\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:843 #, no-wrap msgid "" "(seq-set-equal-p '(\"a\" \"b\" \"c\") '(\"c\" \"b\" \"a\"))\n" "@result{} t\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:847 #, no-wrap msgid "" "(seq-set-equal-p '(\"a\" \"b\" \"c\") '(\"c\" \"b\" \"a\") #'eq)\n" "@result{} nil\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:852 #, no-wrap msgid "seq-position sequence elt &optional function" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:857 msgid "" "This function returns the index of the first element in @var{sequence} that " "is equal to @var{elt}. If the optional argument @var{function} is " "non-@code{nil}, it is a function of two arguments to use instead of the " "default @code{equal}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:862 #, no-wrap msgid "" "(seq-position '(a b c) 'b)\n" "@result{} 1\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:866 #, no-wrap msgid "" "(seq-position '(a b c) 'd)\n" "@result{} nil\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:871 #, no-wrap msgid "seq-uniq sequence &optional function" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:875 msgid "" "This function returns a list of the elements of @var{sequence} with " "duplicates removed. If the optional argument @var{function} is " "non-@code{nil}, it is a function of two arguments to use instead of the " "default @code{equal}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:880 #, no-wrap msgid "" "(seq-uniq '(1 2 2 1 3))\n" "@result{} (1 2 3)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:884 #, no-wrap msgid "" "(seq-uniq '(1 2 2.0 1.0) #'=)\n" "@result{} (1 2)\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:888 #, no-wrap msgid "seq-subseq sequence start &optional end" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:889 #, no-wrap msgid "sub-sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:894 msgid "" "This function returns a subset of @var{sequence} from @var{start} to " "@var{end}, both integers (@var{end} defaults to the last element). If " "@var{start} or @var{end} is negative, it counts from the end of " "@var{sequence}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:899 #, no-wrap msgid "" "(seq-subseq '(1 2 3 4 5) 1)\n" "@result{} (2 3 4 5)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:903 #, no-wrap msgid "" "(seq-subseq '[1 2 3 4 5] 1 3)\n" "@result{} [2 3]\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:907 #, no-wrap msgid "" "(seq-subseq '[1 2 3 4 5] -3 -1)\n" "@result{} [3 4]\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:911 #, no-wrap msgid "seq-concatenate type &rest sequences" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:915 msgid "" "This function returns a sequence of type @var{type} made of the " "concatenation of @var{sequences}. @var{type} may be: @code{vector}, " "@code{list} or @code{string}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:920 #, no-wrap msgid "" "(seq-concatenate 'list '(1 2) '(3 4) [5 6])\n" "@result{} (1 2 3 4 5 6)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:924 #, no-wrap msgid "" "(seq-concatenate 'string \"Hello \" \"world\")\n" "@result{} \"Hello world\"\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:928 #, no-wrap msgid "seq-mapcat function sequence &optional type" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:933 msgid "" "This function returns the result of applying @code{seq-concatenate} to the " "result of applying @var{function} to each element of @var{sequence}. The " "result is a sequence of type @var{type}, or a list if @var{type} is " "@code{nil}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:938 #, no-wrap msgid "" "(seq-mapcat #'seq-reverse '((3 2 1) (6 5 4)))\n" "@result{} (1 2 3 4 5 6)\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:942 #, no-wrap msgid "seq-partition sequence n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:947 msgid "" "This function returns a list of the elements of @var{sequence} grouped into " "sub-sequences of length @var{n}. The last sequence may contain less " "elements than @var{n}. @var{n} must be an integer. If @var{n} is a " "negative integer or 0, the return value is @code{nil}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:952 #, no-wrap msgid "" "(seq-partition '(0 1 2 3 4 5 6 7) 3)\n" "@result{} ((0 1 2) (3 4 5) (6 7))\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:956 #, no-wrap msgid "seq-union sequence1 sequence2 &optional function" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:957 #, no-wrap msgid "sequences, union of" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:958 #, no-wrap msgid "union of sequences" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:965 msgid "" "This function returns a list of the elements that appear either in " "@var{sequence1} or @var{sequence2}. The elements of the returned list are " "all unique, in the sense that no two elements there will compare equal. If " "the optional argument @var{function} is non-@code{nil}, it should be a " "function of two arguments to use to compare elements, instead of the default " "@code{equal}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:970 #, no-wrap msgid "" "(seq-union [1 2 3] [3 5])\n" "@result{} (1 2 3 5)\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:974 #, no-wrap msgid "seq-intersection sequence1 sequence2 &optional function" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:975 #, no-wrap msgid "sequences, intersection of" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:976 #, no-wrap msgid "intersection of sequences" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:981 msgid "" "This function returns a list of the elements that appear both in " "@var{sequence1} and @var{sequence2}. If the optional argument " "@var{function} is non-@code{nil}, it is a function of two arguments to use " "to compare elements instead of the default @code{equal}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:986 #, no-wrap msgid "" "(seq-intersection [2 3 4 5] [1 3 5 6 7])\n" "@result{} (3 5)\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:991 #, no-wrap msgid "seq-difference sequence1 sequence2 &optional function" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:996 msgid "" "This function returns a list of the elements that appear in @var{sequence1} " "but not in @var{sequence2}. If the optional argument @var{function} is " "non-@code{nil}, it is a function of two arguments to use to compare elements " "instead of the default @code{equal}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1001 #, no-wrap msgid "" "(seq-difference '(2 3 4 5) [1 3 5 6 7])\n" "@result{} (2 4)\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1005 #, no-wrap msgid "seq-group-by function sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1009 msgid "" "This function separates the elements of @var{sequence} into an alist whose " "keys are the result of applying @var{function} to each element of " "@var{sequence}. Keys are compared using @code{equal}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1014 #, no-wrap msgid "" "(seq-group-by #'integerp '(1 2.1 3 2 3.2))\n" "@result{} ((t 1 3 2) (nil 2.1 3.2))\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1018 #, no-wrap msgid "" "(seq-group-by #'car '((a 1) (b 2) (a 3) (c 4)))\n" "@result{} ((b (b 2)) (a (a 1) (a 3)) (c (c 4)))\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1022 #, no-wrap msgid "seq-into sequence type" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1023 #, no-wrap msgid "convert sequence to another type" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1024 #, no-wrap msgid "list to vector" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1025 #, no-wrap msgid "vector to list" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1026 #, no-wrap msgid "string to vector" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1030 msgid "" "This function converts the sequence @var{sequence} into a sequence of type " "@var{type}. @var{type} can be one of the following symbols: @code{vector}, " "@code{string} or @code{list}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1035 #, no-wrap msgid "" "(seq-into [1 2 3] 'list)\n" "@result{} (1 2 3)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1039 #, no-wrap msgid "" "(seq-into nil 'vector)\n" "@result{} []\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1043 #, no-wrap msgid "" "(seq-into \"hello\" 'vector)\n" "@result{} [104 101 108 108 111]\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1047 #, no-wrap msgid "seq-min sequence" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1048 #, no-wrap msgid "minimum value of sequence" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1049 #, no-wrap msgid "sequence minimum" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1053 msgid "" "This function returns the smallest element of @var{sequence}. The elements " "of @var{sequence} must be numbers or markers (@pxref{Markers})." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1058 #, no-wrap msgid "" "(seq-min [3 1 2])\n" "@result{} 1\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1062 #, no-wrap msgid "" "(seq-min \"Hello\")\n" "@result{} 72\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1066 #, no-wrap msgid "seq-max sequence" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1067 #, no-wrap msgid "maximum value of sequence" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1068 #, no-wrap msgid "sequence maximum" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1071 msgid "" "This function returns the largest element of @var{sequence}. The elements " "of @var{sequence} must be numbers or markers." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1076 #, no-wrap msgid "" "(seq-max [1 3 2])\n" "@result{} 3\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1080 #, no-wrap msgid "" "(seq-max \"Hello\")\n" "@result{} 111\n" msgstr "" #. type: defmac #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1084 #, no-wrap msgid "seq-doseq (var sequence) body@dots{}" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1085 #, no-wrap msgid "sequence iteration" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1086 #, no-wrap msgid "iteration over vector or string" msgstr "" #. type: defmac #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1090 msgid "" "This macro is like @code{dolist} (@pxref{Iteration, dolist}), except that " "@var{sequence} can be a list, vector or string. This is primarily useful " "for side-effects." msgstr "" #. type: anchor{#1} #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1093 msgid "seq-let" msgstr "" #. type: defmac #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1093 #, no-wrap msgid "seq-let var-sequence val-sequence body@dots{}" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1094 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1133 #, no-wrap msgid "sequence destructuring" msgstr "" #. type: defmac #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1100 msgid "" "This macro binds the variables defined in @var{var-sequence} to the values " "that are the corresponding elements of @var{val-sequence}. This is known as " "@dfn{destructuring binding}. The elements of @var{var-sequence} can " "themselves include sequences, allowing for nested destructuring." msgstr "" #. type: defmac #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1104 msgid "" "The @var{var-sequence} sequence can also include the @code{&rest} marker " "followed by a variable name to be bound to the rest of @var{val-sequence}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1110 #, no-wrap msgid "" "(seq-let [first second] [1 2 3 4]\n" " (list first second))\n" "@result{} (1 2)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1115 #, no-wrap msgid "" "(seq-let (_ a _ b) '(1 2 3 4)\n" " (list a b))\n" "@result{} (2 4)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1120 #, no-wrap msgid "" "(seq-let [a [b [c]]] [1 [2 [3]]]\n" " (list a b c))\n" "@result{} (1 2 3)\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1124 #, no-wrap msgid "" "(seq-let [a b &rest others] [1 2 3 4]\n" " others)\n" msgstr "" #. type: example #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1126 #, no-wrap msgid "@result{} [3 4]\n" msgstr "" #. type: defmac #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1130 msgid "" "The @code{pcase} patterns provide an alternative facility for destructuring " "binding, see @ref{Destructuring with pcase Patterns}." msgstr "" #. type: defmac #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1132 #, no-wrap msgid "seq-setq var-sequence val-sequence" msgstr "" #. type: defmac #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1137 msgid "" "This macro works similarly to @code{seq-let}, except that values are " "assigned to variables as if by @code{setq} instead of as in a @code{let} " "binding." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1145 #, no-wrap msgid "" "(let ((a nil)\n" " (b nil))\n" " (seq-setq (_ a _ b) '(1 2 3 4))\n" " (list a b))\n" "@result{} (2 4)\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1149 #, no-wrap msgid "seq-random-elt sequence" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1151 msgid "This function returns an element of @var{sequence} taken at random." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1164 #, no-wrap msgid "" "(seq-random-elt [1 2 3 4])\n" "@result{} 3\n" "(seq-random-elt [1 2 3 4])\n" "@result{} 2\n" "(seq-random-elt [1 2 3 4])\n" "@result{} 4\n" "(seq-random-elt [1 2 3 4])\n" "@result{} 2\n" "(seq-random-elt [1 2 3 4])\n" "@result{} 1\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1168 msgid "If @var{sequence} is empty, this function signals an error." msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1172 #, no-wrap msgid "array" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1179 msgid "" "An @dfn{array} object has slots that hold a number of other Lisp objects, " "called the elements of the array. Any element of an array may be accessed " "in constant time. In contrast, the time to access an element of a list is " "proportional to the position of that element in the list." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1186 msgid "" "Emacs defines four types of array, all one-dimensional: @dfn{strings} " "(@pxref{String Type}), @dfn{vectors} (@pxref{Vector Type}), " "@dfn{bool-vectors} (@pxref{Bool-Vector Type}), and @dfn{char-tables} " "(@pxref{Char-Table Type}). Vectors and char-tables can hold elements of any " "type, but strings can only hold characters, and bool-vectors can only hold " "@code{t} and @code{nil}." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1188 msgid "All four kinds of array share these characteristics:" msgstr "" #. type: itemize #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1194 msgid "" "The first element of an array has index zero, the second element has index " "1, and so on. This is called @dfn{zero-origin} indexing. For example, an " "array of four elements has indices 0, 1, 2, @w{and 3}." msgstr "" #. type: itemize #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1198 msgid "" "The length of the array is fixed once you create it; you cannot change the " "length of an existing array." msgstr "" #. type: itemize #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1202 msgid "" "For purposes of evaluation, the array is a constant---i.e., it evaluates to " "itself." msgstr "" #. type: itemize #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1206 msgid "" "The elements of an array may be referenced or changed with the functions " "@code{aref} and @code{aset}, respectively (@pxref{Array Functions})." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1211 msgid "" "When you create an array, other than a char-table, you must specify its " "length. You cannot specify the length of a char-table, because that is " "determined by the range of character codes." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1215 msgid "" "In principle, if you want an array of text characters, you could use either " "a string or a vector. In practice, we always choose strings for such " "applications, for four reasons:" msgstr "" #. type: itemize #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1219 msgid "They occupy one-fourth the space of a vector of the same elements." msgstr "" #. type: itemize #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1223 msgid "Strings are printed in a way that shows the contents more clearly as text." msgstr "" #. type: itemize #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1226 msgid "Strings can hold text properties. @xref{Text Properties}." msgstr "" #. type: itemize #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1231 msgid "" "Many of the specialized editing and I/O facilities of Emacs accept only " "strings. For example, you cannot insert a vector of characters into a " "buffer the way you can insert a string. @xref{Strings and Characters}." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1237 msgid "" "By contrast, for an array of keyboard input characters (such as a key " "sequence), a vector may be necessary, because many keyboard input characters " "are outside the range that will fit in a string. @xref{Key Sequence Input}." msgstr "" #. type: section #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1239 #, no-wrap msgid "Functions that Operate on Arrays" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1243 msgid "In this section, we describe the functions that accept all types of arrays." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1244 #, no-wrap msgid "arrayp object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1247 msgid "" "This function returns @code{t} if @var{object} is an array (i.e., a vector, " "a string, a bool-vector or a char-table)." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1256 #, no-wrap msgid "" "(arrayp [a])\n" " @result{} t\n" "(arrayp \"asdf\")\n" " @result{} t\n" "(arrayp (syntax-table)) ;; @r{A char-table.}\n" " @result{} t\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1260 #, no-wrap msgid "aref arr index" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1261 #, no-wrap msgid "array elements" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1264 msgid "" "This function returns the @var{index}th element of the array or record " "@var{arr}. The first element is at index zero." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1271 #, no-wrap msgid "" "(setq primes [2 3 5 7 11 13])\n" " @result{} [2 3 5 7 11 13]\n" "(aref primes 4)\n" " @result{} 11\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1275 #, no-wrap msgid "" "(aref \"abcdefg\" 1)\n" " @result{} 98 ; @r{@samp{b} is @acronym{ASCII} code 98.}\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1279 msgid "See also the function @code{elt}, in @ref{Sequence Functions}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1281 #, no-wrap msgid "aset array index object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1284 msgid "" "This function sets the @var{index}th element of @var{array} to be " "@var{object}. It returns @var{object}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1293 #, no-wrap msgid "" "(setq w (vector 'foo 'bar 'baz))\n" " @result{} [foo bar baz]\n" "(aset w 0 'fu)\n" " @result{} fu\n" "w\n" " @result{} [fu bar baz]\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1303 #, no-wrap msgid "" ";; @r{@code{copy-sequence} copies the string to be modified later.}\n" "(setq x (copy-sequence \"asdfasfd\"))\n" " @result{} \"asdfasfd\"\n" "(aset x 3 ?Z)\n" " @result{} 90\n" "x\n" " @result{} \"asdZasfd\"\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1307 msgid "The @var{array} should be mutable. @xref{Mutability}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1311 msgid "" "If @var{array} is a string and @var{object} is not a character, a " "@code{wrong-type-argument} error results. The function converts a unibyte " "string to multibyte if necessary to insert a character." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1313 #, no-wrap msgid "fillarray array object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1316 msgid "" "This function fills the array @var{array} with @var{object}, so that each " "element of @var{array} is @var{object}. It returns @var{array}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1325 #, no-wrap msgid "" "(setq a (copy-sequence [a b c d e f g]))\n" " @result{} [a b c d e f g]\n" "(fillarray a 0)\n" " @result{} [0 0 0 0 0 0 0]\n" "a\n" " @result{} [0 0 0 0 0 0 0]\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1331 #, no-wrap msgid "" "(setq s (copy-sequence \"When in the course\"))\n" " @result{} \"When in the course\"\n" "(fillarray s ?-)\n" " @result{} \"------------------\"\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1336 msgid "" "If @var{array} is a string and @var{object} is not a character, a " "@code{wrong-type-argument} error results." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1340 msgid "" "The general sequence functions @code{copy-sequence} and @code{length} are " "often useful for objects known to be arrays. @xref{Sequence Functions}." msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1343 #, no-wrap msgid "vector (type)" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1352 msgid "" "A @dfn{vector} is a general-purpose array whose elements can be any Lisp " "objects. (By contrast, the elements of a string can only be characters. " "@xref{Strings and Characters}.) Vectors are used in Emacs for many " "purposes: as key sequences (@pxref{Key Sequences}), as symbol-lookup tables " "(@pxref{Creating Symbols}), as part of the representation of a byte-compiled " "function (@pxref{Byte Compilation}), and more." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1355 msgid "" "Like other arrays, vectors use zero-origin indexing: the first element has " "index 0." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1360 msgid "" "Vectors are printed with square brackets surrounding the elements. Thus, a " "vector whose elements are the symbols @code{a}, @code{b} and @code{a} is " "printed as @code{[a b a]}. You can write vectors in the same way in Lisp " "input." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1367 msgid "" "A vector, like a string or a number, is considered a constant for " "evaluation: the result of evaluating it is the same vector. This does not " "evaluate or even examine the elements of the vector. @xref{Self-Evaluating " "Forms}. Vectors written with square brackets should not be modified via " "@code{aset} or other destructive operations. @xref{Mutability}." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1369 msgid "Here are examples illustrating these principles:" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1378 #, no-wrap msgid "" "(setq avector [1 two '(three) \"four\" [five]])\n" " @result{} [1 two '(three) \"four\" [five]]\n" "(eval avector)\n" " @result{} [1 two '(three) \"four\" [five]]\n" "(eq avector (eval avector))\n" " @result{} t\n" msgstr "" #. type: section #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1382 #, no-wrap msgid "Functions for Vectors" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1385 msgid "Here are some functions that relate to vectors:" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1386 #, no-wrap msgid "vectorp object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1388 msgid "This function returns @code{t} if @var{object} is a vector." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1395 #, no-wrap msgid "" "(vectorp [a])\n" " @result{} t\n" "(vectorp \"asdf\")\n" " @result{} nil\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1399 #, no-wrap msgid "vector &rest objects" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1402 msgid "" "This function creates and returns a vector whose elements are the arguments, " "@var{objects}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1409 #, no-wrap msgid "" "(vector 'foo 23 [bar baz] \"rats\")\n" " @result{} [foo 23 [bar baz] \"rats\"]\n" "(vector)\n" " @result{} []\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1413 #, no-wrap msgid "make-vector length object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1416 msgid "" "This function returns a new vector consisting of @var{length} elements, each " "initialized to @var{object}." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1421 #, no-wrap msgid "" "(setq sleepy (make-vector 9 'Z))\n" " @result{} [Z Z Z Z Z Z Z Z Z]\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1425 #, no-wrap msgid "vconcat &rest sequences" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1426 #, no-wrap msgid "copying vectors" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1431 msgid "" "This function returns a new vector containing all the elements of " "@var{sequences}. The arguments @var{sequences} may be proper lists, " "vectors, strings or bool-vectors. If no @var{sequences} are given, the " "empty vector is returned." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1434 msgid "" "The value is either the empty vector, or is a newly constructed nonempty " "vector that is not @code{eq} to any existing vector." msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1441 #, no-wrap msgid "" "(setq a (vconcat '(A B C) '(D E F)))\n" " @result{} [A B C D E F]\n" "(eq a (vconcat a))\n" " @result{} nil\n" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1447 #, no-wrap msgid "" "(vconcat)\n" " @result{} []\n" "(vconcat [A B C] \"aa\" '(foo (6 7)))\n" " @result{} [A B C 97 97 foo (6 7)]\n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1453 msgid "" "The @code{vconcat} function also allows byte-code function objects as " "arguments. This is a special feature to make it easy to access the entire " "contents of a byte-code function object. @xref{Byte-Code Objects}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1457 msgid "" "For other concatenation functions, see @code{mapconcat} in @ref{Mapping " "Functions}, @code{concat} in @ref{Creating Strings}, and @code{append} in " "@ref{Building Lists}." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1461 msgid "" "The @code{append} function also provides a way to convert a vector into a " "list with the same elements:" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1468 #, no-wrap msgid "" "(setq avector [1 two (quote (three)) \"four\" [five]])\n" " @result{} [1 two '(three) \"four\" [five]]\n" "(append avector nil)\n" " @result{} (1 two '(three) \"four\" [five])\n" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1473 #, no-wrap msgid "char-tables" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1474 #, no-wrap msgid "extra slots of char-table" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1484 msgid "" "A char-table is much like a vector, except that it is indexed by character " "codes. Any valid character code, without modifiers, can be used as an index " "in a char-table. You can access a char-table's elements with @code{aref} " "and @code{aset}, as with any array. In addition, a char-table can have " "@dfn{extra slots} to hold additional data not associated with particular " "character codes. Like vectors, char-tables are constants when evaluated, " "and can hold elements of any type." msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1485 #, no-wrap msgid "subtype of char-table" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1488 msgid "Each char-table has a @dfn{subtype}, a symbol, which serves two purposes:" msgstr "" #. type: itemize #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1496 msgid "" "The subtype provides an easy way to tell what the char-table is for. For " "instance, display tables are char-tables with @code{display-table} as the " "subtype, and syntax tables are char-tables with @code{syntax-table} as the " "subtype. The subtype can be queried using the function " "@code{char-table-subtype}, described below." msgstr "" #. type: itemize #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1504 msgid "" "The subtype controls the number of @dfn{extra slots} in the char-table. " "This number is specified by the subtype's @code{char-table-extra-slots} " "symbol property (@pxref{Symbol Properties}), whose value should be an " "integer between 0 and 10. If the subtype has no such symbol property, the " "char-table has no extra slots." msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1506 #, no-wrap msgid "parent of char-table" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1513 msgid "" "A char-table can have a @dfn{parent}, which is another char-table. If it " "does, then whenever the char-table specifies @code{nil} for a particular " "character @var{c}, it inherits the value specified in the parent. In other " "words, @code{(aref @var{char-table} @var{c})} returns the value from the " "parent of @var{char-table} if @var{char-table} itself specifies @code{nil}." msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1514 #, no-wrap msgid "default value of char-table" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1518 msgid "" "A char-table can also have a @dfn{default value}. If so, then @code{(aref " "@var{char-table} @var{c})} returns the default value whenever the char-table " "does not specify any other non-@code{nil} value." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1519 #, no-wrap msgid "make-char-table subtype &optional init" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1524 msgid "" "Return a newly-created char-table, with subtype @var{subtype} (a symbol). " "Each element is initialized to @var{init}, which defaults to @code{nil}. " "You cannot alter the subtype of a char-table after the char-table is " "created." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1527 msgid "" "There is no argument to specify the length of the char-table, because all " "char-tables have room for any valid character code as an index." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1534 msgid "" "If @var{subtype} has the @code{char-table-extra-slots} symbol property, that " "specifies the number of extra slots in the char-table. This should be an " "integer between 0 and 10; otherwise, @code{make-char-table} raises an " "error. If @var{subtype} has no @code{char-table-extra-slots} symbol " "property (@pxref{Property Lists}), the char-table has no extra slots." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1536 #, no-wrap msgid "char-table-p object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1539 msgid "" "This function returns @code{t} if @var{object} is a char-table, and " "@code{nil} otherwise." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1541 #, no-wrap msgid "char-table-subtype char-table" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1543 msgid "This function returns the subtype symbol of @var{char-table}." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1547 msgid "" "There is no special function to access default values in a char-table. To " "do that, use @code{char-table-range} (see below)." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1548 #, no-wrap msgid "char-table-parent char-table" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1551 msgid "" "This function returns the parent of @var{char-table}. The parent is always " "either @code{nil} or another char-table." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1553 #, no-wrap msgid "set-char-table-parent char-table new-parent" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1555 msgid "This function sets the parent of @var{char-table} to @var{new-parent}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1557 #, no-wrap msgid "char-table-extra-slot char-table n" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1561 msgid "" "This function returns the contents of extra slot @var{n} (zero based) of " "@var{char-table}. The number of extra slots in a char-table is determined " "by its subtype." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1563 #, no-wrap msgid "set-char-table-extra-slot char-table n value" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1566 msgid "" "This function stores @var{value} in extra slot @var{n} (zero based) of " "@var{char-table}." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1570 msgid "" "A char-table can specify an element value for a single character code; it " "can also specify a value for an entire character set." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1571 #, no-wrap msgid "char-table-range char-table range" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1574 msgid "" "This returns the value specified in @var{char-table} for a range of " "characters @var{range}. Here are the possibilities for @var{range}:" msgstr "" #. type: code{#1} #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1576 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1594 #, no-wrap msgid "nil" msgstr "" #. type: table #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1578 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1596 msgid "Refers to the default value." msgstr "" #. type: var{#1} #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1579 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1600 #, no-wrap msgid "char" msgstr "" #. type: table #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1582 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1603 msgid "" "Refers to the element for character @var{char} (supposing @var{char} is a " "valid character code)." msgstr "" #. type: code{#1} #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1583 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1604 #, no-wrap msgid "(@var{from} . @var{to})" msgstr "" #. type: table #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1586 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1607 msgid "" "A cons cell refers to all the characters in the inclusive range " "@samp{[@var{from}..@var{to}]}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1589 #, no-wrap msgid "set-char-table-range char-table range value" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1592 msgid "" "This function sets the value in @var{char-table} for a range of characters " "@var{range}. Here are the possibilities for @var{range}:" msgstr "" #. type: code{#1} #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1597 #, no-wrap msgid "t" msgstr "" #. type: table #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1599 msgid "Refers to the whole range of character codes." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1610 #, no-wrap msgid "map-char-table function char-table" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1618 msgid "" "This function calls its argument @var{function} for each element of " "@var{char-table} that has a non-@code{nil} value. The call to " "@var{function} is with two arguments, a key and a value. The key is a " "possible @var{range} argument for @code{char-table-range}---either a valid " "character or a cons cell @code{(@var{from} . @var{to})}, specifying a range " "of characters that share the same value. The value is what " "@code{(char-table-range @var{char-table} @var{key})} returns." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1621 msgid "" "Overall, the key-value pairs passed to @var{function} describe all the " "values stored in @var{char-table}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1625 msgid "" "The return value is always @code{nil}; to make calls to " "@code{map-char-table} useful, @var{function} should have side effects. For " "example, here is how to examine the elements of the syntax table:" msgstr "" #. type: example #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1643 #, no-wrap msgid "" "(let (accumulator)\n" " (map-char-table\n" " (lambda (key value)\n" " (setq accumulator\n" " (cons (list\n" " (if (consp key)\n" " (list (car key) (cdr key))\n" " key)\n" " value)\n" " accumulator)))\n" " (syntax-table))\n" " accumulator)\n" "@result{}\n" "(((2597602 4194303) (2)) ((2597523 2597601) (3))\n" " ... (65379 (5 . 65378)) (65378 (4 . 65379)) (65377 (1))\n" " ... (12 (0)) (11 (3)) (10 (12)) (9 (0)) ((0 8) (3)))\n" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1647 #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1648 #, no-wrap msgid "Bool-vectors" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1656 msgid "" "A bool-vector is much like a vector, except that it stores only the values " "@code{t} and @code{nil}. If you try to store any non-@code{nil} value into " "an element of the bool-vector, the effect is to store @code{t} there. As " "with all arrays, bool-vector indices start from 0, and the length cannot be " "changed once the bool-vector is created. Bool-vectors are constants when " "evaluated." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1660 msgid "" "Several functions work specifically with bool-vectors; aside from that, you " "manipulate them with same functions used for other kinds of arrays." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1661 #, no-wrap msgid "make-bool-vector length initial" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1664 msgid "" "Return a new bool-vector of @var{length} elements, each one initialized to " "@var{initial}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1666 #, no-wrap msgid "bool-vector &rest objects" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1669 msgid "" "This function creates and returns a bool-vector whose elements are the " "arguments, @var{objects}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1671 #, no-wrap msgid "bool-vector-p object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1674 msgid "" "This returns @code{t} if @var{object} is a bool-vector, and @code{nil} " "otherwise." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1677 msgid "There are also some bool-vector set operation functions, described below:" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1678 #, no-wrap msgid "bool-vector-exclusive-or a b &optional c" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1682 msgid "" "Return @dfn{bitwise exclusive or} of bool vectors @var{a} and @var{b}. If " "optional argument @var{c} is given, the result of this operation is stored " "into @var{c}. All arguments should be bool vectors of the same length." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1684 #, no-wrap msgid "bool-vector-union a b &optional c" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1688 msgid "" "Return @dfn{bitwise or} of bool vectors @var{a} and @var{b}. If optional " "argument @var{c} is given, the result of this operation is stored into " "@var{c}. All arguments should be bool vectors of the same length." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1690 #, no-wrap msgid "bool-vector-intersection a b &optional c" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1694 msgid "" "Return @dfn{bitwise and} of bool vectors @var{a} and @var{b}. If optional " "argument @var{c} is given, the result of this operation is stored into " "@var{c}. All arguments should be bool vectors of the same length." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1696 #, no-wrap msgid "bool-vector-set-difference a b &optional c" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1700 msgid "" "Return @dfn{set difference} of bool vectors @var{a} and @var{b}. If " "optional argument @var{c} is given, the result of this operation is stored " "into @var{c}. All arguments should be bool vectors of the same length." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1702 #, no-wrap msgid "bool-vector-not a &optional b" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1706 msgid "" "Return @dfn{set complement} of bool vector @var{a}. If optional argument " "@var{b} is given, the result of this operation is stored into @var{b}. All " "arguments should be bool vectors of the same length." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1708 #, no-wrap msgid "bool-vector-subsetp a b" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1712 msgid "" "Return @code{t} if every @code{t} value in @var{a} is also @code{t} in " "@var{b}, @code{nil} otherwise. All arguments should be bool vectors of the " "same length." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1714 #, no-wrap msgid "bool-vector-count-consecutive a b i" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1718 msgid "" "Return the number of consecutive elements in @var{a} equal @var{b} starting " "at @var{i}. @code{a} is a bool vector, @var{b} is @code{t} or @code{nil}, " "and @var{i} is an index into @code{a}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1720 #, no-wrap msgid "bool-vector-count-population a" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1722 msgid "Return the number of elements that are @code{t} in bool vector @var{a}." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1726 msgid "The printed form represents up to 8 boolean values as a single character:" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1733 #, no-wrap msgid "" "(bool-vector t nil t nil)\n" " @result{} #&4\"^E\"\n" "(bool-vector)\n" " @result{} #&0\"\"\n" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1737 msgid "You can use @code{vconcat} to print a bool-vector like other vectors:" msgstr "" #. type: group #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1742 #, no-wrap msgid "" "(vconcat (bool-vector nil t nil t))\n" " @result{} [nil t nil t]\n" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1747 msgid "Here is another example of creating, examining, and updating a bool-vector:" msgstr "" #. type: example #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1757 #, no-wrap msgid "" "(setq bv (make-bool-vector 5 t))\n" " @result{} #&5\"^_\"\n" "(aref bv 1)\n" " @result{} t\n" "(aset bv 3 nil)\n" " @result{} nil\n" "bv\n" " @result{} #&5\"^W\"\n" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1762 msgid "" "These results make sense because the binary codes for control-_ and " "control-W are 11111 and 10111, respectively." msgstr "" #. type: section #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1764 #, no-wrap msgid "Managing a Fixed-Size Ring of Objects" msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1766 #, no-wrap msgid "ring data structure" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1771 msgid "" "A @dfn{ring} is a fixed-size data structure that supports insertion, " "deletion, rotation, and modulo-indexed reference and traversal. An " "efficient ring data structure is implemented by the @code{ring} package. It " "provides the functions listed in this section." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1776 msgid "" "Note that several rings in Emacs, like the kill ring and the mark ring, are " "actually implemented as simple lists, @emph{not} using the @code{ring} " "package; thus the following functions won't work on them." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1777 #, no-wrap msgid "make-ring size" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1780 msgid "" "This returns a new ring capable of holding @var{size} objects. @var{size} " "should be an integer." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1782 #, no-wrap msgid "ring-p object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1784 msgid "This returns @code{t} if @var{object} is a ring, @code{nil} otherwise." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1786 #, no-wrap msgid "ring-size ring" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1788 msgid "This returns the maximum capacity of the @var{ring}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1790 #, no-wrap msgid "ring-length ring" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1793 msgid "" "This returns the number of objects that @var{ring} currently contains. The " "value will never exceed that returned by @code{ring-size}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1795 #, no-wrap msgid "ring-elements ring" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1797 msgid "This returns a list of the objects in @var{ring}, in order, newest first." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1799 #, no-wrap msgid "ring-copy ring" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1802 msgid "" "This returns a new ring which is a copy of @var{ring}. The new ring " "contains the same (@code{eq}) objects as @var{ring}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1804 #, no-wrap msgid "ring-empty-p ring" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1806 msgid "This returns @code{t} if @var{ring} is empty, @code{nil} otherwise." msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1812 msgid "" "The newest element in the ring always has index 0. Higher indices " "correspond to older elements. Indices are computed modulo the ring length. " "Index @minus{}1 corresponds to the oldest element, @minus{}2 to the " "next-oldest, and so forth." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1813 #, no-wrap msgid "ring-ref ring index" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1817 msgid "" "This returns the object in @var{ring} found at index @var{index}. " "@var{index} may be negative or greater than the ring length. If @var{ring} " "is empty, @code{ring-ref} signals an error." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1819 #, no-wrap msgid "ring-insert ring object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1822 msgid "" "This inserts @var{object} into @var{ring}, making it the newest element, and " "returns @var{object}." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1825 msgid "" "If the ring is full, insertion removes the oldest element to make room for " "the new element." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1827 #, no-wrap msgid "ring-remove ring &optional index" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1832 msgid "" "Remove an object from @var{ring}, and return that object. The argument " "@var{index} specifies which item to remove; if it is @code{nil}, that means " "to remove the oldest item. If @var{ring} is empty, @code{ring-remove} " "signals an error." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1834 #, no-wrap msgid "ring-insert-at-beginning ring object" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1837 msgid "" "This inserts @var{object} into @var{ring}, treating it as the oldest " "element. The return value is not significant." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1840 msgid "" "If the ring is full, this function removes the newest element to make room " "for the inserted element." msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1842 #, no-wrap msgid "ring-resize ring size" msgstr "" #. type: defun #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1845 msgid "" "Set the size of @var{ring} to @var{size}. If the new size is smaller, then " "the oldest items in the ring are discarded." msgstr "" #. type: cindex #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1847 #, no-wrap msgid "fifo data structure" msgstr "" #. type: Plain text #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1850 msgid "" "If you are careful not to exceed the ring size, you can use the ring as a " "first-in-first-out queue. For example:" msgstr "" #. type: lisp #: /Users/suzume/Documents/Repositories/Projet OmegaT de Documentation Emacs - #: Sources/doc/lispref/sequences.texi:1859 #, no-wrap msgid "" "(let ((fifo (make-ring 5)))\n" " (mapc (lambda (obj) (ring-insert fifo obj))\n" " '(0 one \"two\"))\n" " (list (ring-remove fifo) t\n" " (ring-remove fifo) t\n" " (ring-remove fifo)))\n" " @result{} (0 t one t \"two\")\n" msgstr ""