aboutsummaryrefslogtreecommitdiffstats
path: root/src/bytecode.c
diff options
context:
space:
mode:
authorPaul Eggert2011-03-06 02:53:51 -0800
committerPaul Eggert2011-03-06 02:53:51 -0800
commit5f349a895b72500a6a33d6610195f7141cf8252f (patch)
treebb1207756d00ad0133f8299ebe95c56ceda97213 /src/bytecode.c
parent1e12733b25bfa52650157c34fc30a9c7fe1d5b4c (diff)
parent7831777b8a9e8d2f68bd17058359ea8849d66f70 (diff)
downloademacs-5f349a895b72500a6a33d6610195f7141cf8252f.tar.gz
emacs-5f349a895b72500a6a33d6610195f7141cf8252f.zip
Merge: current_column: Now returns EMACS_INT, fixing some iftc
that was introduced in the 2002-06-02 change "temporarily"; see <http://lists.gnu.org/archive/html/emacs-devel/2002-06/msg00039.html>. * bytecode.c (Fbyte_code): Don't cast current_column () to int. * cmds.c (internal_self_insert): Likewise. * indent.c (Fcurrent_column): Likewise. * keymap.c (describe_command): Likewise. * minibuf.c (read_minibuf): Likewise. * indent.c (Fcurrent_indentation): Don't cast position_indentation () to int. * xdisp.c (redisplay_internal, redisplay_window, decode_mode_spec): Likewise. * cmds.c (internal_self_insert): Declare locals to be EMACS_INT, not int or double, if they might contain a column number. * indent.c (current_column, Findent_to, indented_beyond_p): (compute_motion, vmotion): Likewise. * keymap.c (describe_command): Likewise. * xdisp.c (pint2str): Likewise. * indent.c (last_known_column): Now EMACS_INT, not int. * minibuf.c (minibuf_prompt_width): Likewise. * indent.c (current_column, current_column_1, position_indentation): Return EMACS_INT, not double. * lisp.h (current_column): Likewise. * indent.c (indented_beyond_p): Last arg is now EMACS_INT, not double. All callers changed. * lisp.h (indented_beyond_p): Likewise. * minibuf.c (minibuf_prompt, minibuf_prompt_width): Move here from xdisp.c, and make static, since these are used only here. * window.h, xdisp.c (minibuf_prompt, minibuf_prompt_width): Remove decls. * xdisp.c (redisplay_window): Reindent to match Emacs style.
Diffstat (limited to 'src/bytecode.c')
-rw-r--r--src/bytecode.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/bytecode.c b/src/bytecode.c
index cf4a1fc225f..bb4e87c019d 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -1323,7 +1323,7 @@ If the third argument is incorrect, Emacs may crash. */)
1323 { 1323 {
1324 Lisp_Object v1; 1324 Lisp_Object v1;
1325 BEFORE_POTENTIAL_GC (); 1325 BEFORE_POTENTIAL_GC ();
1326 XSETFASTINT (v1, (int) current_column ()); /* iftc */ 1326 XSETFASTINT (v1, current_column ());
1327 AFTER_POTENTIAL_GC (); 1327 AFTER_POTENTIAL_GC ();
1328 PUSH (v1); 1328 PUSH (v1);
1329 break; 1329 break;