aboutsummaryrefslogtreecommitdiffstats
path: root/src/casefiddle.c
diff options
context:
space:
mode:
authorDan Nicolaescu2010-07-04 00:50:25 -0700
committerDan Nicolaescu2010-07-04 00:50:25 -0700
commit971de7fb158335fbda39525feb2d7776a26bc030 (patch)
tree605333d85f16e35bb06baffcb66ac49f4ec0dce9 /src/casefiddle.c
parentb8463cbfbe2c5183cf40772df2746e58b787ddeb (diff)
downloademacs-971de7fb158335fbda39525feb2d7776a26bc030.tar.gz
emacs-971de7fb158335fbda39525feb2d7776a26bc030.zip
Convert (most) functions in src to standard C.
* src/alloc.c: Convert function definitions to standard C. * src/atimer.c: * src/bidi.c: * src/bytecode.c: * src/callint.c: * src/callproc.c: * src/casefiddle.c: * src/casetab.c: * src/category.c: * src/ccl.c: * src/character.c: * src/charset.c: * src/chartab.c: * src/cmds.c: * src/coding.c: * src/composite.c: * src/data.c: * src/dbusbind.c: * src/dired.c: * src/dispnew.c: * src/doc.c: * src/doprnt.c: * src/ecrt0.c: * src/editfns.c: * src/fileio.c: * src/filelock.c: * src/filemode.c: * src/fns.c: * src/font.c: * src/fontset.c: * src/frame.c: * src/fringe.c: * src/ftfont.c: * src/ftxfont.c: * src/gtkutil.c: * src/indent.c: * src/insdel.c: * src/intervals.c: * src/keymap.c: * src/lread.c: * src/macros.c: * src/marker.c: * src/md5.c: * src/menu.c: * src/minibuf.c: * src/prefix-args.c: * src/print.c: * src/ralloc.c: * src/regex.c: * src/region-cache.c: * src/scroll.c: * src/search.c: * src/sound.c: * src/strftime.c: * src/syntax.c: * src/sysdep.c: * src/termcap.c: * src/terminal.c: * src/terminfo.c: * src/textprop.c: * src/tparam.c: * src/undo.c: * src/unexelf.c: * src/window.c: * src/xfaces.c: * src/xfns.c: * src/xfont.c: * src/xftfont.c: * src/xgselect.c: * src/xmenu.c: * src/xrdb.c: * src/xselect.c: * src/xsettings.c: * src/xsmfns.c: * src/xterm.c: Likewise.
Diffstat (limited to 'src/casefiddle.c')
-rw-r--r--src/casefiddle.c16
1 files changed, 5 insertions, 11 deletions
diff --git a/src/casefiddle.c b/src/casefiddle.c
index 30bb457b17d..36715848941 100644
--- a/src/casefiddle.c
+++ b/src/casefiddle.c
@@ -33,9 +33,7 @@ enum case_action {CASE_UP, CASE_DOWN, CASE_CAPITALIZE, CASE_CAPITALIZE_UP};
33Lisp_Object Qidentity; 33Lisp_Object Qidentity;
34 34
35Lisp_Object 35Lisp_Object
36casify_object (flag, obj) 36casify_object (enum case_action flag, Lisp_Object obj)
37 enum case_action flag;
38 Lisp_Object obj;
39{ 37{
40 register int c, c1; 38 register int c, c1;
41 register int inword = flag == CASE_DOWN; 39 register int inword = flag == CASE_DOWN;
@@ -200,9 +198,7 @@ The argument object is not altered--the value is a copy. */)
200 b and e specify range of buffer to operate on. */ 198 b and e specify range of buffer to operate on. */
201 199
202void 200void
203casify_region (flag, b, e) 201casify_region (enum case_action flag, Lisp_Object b, Lisp_Object e)
204 enum case_action flag;
205 Lisp_Object b, e;
206{ 202{
207 register int c; 203 register int c;
208 register int inword = flag == CASE_DOWN; 204 register int inword = flag == CASE_DOWN;
@@ -358,9 +354,7 @@ character positions to operate on. */)
358} 354}
359 355
360static Lisp_Object 356static Lisp_Object
361operate_on_word (arg, newpoint) 357operate_on_word (Lisp_Object arg, EMACS_INT *newpoint)
362 Lisp_Object arg;
363 EMACS_INT *newpoint;
364{ 358{
365 Lisp_Object val; 359 Lisp_Object val;
366 int farend; 360 int farend;
@@ -427,7 +421,7 @@ With negative argument, capitalize previous words but do not move. */)
427} 421}
428 422
429void 423void
430syms_of_casefiddle () 424syms_of_casefiddle (void)
431{ 425{
432 Qidentity = intern_c_string ("identity"); 426 Qidentity = intern_c_string ("identity");
433 staticpro (&Qidentity); 427 staticpro (&Qidentity);
@@ -445,7 +439,7 @@ syms_of_casefiddle ()
445} 439}
446 440
447void 441void
448keys_of_casefiddle () 442keys_of_casefiddle (void)
449{ 443{
450 initial_define_key (control_x_map, Ctl('U'), "upcase-region"); 444 initial_define_key (control_x_map, Ctl('U'), "upcase-region");
451 Fput (intern ("upcase-region"), Qdisabled, Qt); 445 Fput (intern ("upcase-region"), Qdisabled, Qt);