diff options
| author | Tom Tromey | 2012-12-17 07:56:22 -0700 |
|---|---|---|
| committer | Tom Tromey | 2012-12-17 07:56:22 -0700 |
| commit | 3d6eced1ae51ffd0a782130e7c334052277e2724 (patch) | |
| tree | 5d1d2ad7cd3374f922886c4a72062511a035c168 /src/syntax.c | |
| parent | bf69f522a9e135f9aa483cedd53e71e915f2bf75 (diff) | |
| parent | 7c3d167f48d6262ee4e5512aa50a07ee96bc1509 (diff) | |
| download | emacs-3d6eced1ae51ffd0a782130e7c334052277e2724.tar.gz emacs-3d6eced1ae51ffd0a782130e7c334052277e2724.zip | |
merge from trunk
Diffstat (limited to 'src/syntax.c')
| -rw-r--r-- | src/syntax.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/syntax.c b/src/syntax.c index f995b8f2cac..d3cafcc472e 100644 --- a/src/syntax.c +++ b/src/syntax.c | |||
| @@ -21,7 +21,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 21 | #include <config.h> | 21 | #include <config.h> |
| 22 | 22 | ||
| 23 | #include <sys/types.h> | 23 | #include <sys/types.h> |
| 24 | #include <setjmp.h> | 24 | |
| 25 | #include "lisp.h" | 25 | #include "lisp.h" |
| 26 | #include "commands.h" | 26 | #include "commands.h" |
| 27 | #include "character.h" | 27 | #include "character.h" |
| @@ -151,7 +151,7 @@ static void scan_sexps_forward (struct lisp_parse_state *, | |||
| 151 | static int in_classes (int, Lisp_Object); | 151 | static int in_classes (int, Lisp_Object); |
| 152 | 152 | ||
| 153 | /* This setter is used only in this file, so it can be private. */ | 153 | /* This setter is used only in this file, so it can be private. */ |
| 154 | static inline void | 154 | static void |
| 155 | bset_syntax_table (struct buffer *b, Lisp_Object val) | 155 | bset_syntax_table (struct buffer *b, Lisp_Object val) |
| 156 | { | 156 | { |
| 157 | b->INTERNAL_FIELD (syntax_table) = val; | 157 | b->INTERNAL_FIELD (syntax_table) = val; |
| @@ -372,7 +372,7 @@ char_quoted (ptrdiff_t charpos, ptrdiff_t bytepos) | |||
| 372 | /* Return the bytepos one character before BYTEPOS. | 372 | /* Return the bytepos one character before BYTEPOS. |
| 373 | We assume that BYTEPOS is not at the start of the buffer. */ | 373 | We assume that BYTEPOS is not at the start of the buffer. */ |
| 374 | 374 | ||
| 375 | static inline ptrdiff_t | 375 | static ptrdiff_t |
| 376 | dec_bytepos (ptrdiff_t bytepos) | 376 | dec_bytepos (ptrdiff_t bytepos) |
| 377 | { | 377 | { |
| 378 | if (NILP (BVAR (current_buffer, enable_multibyte_characters))) | 378 | if (NILP (BVAR (current_buffer, enable_multibyte_characters))) |
| @@ -921,11 +921,11 @@ DEFUN ("matching-paren", Fmatching_paren, Smatching_paren, 1, 1, 0, | |||
| 921 | } | 921 | } |
| 922 | 922 | ||
| 923 | DEFUN ("string-to-syntax", Fstring_to_syntax, Sstring_to_syntax, 1, 1, 0, | 923 | DEFUN ("string-to-syntax", Fstring_to_syntax, Sstring_to_syntax, 1, 1, 0, |
| 924 | doc: /* Convert a syntax specification STRING into syntax cell form. | 924 | doc: /* Convert a syntax descriptor STRING into a raw syntax descriptor. |
| 925 | STRING should be a string as it is allowed as argument of | 925 | STRING should be a string of the form allowed as argument of |
| 926 | `modify-syntax-entry'. Value is the equivalent cons cell | 926 | `modify-syntax-entry'. The return value is a raw syntax descriptor: a |
| 927 | \(CODE . MATCHING-CHAR) that can be used as value of a `syntax-table' | 927 | cons cell \(CODE . MATCHING-CHAR) which can be used, for example, as |
| 928 | text property. */) | 928 | the value of a `syntax-table' text property. */) |
| 929 | (Lisp_Object string) | 929 | (Lisp_Object string) |
| 930 | { | 930 | { |
| 931 | register const unsigned char *p; | 931 | register const unsigned char *p; |