Mercurial > hg > xemacs-beta

diff src/marker.c @ 227:0e522484dd2a r20-5b12
Import from CVS: tag r20-5b12
author: cvs
date: Mon, 13 Aug 2007 10:12:37 +0200
parents: 859a2309aef8
children: 8efd647ea9ca
--- a/src/marker.c	Mon Aug 13 10:11:42 2007 +0200
+++ b/src/marker.c	Mon Aug 13 10:12:37 2007 +0200
@@ -296,7 +296,9 @@
   if (b == 0)
     return;
 
+#ifdef ERROR_CHECK_GC
   assert (BUFFER_LIVE_P (b));
+#endif
 
   if (marker_next (marker))
     marker_prev (marker_next (marker)) = marker_prev (marker);
@@ -305,7 +307,9 @@
   else
     BUF_MARKERS (b) = marker_next (marker);
 
+#ifdef ERROR_CHECK_GC
   assert (marker != XMARKER (b->point_marker));
+#endif
 
   marker->buffer = 0;
 }
@@ -328,8 +332,10 @@
      positions. */
   pos = memind_to_bytind (buf, m->memind);
 
+#ifdef ERROR_CHECK_BUFPOS
   if (pos < BI_BUF_BEG (buf) || pos > BI_BUF_Z (buf))
     abort ();
+#endif
 
   return pos;
 }
@@ -354,8 +360,10 @@
   if (!buf)
     error ("Marker does not point anywhere");
 
+#ifdef ERROR_CHECK_BUFPOS
   if (pos < BI_BUF_BEG (buf) || pos > BI_BUF_Z (buf))
     abort ();
+#endif
 
   m->memind = bytind_to_memind (buf, pos);
 }