summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2001-01-29 20:44:42 +0000
committerGerd Moellmann <gerd@gnu.org>2001-01-29 20:44:42 +0000
commit96111f48133b927c0ab43e8931370cc53e56c29c (patch)
tree99b31ff4d85c8e81b748b5dd50733586014c2e9d
parent3a768251332e3388b319c2092f5b28de7907e07e (diff)
downloademacs-96111f48133b927c0ab43e8931370cc53e56c29c.tar.gz
emacs-96111f48133b927c0ab43e8931370cc53e56c29c.tar.bz2
emacs-96111f48133b927c0ab43e8931370cc53e56c29c.zip
(Fbyte_code) <Bcurrent_column>: Add
BEFORE_POTENTIAL_GC and AFTER_POTENTIAL_GC.
-rw-r--r--src/bytecode.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/bytecode.c b/src/bytecode.c
index 4fc722e61cc..7cd38a0fe2e 100644
--- a/src/bytecode.c
+++ b/src/bytecode.c
@@ -1341,7 +1341,9 @@ If the third argument is incorrect, Emacs may crash.")
case Bcurrent_column:
{
Lisp_Object v1;
+ BEFORE_POTENTIAL_GC ();
XSETFASTINT (v1, current_column ());
+ AFTER_POTENTIAL_GC ();
PUSH (v1);
break;
}