aboutsummaryrefslogtreecommitdiffstats
path: root/src/callint.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/callint.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/callint.c')
-rw-r--r--src/callint.c14
1 files changed, 5 insertions, 9 deletions
diff --git a/src/callint.c b/src/callint.c
index 45e5bd9ed9b..5716a6fdd47 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -140,8 +140,7 @@ usage: (interactive &optional ARGS) */)
140/* Quotify EXP: if EXP is constant, return it. 140/* Quotify EXP: if EXP is constant, return it.
141 If EXP is not constant, return (quote EXP). */ 141 If EXP is not constant, return (quote EXP). */
142Lisp_Object 142Lisp_Object
143quotify_arg (exp) 143quotify_arg (register Lisp_Object exp)
144 register Lisp_Object exp;
145{ 144{
146 if (!INTEGERP (exp) && !STRINGP (exp) 145 if (!INTEGERP (exp) && !STRINGP (exp)
147 && !NILP (exp) && !EQ (exp, Qt)) 146 && !NILP (exp) && !EQ (exp, Qt))
@@ -152,8 +151,7 @@ quotify_arg (exp)
152 151
153/* Modify EXP by quotifying each element (except the first). */ 152/* Modify EXP by quotifying each element (except the first). */
154Lisp_Object 153Lisp_Object
155quotify_args (exp) 154quotify_args (Lisp_Object exp)
156 Lisp_Object exp;
157{ 155{
158 register Lisp_Object tail; 156 register Lisp_Object tail;
159 Lisp_Object next; 157 Lisp_Object next;
@@ -169,8 +167,7 @@ char *callint_argfuns[]
169 = {"", "point", "mark", "region-beginning", "region-end"}; 167 = {"", "point", "mark", "region-beginning", "region-end"};
170 168
171static void 169static void
172check_mark (for_region) 170check_mark (int for_region)
173 int for_region;
174{ 171{
175 Lisp_Object tem; 172 Lisp_Object tem;
176 tem = Fmarker_buffer (current_buffer->mark); 173 tem = Fmarker_buffer (current_buffer->mark);
@@ -191,8 +188,7 @@ check_mark (for_region)
191 of VALUES to do its job. */ 188 of VALUES to do its job. */
192 189
193static void 190static void
194fix_command (input, values) 191fix_command (Lisp_Object input, Lisp_Object values)
195 Lisp_Object input, values;
196{ 192{
197 if (CONSP (input)) 193 if (CONSP (input))
198 { 194 {
@@ -897,7 +893,7 @@ Its numeric meaning is what you would get from `(interactive "p")'. */)
897} 893}
898 894
899void 895void
900syms_of_callint () 896syms_of_callint (void)
901{ 897{
902 point_marker = Fmake_marker (); 898 point_marker = Fmake_marker ();
903 staticpro (&point_marker); 899 staticpro (&point_marker);