diff src/search.c @ 16039:855c8d8ba0f0

Change all references from point to PT.
author Karl Heuer <kwzh@gnu.org>
date Sun, 01 Sep 1996 19:15:05 +0000
parents 9531c03134b6
children cc2b553290aa
line wrap: on
line diff
--- a/src/search.c	Sun Sep 01 19:09:14 1996 +0000
+++ b/src/search.c	Sun Sep 01 19:15:05 1996 +0000
@@ -238,7 +238,7 @@
     }
   
   i = re_match_2 (bufp, (char *) p1, s1, (char *) p2, s2,
-		  point - BEGV, &search_regs,
+		  PT - BEGV, &search_regs,
 		  ZV - BEGV);
   if (i == -2)
     matcher_overflow ();
@@ -762,7 +762,7 @@
       fastmap[i] ^= 1;
 
   {
-    int start_point = point;
+    int start_point = PT;
 
     immediate_quit = 1;
     if (syntaxp)
@@ -770,33 +770,33 @@
 
 	if (forwardp)
 	  {
-	    while (point < XINT (lim)
-		   && fastmap[(unsigned char) syntax_code_spec[(int) SYNTAX (FETCH_CHAR (point))]])
-	      SET_PT (point + 1);
+	    while (PT < XINT (lim)
+		   && fastmap[(unsigned char) syntax_code_spec[(int) SYNTAX (FETCH_CHAR (PT))]])
+	      SET_PT (PT + 1);
 	  }
 	else
 	  {
-	    while (point > XINT (lim)
-		   && fastmap[(unsigned char) syntax_code_spec[(int) SYNTAX (FETCH_CHAR (point - 1))]])
-	      SET_PT (point - 1);
+	    while (PT > XINT (lim)
+		   && fastmap[(unsigned char) syntax_code_spec[(int) SYNTAX (FETCH_CHAR (PT - 1))]])
+	      SET_PT (PT - 1);
 	  }
       }
     else
       {
 	if (forwardp)
 	  {
-	    while (point < XINT (lim) && fastmap[FETCH_CHAR (point)])
-	      SET_PT (point + 1);
+	    while (PT < XINT (lim) && fastmap[FETCH_CHAR (PT)])
+	      SET_PT (PT + 1);
 	  }
 	else
 	  {
-	    while (point > XINT (lim) && fastmap[FETCH_CHAR (point - 1)])
-	      SET_PT (point - 1);
+	    while (PT > XINT (lim) && fastmap[FETCH_CHAR (PT - 1)])
+	      SET_PT (PT - 1);
 	  }
       }
     immediate_quit = 0;
 
-    return make_number (point - start_point);
+    return make_number (PT - start_point);
   }
 }
 
@@ -826,7 +826,7 @@
     {
       CHECK_NUMBER_COERCE_MARKER (bound, 1);
       lim = XINT (bound);
-      if (n > 0 ? lim < point : lim > point)
+      if (n > 0 ? lim < PT : lim > PT)
 	error ("Invalid search bound (wrong side of point)");
       if (lim > ZV)
 	lim = ZV;
@@ -834,7 +834,7 @@
 	lim = BEGV;
     }
 
-  np = search_buffer (string, point, lim, n, RE,
+  np = search_buffer (string, PT, lim, n, RE,
 		      (!NILP (current_buffer->case_fold_search)
 		       ? XCHAR_TABLE (current_buffer->case_canon_table)->contents
 		       : 0),
@@ -1745,7 +1745,7 @@
 
       for (pos = 0; pos < XSTRING (newtext)->size; pos++)
 	{
-	  int offset = point - search_regs.start[sub];
+	  int offset = PT - search_regs.start[sub];
 
 	  c = XSTRING (newtext)->data[pos];
 	  if (c == '\\')
@@ -1773,13 +1773,13 @@
       UNGCPRO;
     }
 
-  inslen = point - (search_regs.start[sub]);
+  inslen = PT - (search_regs.start[sub]);
   del_range (search_regs.start[sub] + inslen, search_regs.end[sub] + inslen);
 
   if (case_action == all_caps)
-    Fupcase_region (make_number (point - inslen), make_number (point));
+    Fupcase_region (make_number (PT - inslen), make_number (PT));
   else if (case_action == cap_initial)
-    Fupcase_initials_region (make_number (point - inslen), make_number (point));
+    Fupcase_initials_region (make_number (PT - inslen), make_number (PT));
   return Qnil;
 }