diff src/bytecode.c @ 35711:f17e8743925c

(Fbyte_code) <Bcurrent_column>: Add BEFORE_POTENTIAL_GC and AFTER_POTENTIAL_GC.
author Gerd Moellmann <gerd@gnu.org>
date Mon, 29 Jan 2001 20:44:42 +0000
parents 583cd327d7b5
children 91fee7514fc7
line wrap: on
line diff
--- a/src/bytecode.c	Mon Jan 29 20:36:26 2001 +0000
+++ b/src/bytecode.c	Mon Jan 29 20:44:42 2001 +0000
@@ -1341,7 +1341,9 @@
 	case Bcurrent_column:
 	  {
 	    Lisp_Object v1;
+	    BEFORE_POTENTIAL_GC ();
 	    XSETFASTINT (v1, current_column ());
+	    AFTER_POTENTIAL_GC ();
 	    PUSH (v1);
 	    break;
 	  }