enum case_action {CASE_UP, CASE_DOWN, CASE_CAPITALIZE, CASE_CAPITALIZE_UP};
\f
static Lisp_Object
enum case_action {CASE_UP, CASE_DOWN, CASE_CAPITALIZE, CASE_CAPITALIZE_UP};
\f
static Lisp_Object
goto retry;
}
DEFUN ("upcase", Fupcase, 1, 2, 0, /*
goto retry;
}
DEFUN ("upcase", Fupcase, 1, 2, 0, /*
-Convert OBJECT to upper case and return that.
-OBJECT may be a character or string. The result has the same type.
-OBJECT is not altered--the value is a copy.
+Convert STRING-OR-CHAR to upper case and return that.
+STRING-OR-CHAR may be a character or string. The result has the same type.
+STRING-OR-CHAR is not altered--the value is a copy.
See also `capitalize', `downcase' and `upcase-initials'.
Optional second arg BUFFER specifies which buffer's case tables to use,
and defaults to the current buffer.
*/
See also `capitalize', `downcase' and `upcase-initials'.
Optional second arg BUFFER specifies which buffer's case tables to use,
and defaults to the current buffer.
*/
}
DEFUN ("downcase", Fdowncase, 1, 2, 0, /*
}
DEFUN ("downcase", Fdowncase, 1, 2, 0, /*
-Convert OBJECT to lower case and return that.
-OBJECT may be a character or string. The result has the same type.
-OBJECT is not altered--the value is a copy.
+Convert STRING-OR-CHAR to lower case and return that.
+STRING-OR-CHAR may be a character or string. The result has the same type.
+STRING-OR-CHAR is not altered--the value is a copy.
Optional second arg BUFFER specifies which buffer's case tables to use,
and defaults to the current buffer.
*/
Optional second arg BUFFER specifies which buffer's case tables to use,
and defaults to the current buffer.
*/
}
DEFUN ("capitalize", Fcapitalize, 1, 2, 0, /*
}
DEFUN ("capitalize", Fcapitalize, 1, 2, 0, /*
-OBJECT may be a character or string. The result has the same type.
-OBJECT is not altered--the value is a copy.
+STRING-OR-CHAR may be a character or string. The result has the same type.
+STRING-OR-CHAR is not altered--the value is a copy.
Optional second arg BUFFER specifies which buffer's case tables to use,
and defaults to the current buffer.
*/
Optional second arg BUFFER specifies which buffer's case tables to use,
and defaults to the current buffer.
*/
}
/* Like Fcapitalize but change only the initial characters. */
DEFUN ("upcase-initials", Fupcase_initials, 1, 2, 0, /*
}
/* Like Fcapitalize but change only the initial characters. */
DEFUN ("upcase-initials", Fupcase_initials, 1, 2, 0, /*
-OBJECT may be a character or string. The result has the same type.
-OBJECT is not altered--the value is a copy.
+STRING-OR-CHAR may be a character or string. The result has the same type.
+STRING-OR-CHAR is not altered--the value is a copy.
Optional second arg BUFFER specifies which buffer's case tables to use,
and defaults to the current buffer.
*/
Optional second arg BUFFER specifies which buffer's case tables to use,
and defaults to the current buffer.
*/
-casify_region_internal (enum case_action flag, Lisp_Object b, Lisp_Object e,
- struct buffer *buf)
+casify_region_internal (enum case_action flag, Lisp_Object start,
+ Lisp_Object end, struct buffer *buf)
- get_buffer_range_char (buf, b, e, &start, &end, 0);
+ get_buffer_range_char (buf, start, end, &s, &e, 0);
- mccount = begin_multiple_change (buf, start, end);
- record_change (buf, start, end - start);
+ mccount = begin_multiple_change (buf, s, e);
+ record_change (buf, s, e - s);
- buffer_replace_char (buf, i, c, 1, (i == start));
+ buffer_replace_char (buf, pos, c, 1, (pos == s));
-casify_region (enum case_action flag, Lisp_Object b, Lisp_Object e,
+casify_region (enum case_action flag, Lisp_Object start, Lisp_Object end,
- casify_region_internal (flag, b, e, decode_buffer (buffer, 1));
+ casify_region_internal (flag, start, end, decode_buffer (buffer, 1));
- return casify_region (CASE_UP, b, e, buffer);
+ return casify_region (CASE_UP, start, end, buffer);
}
DEFUN ("downcase-region", Fdowncase_region, 2, 3, "r", /*
}
DEFUN ("downcase-region", Fdowncase_region, 2, 3, "r", /*
- return casify_region (CASE_DOWN, b, e, buffer);
+ return casify_region (CASE_DOWN, start, end, buffer);
}
DEFUN ("capitalize-region", Fcapitalize_region, 2, 3, "r", /*
}
DEFUN ("capitalize-region", Fcapitalize_region, 2, 3, "r", /*
- return casify_region (CASE_CAPITALIZE, b, e, buffer);
+ return casify_region (CASE_CAPITALIZE, start, end, buffer);
- return casify_region (CASE_CAPITALIZE_UP, b, e, buffer);
+ return casify_region (CASE_CAPITALIZE_UP, start, end, buffer);
}
DEFUN ("upcase-word", Fupcase_word, 1, 2, "p", /*
}
DEFUN ("upcase-word", Fupcase_word, 1, 2, "p", /*
With negative argument, convert previous words but do not move.
See also `capitalize-word'.
Optional second arg BUFFER defaults to the current buffer.
*/
With negative argument, convert previous words but do not move.
See also `capitalize-word'.
Optional second arg BUFFER defaults to the current buffer.
*/
}
DEFUN ("downcase-word", Fdowncase_word, 1, 2, "p", /*
}
DEFUN ("downcase-word", Fdowncase_word, 1, 2, "p", /*
With negative argument, convert previous words but do not move.
Optional second arg BUFFER defaults to the current buffer.
*/
With negative argument, convert previous words but do not move.
Optional second arg BUFFER defaults to the current buffer.
*/
}
DEFUN ("capitalize-word", Fcapitalize_word, 1, 2, "p", /*
}
DEFUN ("capitalize-word", Fcapitalize_word, 1, 2, "p", /*
This gives the word(s) a first character in upper case
and the rest lower case.
With negative argument, capitalize previous words but do not move.
Optional second arg BUFFER defaults to the current buffer.
*/
This gives the word(s) a first character in upper case
and the rest lower case.
With negative argument, capitalize previous words but do not move.
Optional second arg BUFFER defaults to the current buffer.
*/