Mercurial > hg > xemacs-beta

comparison src/regex.c @ 367:a4f53d9b3154 r21-1-13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-1-13
author cvs
date Mon, 13 Aug 2007 11:01:07 +0200
parents afd57c14dfc8
children cc15677e0335
comparison
equal deleted inserted replaced
366:83d76f480a59 367:a4f53d9b3154
5497 } 5497 }
5498 5498
5499 #ifdef emacs 5499 #ifdef emacs
5500 case before_dot: 5500 case before_dot:
5501 DEBUG_PRINT1 ("EXECUTING before_dot.\n"); 5501 DEBUG_PRINT1 ("EXECUTING before_dot.\n");
5502 if (BUF_PTR_BYTE_POS (regex_emacs_buffer, (unsigned char *) d) >= 5502 if (!regex_emacs_buffer_p
5503 BUF_PT (regex_emacs_buffer)) 5503 || (BUF_PTR_BYTE_POS (regex_emacs_buffer, (unsigned char *) d)
5504 >= BUF_PT (regex_emacs_buffer)))
5504 goto fail; 5505 goto fail;
5505 break; 5506 break;
5506 5507
5507 case at_dot: 5508 case at_dot:
5508 DEBUG_PRINT1 ("EXECUTING at_dot.\n"); 5509 DEBUG_PRINT1 ("EXECUTING at_dot.\n");
5509 if (BUF_PTR_BYTE_POS (regex_emacs_buffer, (unsigned char *) d) 5510 if (!regex_emacs_buffer_p
5510 != BUF_PT (regex_emacs_buffer)) 5511 || (BUF_PTR_BYTE_POS (regex_emacs_buffer, (unsigned char *) d)
5512 != BUF_PT (regex_emacs_buffer)))
5511 goto fail; 5513 goto fail;
5512 break; 5514 break;
5513 5515
5514 case after_dot: 5516 case after_dot:
5515 DEBUG_PRINT1 ("EXECUTING after_dot.\n"); 5517 DEBUG_PRINT1 ("EXECUTING after_dot.\n");
5516 if (BUF_PTR_BYTE_POS (regex_emacs_buffer, (unsigned char *) d) 5518 if (!regex_emacs_buffer_p
5517 <= BUF_PT (regex_emacs_buffer)) 5519 || (BUF_PTR_BYTE_POS (regex_emacs_buffer, (unsigned char *) d)
5520 <= BUF_PT (regex_emacs_buffer)))
5518 goto fail; 5521 goto fail;
5519 break; 5522 break;
5520 #if 0 /* not emacs19 */ 5523 #if 0 /* not emacs19 */
5521 case at_dot: 5524 case at_dot:
5522 DEBUG_PRINT1 ("EXECUTING at_dot.\n"); 5525 DEBUG_PRINT1 ("EXECUTING at_dot.\n");