comparison lisp/mule/auto-autoloads.el @ 167:85ec50267440 r20-3b10

Import from CVS: tag r20-3b10
author cvs
date Mon, 13 Aug 2007 09:45:46 +0200
parents 5a88923fcbfe
children e121b013d1f0
comparison
equal deleted inserted replaced
166:7a77eb660975 167:85ec50267440
94 94
95 (autoload 'define-word-regexp "mule-trex" nil nil 'macro) 95 (autoload 'define-word-regexp "mule-trex" nil nil 'macro)
96 96
97 ;;;*** 97 ;;;***
98 98
99 ;;;### (autoloads (decompose-composite-char compose-chars decompose-region compose-region set-coding-system-alist lookup-nested-alist set-nested-alist truncate-string-to-width store-substring) "mule-util" "mule/mule-util.el") 99 ;;;### (autoloads (decompose-composite-char compose-chars decompose-region compose-region set-coding-system-alist lookup-nested-alist set-nested-alist nested-alist-p truncate-string-to-width store-substring string-to-vector string-to-list string-to-sequence) "mule-util" "mule/mule-util.el")
100 100
101 (defsubst string-to-sequence (string type) "Convert STRING to a sequence of TYPE which contains characters in STRING.\nTYPE should be `list' or `vector'.\nMultibyte characters are conserned." (map type (function identity) string)) 101 (autoload 'string-to-sequence "mule-util" "\
102 102 Convert STRING to a sequence of TYPE which contains characters in STRING.
103 (defsubst string-to-list (string) "Return a list of characters in STRING." (mapcar (function identity) string)) 103 TYPE should be `list' or `vector'.
104 104 Multibyte characters are concerned." nil nil)
105 (defsubst string-to-vector (string) "Return a vector of characters in STRING." (string-to-sequence string 'vector)) 105
106 (autoload 'string-to-list "mule-util" "\
107 Return a list of characters in STRING." nil nil)
108
109 (autoload 'string-to-vector "mule-util" "\
110 Return a vector of characters in STRING." nil nil)
106 111
107 (autoload 'store-substring "mule-util" "\ 112 (autoload 'store-substring "mule-util" "\
108 Embed OBJ (string or character) at index IDX of STRING." nil nil) 113 Embed OBJ (string or character) at index IDX of STRING." nil nil)
109 114
110 (autoload 'truncate-string-to-width "mule-util" "\ 115 (autoload 'truncate-string-to-width "mule-util" "\
114 the head and tail of the resulting string to fit in WIDTH if necessary. 119 the head and tail of the resulting string to fit in WIDTH if necessary.
115 If PADDING is nil, the resulting string may be narrower than WIDTH." nil nil) 120 If PADDING is nil, the resulting string may be narrower than WIDTH." nil nil)
116 121
117 (defalias 'truncate-string 'truncate-string-to-width) 122 (defalias 'truncate-string 'truncate-string-to-width)
118 123
119 (defsubst nested-alist-p (obj) "Return t if OBJ is a nesetd alist.\n\nNested alist is a list of the form (ENTRY . BRANCHES), where ENTRY is\nany Lisp object, and BRANCHES is a list of cons cells of the form\n(KEY-ELEMENT . NESTED-ALIST).\n\nYou can use a nested alist to store any Lisp object (ENTRY) for a key\nsequence KEYSEQ, where KEYSEQ is a sequence of KEY-ELEMENT. KEYSEQ\ncan be a string, a vector, or a list." (and obj (listp obj) (listp (cdr obj)))) 124 (autoload 'nested-alist-p "mule-util" "\
125 Return t if OBJ is a nesetd alist.
126
127 Nested alist is a list of the form (ENTRY . BRANCHES), where ENTRY is
128 any Lisp object, and BRANCHES is a list of cons cells of the form
129 \(KEY-ELEMENT . NESTED-ALIST).
130
131 You can use a nested alist to store any Lisp object (ENTRY) for a key
132 sequence KEYSEQ, where KEYSEQ is a sequence of KEY-ELEMENT. KEYSEQ
133 can be a string, a vector, or a list." nil nil)
120 134
121 (autoload 'set-nested-alist "mule-util" "\ 135 (autoload 'set-nested-alist "mule-util" "\
122 Set ENTRY for KEYSEQ in a nested alist ALIST. 136 Set ENTRY for KEYSEQ in a nested alist ALIST.
123 Optional 4th arg LEN non-nil means the firlst LEN elements in KEYSEQ 137 Optional 4th arg LEN non-nil means the firlst LEN elements in KEYSEQ
124 is considered. 138 is considered.