Mercurial > emacs
comparison src/regex.c @ 16034:d255e64c9e69
(re_match_2_internal) [emacs]: Use PT, not point.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Sun, 01 Sep 1996 19:02:26 +0000 |
parents | 4addc35d079b |
children | c196d1ded35c |
comparison
equal
deleted
inserted
replaced
16033:244188795475 | 16034:d255e64c9e69 |
---|---|
4761 goto fail; | 4761 goto fail; |
4762 | 4762 |
4763 #ifdef emacs | 4763 #ifdef emacs |
4764 case before_dot: | 4764 case before_dot: |
4765 DEBUG_PRINT1 ("EXECUTING before_dot.\n"); | 4765 DEBUG_PRINT1 ("EXECUTING before_dot.\n"); |
4766 if (PTR_CHAR_POS ((unsigned char *) d) >= point) | 4766 if (PTR_CHAR_POS ((unsigned char *) d) >= PT) |
4767 goto fail; | 4767 goto fail; |
4768 break; | 4768 break; |
4769 | 4769 |
4770 case at_dot: | 4770 case at_dot: |
4771 DEBUG_PRINT1 ("EXECUTING at_dot.\n"); | 4771 DEBUG_PRINT1 ("EXECUTING at_dot.\n"); |
4772 if (PTR_CHAR_POS ((unsigned char *) d) != point) | 4772 if (PTR_CHAR_POS ((unsigned char *) d) != PT) |
4773 goto fail; | 4773 goto fail; |
4774 break; | 4774 break; |
4775 | 4775 |
4776 case after_dot: | 4776 case after_dot: |
4777 DEBUG_PRINT1 ("EXECUTING after_dot.\n"); | 4777 DEBUG_PRINT1 ("EXECUTING after_dot.\n"); |
4778 if (PTR_CHAR_POS ((unsigned char *) d) <= point) | 4778 if (PTR_CHAR_POS ((unsigned char *) d) <= PT) |
4779 goto fail; | 4779 goto fail; |
4780 break; | 4780 break; |
4781 | 4781 |
4782 case syntaxspec: | 4782 case syntaxspec: |
4783 DEBUG_PRINT2 ("EXECUTING syntaxspec %d.\n", mcnt); | 4783 DEBUG_PRINT2 ("EXECUTING syntaxspec %d.\n", mcnt); |