diff options
| author | Basil L. Contovounesios | 2021-08-21 22:55:58 +0100 |
|---|---|---|
| committer | Basil L. Contovounesios | 2021-08-22 23:52:23 +0100 |
| commit | ff2124d2979ee9ba5b8e22147fa8ccaa00e2cc4f (patch) | |
| tree | 6cbd1e5f05831d8404a89cda04cb86fa7ec54b2c /src/syntax.c | |
| parent | 6c007668b38f06824004da466e97a96533f6344b (diff) | |
| download | emacs-ff2124d2979ee9ba5b8e22147fa8ccaa00e2cc4f.tar.gz emacs-ff2124d2979ee9ba5b8e22147fa8ccaa00e2cc4f.zip | |
Fix recent parse-partial-sexp argument validation
* src/syntax.c (parse-partial-sexp): Also handle markers as
arguments (bug#49944). Tweak error message to follow conventions in
"(elisp) Signaling Errors".
Diffstat (limited to 'src/syntax.c')
| -rw-r--r-- | src/syntax.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/syntax.c b/src/syntax.c index adc0da730ea..057a4c3b1f5 100644 --- a/src/syntax.c +++ b/src/syntax.c | |||
| @@ -3595,8 +3595,8 @@ Sixth arg COMMENTSTOP non-nil means stop after the start of a comment. | |||
| 3595 | else | 3595 | else |
| 3596 | target = TYPE_MINIMUM (EMACS_INT); /* We won't reach this depth. */ | 3596 | target = TYPE_MINIMUM (EMACS_INT); /* We won't reach this depth. */ |
| 3597 | 3597 | ||
| 3598 | if (XFIXNUM (to) < XFIXNUM (from)) | 3598 | if (fix_position (to) < fix_position (from)) |
| 3599 | error ("End position should be larger than start position."); | 3599 | error ("End position is smaller than start position"); |
| 3600 | 3600 | ||
| 3601 | validate_region (&from, &to); | 3601 | validate_region (&from, &to); |
| 3602 | internalize_parse_state (oldstate, &state); | 3602 | internalize_parse_state (oldstate, &state); |