vim: src/regexp_bt.c annotate

annotate src/regexp_bt.c @ 29247:5f314b2ed494 v8.2.5142

patch 8.2.5142: startup test fails if there is a status bar Commit: https://github.com/vim/vim/commit/fa04eae5a5b9394079bde2d37ce6f9f8a5567d48 Author: Bram Moolenaar <Bram@vim.org> Date: Tue Jun 21 14:38:40 2022 +0100 patch 8.2.5142: startup test fails if there is a status bar Problem: Startup test fails if there is a status bar at the top of the screen. (Ernie Rael) Solution: Use a larger vertical offset in the test.

author	Bram Moolenaar <Bram@vim.org>
date	Tue, 21 Jun 2022 18:45:07 +0200
parents	c7aa0c46acd5
children	057c26b5c33a

rev	line source
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3 * Backtracking regular expression implementation.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5 * This file is included in "regexp.c".
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	7 * NOTICE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	8 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	9 * This is NOT the original regular expression code as written by Henry
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	10 * Spencer. This code has been modified specifically for use with the VIM
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	11 * editor, and should not be used separately from Vim. If you want a good
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	12 * regular expression library, get the original code. The copyright notice
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	13 * that follows is from the original.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	14 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	15 * END NOTICE
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	16 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	17 * Copyright (c) 1986 by University of Toronto.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	18 * Written by Henry Spencer. Not derived from licensed software.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	19 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	20 * Permission is granted to anyone to use this software for any
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	21 * purpose on any computer system, and to redistribute it freely,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	22 * subject to the following restrictions:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	23 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	24 * 1. The author is not responsible for the consequences of use of
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	25 * this software, no matter how awful, even if they arise
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	26 * from defects in it.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	27 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	28 * 2. The origin of this software must not be misrepresented, either
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	29 * by explicit claim or by omission.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	30 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	31 * 3. Altered versions must be plainly marked as such, and must not
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	32 * be misrepresented as being the original software.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	33 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	34 * Beware that some of this code is subtly aware of the way operator
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	35 * precedence is structured in regular expressions. Serious changes in
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	36 * regular-expression syntax might require a total rethink.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	37 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	38 * Changes have been made by Tony Andrews, Olaf 'Rhialto' Seibert, Robert
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	39 * Webb, Ciaran McCreesh and Bram Moolenaar.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	40 * Named character class support added by Walter Briscoe (1998 Jul 01)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	41 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	42
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	43 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	44 * The "internal use only" fields in regexp.h are present to pass info from
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	45 * compile to execute that permits the execute phase to run lots faster on
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	46 * simple cases. They are:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	47 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	48 * regstart char that must begin a match; NUL if none obvious; Can be a
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	49 * multi-byte character.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	50 * reganch is the match anchored (at beginning-of-line only)?
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	51 * regmust string (pointer into program) that match must include, or NULL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	52 * regmlen length of regmust string
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	53 * regflags RF_ values or'ed together
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	54 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	55 * Regstart and reganch permit very fast decisions on suitable starting points
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	56 * for a match, cutting down the work a lot. Regmust permits fast rejection
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	57 * of lines that cannot possibly match. The regmust tests are costly enough
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	58 * that vim_regcomp() supplies a regmust only if the r.e. contains something
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	59 * potentially expensive (at present, the only such thing detected is * or +
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	60 * at the start of the r.e., which can involve a lot of backup). Regmlen is
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	61 * supplied because the test in vim_regexec() needs it and vim_regcomp() is
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	62 * computing it anyway.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	63 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	64
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	65 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	66 * Structure for regexp "program". This is essentially a linear encoding
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	67 * of a nondeterministic finite-state machine (aka syntax charts or
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	68 * "railroad normal form" in parsing technology). Each node is an opcode
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	69 * plus a "next" pointer, possibly plus an operand. "Next" pointers of
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	70 * all nodes except BRANCH and BRACES_COMPLEX implement concatenation; a "next"
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	71 * pointer with a BRANCH on both ends of it is connecting two alternatives.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	72 * (Here we have one of the subtle syntax dependencies: an individual BRANCH
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	73 * (as opposed to a collection of them) is never concatenated with anything
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	74 * because of operator precedence). The "next" pointer of a BRACES_COMPLEX
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	75 * node points to the node after the stuff to be repeated.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	76 * The operand of some types of node is a literal string; for others, it is a
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	77 * node leading into a sub-FSM. In particular, the operand of a BRANCH node
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	78 * is the first node of the branch.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	79 * (NB this is not a tree structure: the tail of the branch connects to the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	80 * thing following the set of BRANCHes.)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	81 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	82 * pattern is coded like:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	83 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	84 * +-----------------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	85 * \| V
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	86 * <aa>\\|<bb> BRANCH <aa> BRANCH <bb> --> END
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	87 * \| ^ \| ^
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	88 * +------+ +----------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	89 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	90 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	91 * +------------------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	92 * V \|
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	93 * <aa>* BRANCH BRANCH <aa> --> BACK BRANCH --> NOTHING --> END
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	94 * \| \| ^ ^
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	95 * \| +---------------+ \|
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	96 * +---------------------------------------------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	97 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	98 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	99 * +----------------------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	100 * V \|
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	101 * <aa>\+ BRANCH <aa> --> BRANCH --> BACK BRANCH --> NOTHING --> END
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	102 * \| \| ^ ^
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	103 * \| +-----------+ \|
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	104 * +--------------------------------------------------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	105 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	106 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	107 * +-------------------------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	108 * V \|
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	109 * <aa>\{} BRANCH BRACE_LIMITS --> BRACE_COMPLEX <aa> --> BACK END
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	110 * \| \| ^
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	111 * \| +----------------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	112 * +-----------------------------------------------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	113 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	114 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	115 * <aa>\@!<bb> BRANCH NOMATCH <aa> --> END <bb> --> END
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	116 * \| \| ^ ^
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	117 * \| +----------------+ \|
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	118 * +--------------------------------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	119 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	120 * +---------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	121 * \| V
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	122 * \z[abc] BRANCH BRANCH a BRANCH b BRANCH c BRANCH NOTHING --> END
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	123 * \| \| \| \| ^ ^
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	124 * \| \| \| +-----+ \|
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	125 * \| \| +----------------+ \|
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	126 * \| +---------------------------+ \|
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	127 * +------------------------------------------------------+
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	128 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	129 * They all start with a BRANCH for "\\|" alternatives, even when there is only
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	130 * one alternative.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	131 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	132
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	133 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	134 * The opcodes are:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	135 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	136
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	137 // definition number opnd? meaning
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	138 #define END 0 // End of program or NOMATCH operand.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	139 #define BOL 1 // Match "" at beginning of line.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	140 #define EOL 2 // Match "" at end of line.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	141 #define BRANCH 3 // node Match this alternative, or the
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	142 // next...
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	143 #define BACK 4 // Match "", "next" ptr points backward.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	144 #define EXACTLY 5 // str Match this string.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	145 #define NOTHING 6 // Match empty string.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	146 #define STAR 7 // node Match this (simple) thing 0 or more
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	147 // times.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	148 #define PLUS 8 // node Match this (simple) thing 1 or more
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	149 // times.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	150 #define MATCH 9 // node match the operand zero-width
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	151 #define NOMATCH 10 // node check for no match with operand
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	152 #define BEHIND 11 // node look behind for a match with operand
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	153 #define NOBEHIND 12 // node look behind for no match with operand
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	154 #define SUBPAT 13 // node match the operand here
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	155 #define BRACE_SIMPLE 14 // node Match this (simple) thing between m and
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	156 // n times (\{m,n\}).
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	157 #define BOW 15 // Match "" after [^a-zA-Z0-9_]
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	158 #define EOW 16 // Match "" at [^a-zA-Z0-9_]
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	159 #define BRACE_LIMITS 17 // nr nr define the min & max for BRACE_SIMPLE
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	160 // and BRACE_COMPLEX.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	161 #define NEWL 18 // Match line-break
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	162 #define BHPOS 19 // End position for BEHIND or NOBEHIND
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	163
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	164
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	165 // character classes: 20-48 normal, 50-78 include a line-break
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	166 #define ADD_NL 30
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	167 #define FIRST_NL ANY + ADD_NL
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	168 #define ANY 20 // Match any one character.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	169 #define ANYOF 21 // str Match any character in this string.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	170 #define ANYBUT 22 // str Match any character not in this
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	171 // string.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	172 #define IDENT 23 // Match identifier char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	173 #define SIDENT 24 // Match identifier char but no digit
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	174 #define KWORD 25 // Match keyword char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	175 #define SKWORD 26 // Match word char but no digit
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	176 #define FNAME 27 // Match file name char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	177 #define SFNAME 28 // Match file name char but no digit
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	178 #define PRINT 29 // Match printable char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	179 #define SPRINT 30 // Match printable char but no digit
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	180 #define WHITE 31 // Match whitespace char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	181 #define NWHITE 32 // Match non-whitespace char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	182 #define DIGIT 33 // Match digit char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	183 #define NDIGIT 34 // Match non-digit char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	184 #define HEX 35 // Match hex char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	185 #define NHEX 36 // Match non-hex char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	186 #define OCTAL 37 // Match octal char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	187 #define NOCTAL 38 // Match non-octal char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	188 #define WORD 39 // Match word char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	189 #define NWORD 40 // Match non-word char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	190 #define HEAD 41 // Match head char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	191 #define NHEAD 42 // Match non-head char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	192 #define ALPHA 43 // Match alpha char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	193 #define NALPHA 44 // Match non-alpha char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	194 #define LOWER 45 // Match lowercase char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	195 #define NLOWER 46 // Match non-lowercase char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	196 #define UPPER 47 // Match uppercase char
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	197 #define NUPPER 48 // Match non-uppercase char
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	198 #define LAST_NL NUPPER + ADD_NL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	199 #define WITH_NL(op) ((op) >= FIRST_NL && (op) <= LAST_NL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	200
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	201 #define MOPEN 80 // -89 Mark this point in input as start of
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	202 // \( subexpr. MOPEN + 0 marks start of
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	203 // match.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	204 #define MCLOSE 90 // -99 Analogous to MOPEN. MCLOSE + 0 marks
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	205 // end of match.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	206 #define BACKREF 100 // -109 node Match same string again \1-\9
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	207
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	208 #ifdef FEAT_SYN_HL
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	209 # define ZOPEN 110 // -119 Mark this point in input as start of
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	210 // \z( subexpr.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	211 # define ZCLOSE 120 // -129 Analogous to ZOPEN.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	212 # define ZREF 130 // -139 node Match external submatch \z1-\z9
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	213 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	214
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	215 #define BRACE_COMPLEX 140 // -149 node Match nodes between m & n times
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	216
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	217 #define NOPEN 150 // Mark this point in input as start of
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	218 // \%( subexpr.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	219 #define NCLOSE 151 // Analogous to NOPEN.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	220
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	221 #define MULTIBYTECODE 200 // mbc Match one multi-byte character
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	222 #define RE_BOF 201 // Match "" at beginning of file.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	223 #define RE_EOF 202 // Match "" at end of file.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	224 #define CURSOR 203 // Match location of cursor.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	225
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	226 #define RE_LNUM 204 // nr cmp Match line number
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	227 #define RE_COL 205 // nr cmp Match column number
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	228 #define RE_VCOL 206 // nr cmp Match virtual column number
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	229
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	230 #define RE_MARK 207 // mark cmp Match mark position
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	231 #define RE_VISUAL 208 // Match Visual area
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	232 #define RE_COMPOSING 209 // any composing characters
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	233
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	234 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	235 * Flags to be passed up and down.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	236 */
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	237 #define HASWIDTH 0x1 // Known never to match null string.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	238 #define SIMPLE 0x2 // Simple enough to be STAR/PLUS operand.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	239 #define SPSTART 0x4 // Starts with * or +.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	240 #define HASNL 0x8 // Contains some \n.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	241 #define HASLOOKBH 0x10 // Contains "\@<=" or "\@<!".
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	242 #define WORST 0 // Worst case.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	243
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	244 static int num_complex_braces; // Complex \{...} count
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	245 static char_u *regcode; // Code-emit pointer, or JUST_CALC_SIZE
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	246 static long regsize; // Code size.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	247 static int reg_toolong; // TRUE when offset out of range
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	248 static char_u had_endbrace[NSUBEXP]; // flags, TRUE if end of () found
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	249 static long brace_min[10]; // Minimums for complex brace repeats
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	250 static long brace_max[10]; // Maximums for complex brace repeats
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	251 static int brace_count[10]; // Current counts for complex brace repeats
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	252 static int one_exactly = FALSE; // only do one char for EXACTLY
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	253
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	254 // When making changes to classchars also change nfa_classcodes.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	255 static char_u classchars = (char_u )".iIkKfFpPsSdDxXoOwWhHaAlLuU";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	256 static int classcodes[] = {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	257 ANY, IDENT, SIDENT, KWORD, SKWORD,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	258 FNAME, SFNAME, PRINT, SPRINT,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	259 WHITE, NWHITE, DIGIT, NDIGIT,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	260 HEX, NHEX, OCTAL, NOCTAL,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	261 WORD, NWORD, HEAD, NHEAD,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	262 ALPHA, NALPHA, LOWER, NLOWER,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	263 UPPER, NUPPER
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	264 };
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	265
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	266 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	267 * When regcode is set to this value, code is not emitted and size is computed
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	268 * instead.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	269 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	270 #define JUST_CALC_SIZE ((char_u *) -1)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	271
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	272 // Values for rs_state in regitem_T.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	273 typedef enum regstate_E
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	274 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	275 RS_NOPEN = 0 // NOPEN and NCLOSE
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	276 , RS_MOPEN // MOPEN + [0-9]
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	277 , RS_MCLOSE // MCLOSE + [0-9]
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	278 #ifdef FEAT_SYN_HL
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	279 , RS_ZOPEN // ZOPEN + [0-9]
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	280 , RS_ZCLOSE // ZCLOSE + [0-9]
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	281 #endif
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	282 , RS_BRANCH // BRANCH
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	283 , RS_BRCPLX_MORE // BRACE_COMPLEX and trying one more match
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	284 , RS_BRCPLX_LONG // BRACE_COMPLEX and trying longest match
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	285 , RS_BRCPLX_SHORT // BRACE_COMPLEX and trying shortest match
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	286 , RS_NOMATCH // NOMATCH
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	287 , RS_BEHIND1 // BEHIND / NOBEHIND matching rest
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	288 , RS_BEHIND2 // BEHIND / NOBEHIND matching behind part
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	289 , RS_STAR_LONG // STAR/PLUS/BRACE_SIMPLE longest match
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	290 , RS_STAR_SHORT // STAR/PLUS/BRACE_SIMPLE shortest match
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	291 } regstate_T;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	292
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	293 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	294 * Structure used to save the current input state, when it needs to be
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	295 * restored after trying a match. Used by reg_save() and reg_restore().
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	296 * Also stores the length of "backpos".
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	297 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	298 typedef struct
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	299 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	300 union
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	301 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	302 char_u *ptr; // rex.input pointer, for single-line regexp
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	303 lpos_T pos; // rex.input pos, for multi-line regexp
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	304 } rs_u;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	305 int rs_len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	306 } regsave_T;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	307
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	308 // struct to save start/end pointer/position in for
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	309 typedef struct
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	310 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	311 union
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	312 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	313 char_u *ptr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	314 lpos_T pos;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	315 } se_u;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	316 } save_se_T;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	317
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	318 // used for BEHIND and NOBEHIND matching
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	319 typedef struct regbehind_S
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	320 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	321 regsave_T save_after;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	322 regsave_T save_behind;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	323 int save_need_clear_subexpr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	324 save_se_T save_start[NSUBEXP];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	325 save_se_T save_end[NSUBEXP];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	326 } regbehind_T;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	327
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	328 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	329 * When there are alternatives a regstate_T is put on the regstack to remember
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	330 * what we are doing.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	331 * Before it may be another type of item, depending on rs_state, to remember
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	332 * more things.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	333 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	334 typedef struct regitem_S
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	335 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	336 regstate_T rs_state; // what we are doing, one of RS_ above
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	337 short rs_no; // submatch nr or BEHIND/NOBEHIND
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	338 char_u *rs_scan; // current node in program
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	339 union
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	340 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	341 save_se_T sesave;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	342 regsave_T regsave;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	343 } rs_un; // room for saving rex.input
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	344 } regitem_T;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	345
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	346
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	347 // used for STAR, PLUS and BRACE_SIMPLE matching
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	348 typedef struct regstar_S
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	349 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	350 int nextb; // next byte
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	351 int nextb_ic; // next byte reverse case
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	352 long count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	353 long minval;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	354 long maxval;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	355 } regstar_T;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	356
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	357 // used to store input position when a BACK was encountered, so that we now if
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	358 // we made any progress since the last time.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	359 typedef struct backpos_S
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	360 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	361 char_u *bp_scan; // "scan" where BACK was encountered
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	362 regsave_T bp_pos; // last input position
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	363 } backpos_T;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	364
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	365 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	366 * "regstack" and "backpos" are used by regmatch(). They are kept over calls
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	367 * to avoid invoking malloc() and free() often.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	368 * "regstack" is a stack with regitem_T items, sometimes preceded by regstar_T
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	369 * or regbehind_T.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	370 * "backpos_T" is a table with backpos_T for BACK
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	371 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	372 static garray_T regstack = {0, 0, 0, 0, NULL};
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	373 static garray_T backpos = {0, 0, 0, 0, NULL};
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	374
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	375 static regsave_T behind_pos;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	376
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	377 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	378 * Both for regstack and backpos tables we use the following strategy of
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	379 * allocation (to reduce malloc/free calls):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	380 * - Initial size is fairly small.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	381 * - When needed, the tables are grown bigger (8 times at first, double after
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	382 * that).
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	383 * - After executing the match we free the memory only if the array has grown.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	384 * Thus the memory is kept allocated when it's at the initial size.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	385 * This makes it fast while not keeping a lot of memory allocated.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	386 * A three times speed increase was observed when using many simple patterns.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	387 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	388 #define REGSTACK_INITIAL 2048
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	389 #define BACKPOS_INITIAL 64
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	390
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	391 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	392 * Opcode notes:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	393 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	394 * BRANCH The set of branches constituting a single choice are hooked
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	395 * together with their "next" pointers, since precedence prevents
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	396 * anything being concatenated to any individual branch. The
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	397 * "next" pointer of the last BRANCH in a choice points to the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	398 * thing following the whole choice. This is also where the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	399 * final "next" pointer of each individual branch points; each
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	400 * branch starts with the operand node of a BRANCH node.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	401 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	402 * BACK Normal "next" pointers all implicitly point forward; BACK
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	403 * exists to make loop structures possible.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	404 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	405 * STAR,PLUS '=', and complex '*' and '+', are implemented as circular
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	406 * BRANCH structures using BACK. Simple cases (one character
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	407 * per match) are implemented with STAR and PLUS for speed
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	408 * and to minimize recursive plunges.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	409 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	410 * BRACE_LIMITS This is always followed by a BRACE_SIMPLE or BRACE_COMPLEX
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	411 * node, and defines the min and max limits to be used for that
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	412 * node.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	413 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	414 * MOPEN,MCLOSE ...are numbered at compile time.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	415 * ZOPEN,ZCLOSE ...ditto
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	416 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	417
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	418 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	419 * A node is one char of opcode followed by two chars of "next" pointer.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	420 * "Next" pointers are stored as two 8-bit bytes, high order first. The
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	421 * value is a positive offset from the opcode of the node containing it.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	422 * An operand, if any, simply follows the node. (Note that much of the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	423 * code generation knows about this implicit relationship.)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	424 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	425 * Using two bytes for the "next" pointer is vast overkill for most things,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	426 * but allows patterns to get big without disasters.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	427 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	428 #define OP(p) ((int)*(p))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	429 #define NEXT(p) (((((p) + 1) & 0377) << 8) + (((p) + 2) & 0377))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	430 #define OPERAND(p) ((p) + 3)
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	431 // Obtain an operand that was stored as four bytes, MSB first.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	432 #define OPERAND_MIN(p) (((long)(p)[3] << 24) + ((long)(p)[4] << 16) \
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	433 + ((long)(p)[5] << 8) + (long)(p)[6])
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	434 // Obtain a second operand stored as four bytes.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	435 #define OPERAND_MAX(p) OPERAND_MIN((p) + 4)
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	436 // Obtain a second single-byte operand stored after a four bytes operand.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	437 #define OPERAND_CMP(p) (p)[7]
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	438
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	439 static char_u reg(int paren, int flagp);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	440
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	441 #ifdef BT_REGEXP_DUMP
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	442 static void regdump(char_u , bt_regprog_T );
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	443 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	444
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	445 static int re_num_cmp(long_u val, char_u *scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	446
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	447 #ifdef DEBUG
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	448 static char_u regprop(char_u );
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	449
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	450 static int regnarrate = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	451 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	452
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	453
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	454 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	455 * Setup to parse the regexp. Used once to get the length and once to do it.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	456 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	457 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	458 regcomp_start(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	459 char_u *expr,
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	460 int re_flags) // see vim_regcomp()
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	461 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	462 initchr(expr);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	463 if (re_flags & RE_MAGIC)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	464 reg_magic = MAGIC_ON;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	465 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	466 reg_magic = MAGIC_OFF;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	467 reg_string = (re_flags & RE_STRING);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	468 reg_strict = (re_flags & RE_STRICT);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	469 get_cpo_flags();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	470
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	471 num_complex_braces = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	472 regnpar = 1;
20007 aadd1cae2ff5 patch 8.2.0559: clearing a struct is verbose Bram Moolenaar <Bram@vim.org> parents: 19405 diff changeset	473 CLEAR_FIELD(had_endbrace);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	474 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	475 regnzpar = 1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	476 re_has_z = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	477 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	478 regsize = 0L;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	479 reg_toolong = FALSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	480 regflags = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	481 #if defined(FEAT_SYN_HL) \|\| defined(PROTO)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	482 had_eol = FALSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	483 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	484 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	485
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	486 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	487 * Return TRUE if MULTIBYTECODE should be used instead of EXACTLY for
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	488 * character "c".
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	489 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	490 static int
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	491 use_multibytecode(int c)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	492 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	493 return has_mbyte && (*mb_char2len)(c) > 1
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	494 && (re_multi_type(peekchr()) != NOT_MULTI
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	495 \|\| (enc_utf8 && utf_iscomposing(c)));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	496 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	497
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	498 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	499 * Emit (if appropriate) a byte of code
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	500 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	501 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	502 regc(int b)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	503 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	504 if (regcode == JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	505 regsize++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	506 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	507 *regcode++ = b;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	508 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	509
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	510 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	511 * Emit (if appropriate) a multi-byte character of code
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	512 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	513 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	514 regmbc(int c)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	515 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	516 if (!has_mbyte && c > 0xff)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	517 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	518 if (regcode == JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	519 regsize += (*mb_char2len)(c);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	520 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	521 regcode += (*mb_char2bytes)(c, regcode);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	522 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	523
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	524
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	525 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	526 * Produce the bytes for equivalence class "c".
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	527 * Currently only handles latin1, latin9 and utf-8.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	528 * NOTE: When changing this function, also change nfa_emit_equi_class()
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	529 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	530 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	531 reg_equi_class(int c)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	532 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	533 if (enc_utf8 \|\| STRCMP(p_enc, "latin1") == 0
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	534 \|\| STRCMP(p_enc, "iso-8859-15") == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	535 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	536 switch (c)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	537 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	538 // Do not use '\300' style, it results in a negative number.
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	539 case 'A': case 0xc0: case 0xc1: case 0xc2: case 0xc3: case 0xc4:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	540 case 0xc5: case 0x100: case 0x102: case 0x104: case 0x1cd:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	541 case 0x1de: case 0x1e0: case 0x1fa: case 0x202: case 0x226:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	542 case 0x23a: case 0x1e00: case 0x1ea0: case 0x1ea2: case 0x1ea4:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	543 case 0x1ea6: case 0x1ea8: case 0x1eaa: case 0x1eac: case 0x1eae:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	544 case 0x1eb0: case 0x1eb2: case 0x1eb4: case 0x1eb6:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	545 regmbc('A'); regmbc(0xc0); regmbc(0xc1); regmbc(0xc2);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	546 regmbc(0xc3); regmbc(0xc4); regmbc(0xc5);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	547 regmbc(0x100); regmbc(0x102); regmbc(0x104);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	548 regmbc(0x1cd); regmbc(0x1de); regmbc(0x1e0);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	549 regmbc(0x1fa); regmbc(0x202); regmbc(0x226);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	550 regmbc(0x23a); regmbc(0x1e00); regmbc(0x1ea0);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	551 regmbc(0x1ea2); regmbc(0x1ea4); regmbc(0x1ea6);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	552 regmbc(0x1ea8); regmbc(0x1eaa); regmbc(0x1eac);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	553 regmbc(0x1eae); regmbc(0x1eb0); regmbc(0x1eb2);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	554 regmbc(0x1eb4); regmbc(0x1eb6);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	555 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	556 case 'B': case 0x181: case 0x243: case 0x1e02:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	557 case 0x1e04: case 0x1e06:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	558 regmbc('B');
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	559 regmbc(0x181); regmbc(0x243); regmbc(0x1e02);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	560 regmbc(0x1e04); regmbc(0x1e06);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	561 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	562 case 'C': case 0xc7:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	563 case 0x106: case 0x108: case 0x10a: case 0x10c: case 0x187:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	564 case 0x23b: case 0x1e08: case 0xa792:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	565 regmbc('C'); regmbc(0xc7);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	566 regmbc(0x106); regmbc(0x108); regmbc(0x10a);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	567 regmbc(0x10c); regmbc(0x187); regmbc(0x23b);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	568 regmbc(0x1e08); regmbc(0xa792);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	569 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	570 case 'D': case 0x10e: case 0x110: case 0x18a:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	571 case 0x1e0a: case 0x1e0c: case 0x1e0e: case 0x1e10:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	572 case 0x1e12:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	573 regmbc('D'); regmbc(0x10e); regmbc(0x110);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	574 regmbc(0x18a); regmbc(0x1e0a); regmbc(0x1e0c);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	575 regmbc(0x1e0e); regmbc(0x1e10); regmbc(0x1e12);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	576 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	577 case 'E': case 0xc8: case 0xc9: case 0xca: case 0xcb:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	578 case 0x112: case 0x114: case 0x116: case 0x118: case 0x11a:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	579 case 0x204: case 0x206: case 0x228: case 0x246: case 0x1e14:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	580 case 0x1e16: case 0x1e18: case 0x1e1a: case 0x1e1c:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	581 case 0x1eb8: case 0x1eba: case 0x1ebc: case 0x1ebe:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	582 case 0x1ec0: case 0x1ec2: case 0x1ec4: case 0x1ec6:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	583 regmbc('E'); regmbc(0xc8); regmbc(0xc9);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	584 regmbc(0xca); regmbc(0xcb); regmbc(0x112);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	585 regmbc(0x114); regmbc(0x116); regmbc(0x118);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	586 regmbc(0x11a); regmbc(0x204); regmbc(0x206);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	587 regmbc(0x228); regmbc(0x246); regmbc(0x1e14);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	588 regmbc(0x1e16); regmbc(0x1e18); regmbc(0x1e1a);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	589 regmbc(0x1e1c); regmbc(0x1eb8); regmbc(0x1eba);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	590 regmbc(0x1ebc); regmbc(0x1ebe); regmbc(0x1ec0);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	591 regmbc(0x1ec2); regmbc(0x1ec4); regmbc(0x1ec6);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	592 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	593 case 'F': case 0x191: case 0x1e1e: case 0xa798:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	594 regmbc('F'); regmbc(0x191); regmbc(0x1e1e);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	595 regmbc(0xa798);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	596 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	597 case 'G': case 0x11c: case 0x11e: case 0x120:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	598 case 0x122: case 0x193: case 0x1e4: case 0x1e6:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	599 case 0x1f4: case 0x1e20: case 0xa7a0:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	600 regmbc('G'); regmbc(0x11c); regmbc(0x11e);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	601 regmbc(0x120); regmbc(0x122); regmbc(0x193);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	602 regmbc(0x1e4); regmbc(0x1e6); regmbc(0x1f4);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	603 regmbc(0x1e20); regmbc(0xa7a0);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	604 return;
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	605 case 'H': case 0x124: case 0x126: case 0x21e:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	606 case 0x1e22: case 0x1e24: case 0x1e26:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	607 case 0x1e28: case 0x1e2a: case 0x2c67:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	608 regmbc('H'); regmbc(0x124); regmbc(0x126);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	609 regmbc(0x21e); regmbc(0x1e22); regmbc(0x1e24);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	610 regmbc(0x1e26); regmbc(0x1e28); regmbc(0x1e2a);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	611 regmbc(0x2c67);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	612 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	613 case 'I': case 0xcc: case 0xcd: case 0xce: case 0xcf:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	614 case 0x128: case 0x12a: case 0x12c: case 0x12e:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	615 case 0x130: case 0x197: case 0x1cf: case 0x208:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	616 case 0x20a: case 0x1e2c: case 0x1e2e: case 0x1ec8:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	617 case 0x1eca:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	618 regmbc('I'); regmbc(0xcc); regmbc(0xcd);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	619 regmbc(0xce); regmbc(0xcf); regmbc(0x128);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	620 regmbc(0x12a); regmbc(0x12c); regmbc(0x12e);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	621 regmbc(0x130); regmbc(0x197); regmbc(0x1cf);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	622 regmbc(0x208); regmbc(0x20a); regmbc(0x1e2c);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	623 regmbc(0x1e2e); regmbc(0x1ec8); regmbc(0x1eca);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	624 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	625 case 'J': case 0x134: case 0x248:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	626 regmbc('J'); regmbc(0x134); regmbc(0x248);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	627 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	628 case 'K': case 0x136: case 0x198: case 0x1e8: case 0x1e30:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	629 case 0x1e32: case 0x1e34: case 0x2c69: case 0xa740:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	630 regmbc('K'); regmbc(0x136); regmbc(0x198);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	631 regmbc(0x1e8); regmbc(0x1e30); regmbc(0x1e32);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	632 regmbc(0x1e34); regmbc(0x2c69); regmbc(0xa740);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	633 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	634 case 'L': case 0x139: case 0x13b: case 0x13d: case 0x13f:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	635 case 0x141: case 0x23d: case 0x1e36: case 0x1e38:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	636 case 0x1e3a: case 0x1e3c: case 0x2c60:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	637 regmbc('L'); regmbc(0x139); regmbc(0x13b);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	638 regmbc(0x13d); regmbc(0x13f); regmbc(0x141);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	639 regmbc(0x23d); regmbc(0x1e36); regmbc(0x1e38);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	640 regmbc(0x1e3a); regmbc(0x1e3c); regmbc(0x2c60);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	641 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	642 case 'M': case 0x1e3e: case 0x1e40: case 0x1e42:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	643 regmbc('M'); regmbc(0x1e3e); regmbc(0x1e40);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	644 regmbc(0x1e42);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	645 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	646 case 'N': case 0xd1:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	647 case 0x143: case 0x145: case 0x147: case 0x1f8:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	648 case 0x1e44: case 0x1e46: case 0x1e48: case 0x1e4a:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	649 case 0xa7a4:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	650 regmbc('N'); regmbc(0xd1);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	651 regmbc(0x143); regmbc(0x145); regmbc(0x147);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	652 regmbc(0x1f8); regmbc(0x1e44); regmbc(0x1e46);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	653 regmbc(0x1e48); regmbc(0x1e4a); regmbc(0xa7a4);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	654 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	655 case 'O': case 0xd2: case 0xd3: case 0xd4: case 0xd5: case 0xd6:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	656 case 0xd8: case 0x14c: case 0x14e: case 0x150: case 0x19f:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	657 case 0x1a0: case 0x1d1: case 0x1ea: case 0x1ec: case 0x1fe:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	658 case 0x20c: case 0x20e: case 0x22a: case 0x22c: case 0x22e:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	659 case 0x230: case 0x1e4c: case 0x1e4e: case 0x1e50: case 0x1e52:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	660 case 0x1ecc: case 0x1ece: case 0x1ed0: case 0x1ed2: case 0x1ed4:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	661 case 0x1ed6: case 0x1ed8: case 0x1eda: case 0x1edc: case 0x1ede:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	662 case 0x1ee0: case 0x1ee2:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	663 regmbc('O'); regmbc(0xd2); regmbc(0xd3); regmbc(0xd4);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	664 regmbc(0xd5); regmbc(0xd6); regmbc(0xd8);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	665 regmbc(0x14c); regmbc(0x14e); regmbc(0x150);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	666 regmbc(0x19f); regmbc(0x1a0); regmbc(0x1d1);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	667 regmbc(0x1ea); regmbc(0x1ec); regmbc(0x1fe);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	668 regmbc(0x20c); regmbc(0x20e); regmbc(0x22a);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	669 regmbc(0x22c); regmbc(0x22e); regmbc(0x230);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	670 regmbc(0x1e4c); regmbc(0x1e4e); regmbc(0x1e50);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	671 regmbc(0x1e52); regmbc(0x1ecc); regmbc(0x1ece);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	672 regmbc(0x1ed0); regmbc(0x1ed2); regmbc(0x1ed4);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	673 regmbc(0x1ed6); regmbc(0x1ed8); regmbc(0x1eda);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	674 regmbc(0x1edc); regmbc(0x1ede); regmbc(0x1ee0);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	675 regmbc(0x1ee2);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	676 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	677 case 'P': case 0x1a4: case 0x1e54: case 0x1e56: case 0x2c63:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	678 regmbc('P'); regmbc(0x1a4); regmbc(0x1e54);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	679 regmbc(0x1e56); regmbc(0x2c63);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	680 return;
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	681 case 'Q': case 0x24a:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	682 regmbc('Q'); regmbc(0x24a);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	683 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	684 case 'R': case 0x154: case 0x156: case 0x158: case 0x210:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	685 case 0x212: case 0x24c: case 0x1e58: case 0x1e5a:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	686 case 0x1e5c: case 0x1e5e: case 0x2c64: case 0xa7a6:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	687 regmbc('R'); regmbc(0x154); regmbc(0x156);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	688 regmbc(0x210); regmbc(0x212); regmbc(0x158);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	689 regmbc(0x24c); regmbc(0x1e58); regmbc(0x1e5a);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	690 regmbc(0x1e5c); regmbc(0x1e5e); regmbc(0x2c64);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	691 regmbc(0xa7a6);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	692 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	693 case 'S': case 0x15a: case 0x15c: case 0x15e: case 0x160:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	694 case 0x218: case 0x1e60: case 0x1e62: case 0x1e64:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	695 case 0x1e66: case 0x1e68: case 0x2c7e: case 0xa7a8:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	696 regmbc('S'); regmbc(0x15a); regmbc(0x15c);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	697 regmbc(0x15e); regmbc(0x160); regmbc(0x218);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	698 regmbc(0x1e60); regmbc(0x1e62); regmbc(0x1e64);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	699 regmbc(0x1e66); regmbc(0x1e68); regmbc(0x2c7e);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	700 regmbc(0xa7a8);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	701 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	702 case 'T': case 0x162: case 0x164: case 0x166: case 0x1ac:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	703 case 0x1ae: case 0x21a: case 0x23e: case 0x1e6a: case 0x1e6c:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	704 case 0x1e6e: case 0x1e70:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	705 regmbc('T'); regmbc(0x162); regmbc(0x164);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	706 regmbc(0x166); regmbc(0x1ac); regmbc(0x23e);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	707 regmbc(0x1ae); regmbc(0x21a); regmbc(0x1e6a);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	708 regmbc(0x1e6c); regmbc(0x1e6e); regmbc(0x1e70);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	709 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	710 case 'U': case 0xd9: case 0xda: case 0xdb: case 0xdc:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	711 case 0x168: case 0x16a: case 0x16c: case 0x16e:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	712 case 0x170: case 0x172: case 0x1af: case 0x1d3:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	713 case 0x1d5: case 0x1d7: case 0x1d9: case 0x1db:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	714 case 0x214: case 0x216: case 0x244: case 0x1e72:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	715 case 0x1e74: case 0x1e76: case 0x1e78: case 0x1e7a:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	716 case 0x1ee4: case 0x1ee6: case 0x1ee8: case 0x1eea:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	717 case 0x1eec: case 0x1eee: case 0x1ef0:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	718 regmbc('U'); regmbc(0xd9); regmbc(0xda);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	719 regmbc(0xdb); regmbc(0xdc); regmbc(0x168);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	720 regmbc(0x16a); regmbc(0x16c); regmbc(0x16e);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	721 regmbc(0x170); regmbc(0x172); regmbc(0x1af);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	722 regmbc(0x1d3); regmbc(0x1d5); regmbc(0x1d7);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	723 regmbc(0x1d9); regmbc(0x1db); regmbc(0x214);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	724 regmbc(0x216); regmbc(0x244); regmbc(0x1e72);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	725 regmbc(0x1e74); regmbc(0x1e76); regmbc(0x1e78);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	726 regmbc(0x1e7a); regmbc(0x1ee4); regmbc(0x1ee6);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	727 regmbc(0x1ee8); regmbc(0x1eea); regmbc(0x1eec);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	728 regmbc(0x1eee); regmbc(0x1ef0);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	729 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	730 case 'V': case 0x1b2: case 0x1e7c: case 0x1e7e:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	731 regmbc('V'); regmbc(0x1b2); regmbc(0x1e7c);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	732 regmbc(0x1e7e);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	733 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	734 case 'W': case 0x174: case 0x1e80: case 0x1e82:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	735 case 0x1e84: case 0x1e86: case 0x1e88:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	736 regmbc('W'); regmbc(0x174); regmbc(0x1e80);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	737 regmbc(0x1e82); regmbc(0x1e84); regmbc(0x1e86);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	738 regmbc(0x1e88);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	739 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	740 case 'X': case 0x1e8a: case 0x1e8c:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	741 regmbc('X'); regmbc(0x1e8a); regmbc(0x1e8c);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	742 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	743 case 'Y': case 0xdd:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	744 case 0x176: case 0x178: case 0x1b3: case 0x232: case 0x24e:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	745 case 0x1e8e: case 0x1ef2: case 0x1ef6: case 0x1ef4: case 0x1ef8:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	746 regmbc('Y'); regmbc(0xdd); regmbc(0x176);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	747 regmbc(0x178); regmbc(0x1b3); regmbc(0x232);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	748 regmbc(0x24e); regmbc(0x1e8e); regmbc(0x1ef2);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	749 regmbc(0x1ef4); regmbc(0x1ef6); regmbc(0x1ef8);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	750 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	751 case 'Z': case 0x179: case 0x17b: case 0x17d: case 0x1b5:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	752 case 0x1e90: case 0x1e92: case 0x1e94: case 0x2c6b:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	753 regmbc('Z'); regmbc(0x179); regmbc(0x17b);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	754 regmbc(0x17d); regmbc(0x1b5); regmbc(0x1e90);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	755 regmbc(0x1e92); regmbc(0x1e94); regmbc(0x2c6b);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	756 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	757 case 'a': case 0xe0: case 0xe1: case 0xe2:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	758 case 0xe3: case 0xe4: case 0xe5: case 0x101: case 0x103:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	759 case 0x105: case 0x1ce: case 0x1df: case 0x1e1: case 0x1fb:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	760 case 0x201: case 0x203: case 0x227: case 0x1d8f: case 0x1e01:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	761 case 0x1e9a: case 0x1ea1: case 0x1ea3: case 0x1ea5:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	762 case 0x1ea7: case 0x1ea9: case 0x1eab: case 0x1ead:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	763 case 0x1eaf: case 0x1eb1: case 0x1eb3: case 0x1eb5:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	764 case 0x1eb7: case 0x2c65:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	765 regmbc('a'); regmbc(0xe0); regmbc(0xe1);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	766 regmbc(0xe2); regmbc(0xe3); regmbc(0xe4);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	767 regmbc(0xe5); regmbc(0x101); regmbc(0x103);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	768 regmbc(0x105); regmbc(0x1ce); regmbc(0x1df);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	769 regmbc(0x1e1); regmbc(0x1fb); regmbc(0x201);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	770 regmbc(0x203); regmbc(0x227); regmbc(0x1d8f);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	771 regmbc(0x1e01); regmbc(0x1e9a); regmbc(0x1ea1);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	772 regmbc(0x1ea3); regmbc(0x1ea5); regmbc(0x1ea7);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	773 regmbc(0x1ea9); regmbc(0x1eab); regmbc(0x1ead);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	774 regmbc(0x1eaf); regmbc(0x1eb1); regmbc(0x1eb3);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	775 regmbc(0x1eb5); regmbc(0x1eb7); regmbc(0x2c65);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	776 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	777 case 'b': case 0x180: case 0x253: case 0x1d6c: case 0x1d80:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	778 case 0x1e03: case 0x1e05: case 0x1e07:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	779 regmbc('b');
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	780 regmbc(0x180); regmbc(0x253); regmbc(0x1d6c);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	781 regmbc(0x1d80); regmbc(0x1e03); regmbc(0x1e05);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	782 regmbc(0x1e07);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	783 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	784 case 'c': case 0xe7:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	785 case 0x107: case 0x109: case 0x10b: case 0x10d: case 0x188:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	786 case 0x23c: case 0x1e09: case 0xa793: case 0xa794:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	787 regmbc('c'); regmbc(0xe7); regmbc(0x107);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	788 regmbc(0x109); regmbc(0x10b); regmbc(0x10d);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	789 regmbc(0x188); regmbc(0x23c); regmbc(0x1e09);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	790 regmbc(0xa793); regmbc(0xa794);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	791 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	792 case 'd': case 0x10f: case 0x111: case 0x257: case 0x1d6d:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	793 case 0x1d81: case 0x1d91: case 0x1e0b: case 0x1e0d:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	794 case 0x1e0f: case 0x1e11: case 0x1e13:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	795 regmbc('d'); regmbc(0x10f); regmbc(0x111);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	796 regmbc(0x257); regmbc(0x1d6d); regmbc(0x1d81);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	797 regmbc(0x1d91); regmbc(0x1e0b); regmbc(0x1e0d);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	798 regmbc(0x1e0f); regmbc(0x1e11); regmbc(0x1e13);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	799 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	800 case 'e': case 0xe8: case 0xe9: case 0xea: case 0xeb:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	801 case 0x113: case 0x115: case 0x117: case 0x119:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	802 case 0x11b: case 0x205: case 0x207: case 0x229:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	803 case 0x247: case 0x1d92: case 0x1e15: case 0x1e17:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	804 case 0x1e19: case 0x1e1b: case 0x1eb9: case 0x1ebb:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	805 case 0x1e1d: case 0x1ebd: case 0x1ebf: case 0x1ec1:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	806 case 0x1ec3: case 0x1ec5: case 0x1ec7:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	807 regmbc('e'); regmbc(0xe8); regmbc(0xe9);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	808 regmbc(0xea); regmbc(0xeb); regmbc(0x113);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	809 regmbc(0x115); regmbc(0x117); regmbc(0x119);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	810 regmbc(0x11b); regmbc(0x205); regmbc(0x207);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	811 regmbc(0x229); regmbc(0x247); regmbc(0x1d92);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	812 regmbc(0x1e15); regmbc(0x1e17); regmbc(0x1e19);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	813 regmbc(0x1e1b); regmbc(0x1e1d); regmbc(0x1eb9);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	814 regmbc(0x1ebb); regmbc(0x1ebd); regmbc(0x1ebf);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	815 regmbc(0x1ec1); regmbc(0x1ec3); regmbc(0x1ec5);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	816 regmbc(0x1ec7);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	817 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	818 case 'f': case 0x192: case 0x1d6e: case 0x1d82:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	819 case 0x1e1f: case 0xa799:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	820 regmbc('f'); regmbc(0x192); regmbc(0x1d6e);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	821 regmbc(0x1d82); regmbc(0x1e1f); regmbc(0xa799);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	822 return;
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	823 case 'g': case 0x11d: case 0x11f: case 0x121: case 0x123:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	824 case 0x1e5: case 0x1e7: case 0x260: case 0x1f5: case 0x1d83:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	825 case 0x1e21: case 0xa7a1:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	826 regmbc('g'); regmbc(0x11d); regmbc(0x11f);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	827 regmbc(0x121); regmbc(0x123); regmbc(0x1e5);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	828 regmbc(0x1e7); regmbc(0x1f5); regmbc(0x260);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	829 regmbc(0x1d83); regmbc(0x1e21); regmbc(0xa7a1);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	830 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	831 case 'h': case 0x125: case 0x127: case 0x21f: case 0x1e23:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	832 case 0x1e25: case 0x1e27: case 0x1e29: case 0x1e2b:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	833 case 0x1e96: case 0x2c68: case 0xa795:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	834 regmbc('h'); regmbc(0x125); regmbc(0x127);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	835 regmbc(0x21f); regmbc(0x1e23); regmbc(0x1e25);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	836 regmbc(0x1e27); regmbc(0x1e29); regmbc(0x1e2b);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	837 regmbc(0x1e96); regmbc(0x2c68); regmbc(0xa795);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	838 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	839 case 'i': case 0xec: case 0xed: case 0xee: case 0xef:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	840 case 0x129: case 0x12b: case 0x12d: case 0x12f:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	841 case 0x1d0: case 0x209: case 0x20b: case 0x268:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	842 case 0x1d96: case 0x1e2d: case 0x1e2f: case 0x1ec9:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	843 case 0x1ecb:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	844 regmbc('i'); regmbc(0xec); regmbc(0xed);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	845 regmbc(0xee); regmbc(0xef); regmbc(0x129);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	846 regmbc(0x12b); regmbc(0x12d); regmbc(0x12f);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	847 regmbc(0x1d0); regmbc(0x209); regmbc(0x20b);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	848 regmbc(0x268); regmbc(0x1d96); regmbc(0x1e2d);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	849 regmbc(0x1e2f); regmbc(0x1ec9); regmbc(0x1ecb);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	850 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	851 case 'j': case 0x135: case 0x1f0: case 0x249:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	852 regmbc('j'); regmbc(0x135); regmbc(0x1f0);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	853 regmbc(0x249);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	854 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	855 case 'k': case 0x137: case 0x199: case 0x1e9:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	856 case 0x1d84: case 0x1e31: case 0x1e33: case 0x1e35:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	857 case 0x2c6a: case 0xa741:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	858 regmbc('k'); regmbc(0x137); regmbc(0x199);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	859 regmbc(0x1e9); regmbc(0x1d84); regmbc(0x1e31);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	860 regmbc(0x1e33); regmbc(0x1e35); regmbc(0x2c6a);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	861 regmbc(0xa741);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	862 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	863 case 'l': case 0x13a: case 0x13c: case 0x13e:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	864 case 0x140: case 0x142: case 0x19a: case 0x1e37:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	865 case 0x1e39: case 0x1e3b: case 0x1e3d: case 0x2c61:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	866 regmbc('l'); regmbc(0x13a); regmbc(0x13c);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	867 regmbc(0x13e); regmbc(0x140); regmbc(0x142);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	868 regmbc(0x19a); regmbc(0x1e37); regmbc(0x1e39);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	869 regmbc(0x1e3b); regmbc(0x1e3d); regmbc(0x2c61);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	870 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	871 case 'm': case 0x1d6f: case 0x1e3f: case 0x1e41: case 0x1e43:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	872 regmbc('m'); regmbc(0x1d6f); regmbc(0x1e3f);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	873 regmbc(0x1e41); regmbc(0x1e43);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	874 return;
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	875 case 'n': case 0xf1: case 0x144: case 0x146: case 0x148:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	876 case 0x149: case 0x1f9: case 0x1d70: case 0x1d87:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	877 case 0x1e45: case 0x1e47: case 0x1e49: case 0x1e4b:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	878 case 0xa7a5:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	879 regmbc('n'); regmbc(0xf1); regmbc(0x144);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	880 regmbc(0x146); regmbc(0x148); regmbc(0x149);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	881 regmbc(0x1f9); regmbc(0x1d70); regmbc(0x1d87);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	882 regmbc(0x1e45); regmbc(0x1e47); regmbc(0x1e49);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	883 regmbc(0x1e4b); regmbc(0xa7a5);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	884 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	885 case 'o': case 0xf2: case 0xf3: case 0xf4: case 0xf5:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	886 case 0xf6: case 0xf8: case 0x14d: case 0x14f: case 0x151:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	887 case 0x1a1: case 0x1d2: case 0x1eb: case 0x1ed: case 0x1ff:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	888 case 0x20d: case 0x20f: case 0x22b: case 0x22d: case 0x22f:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	889 case 0x231: case 0x275: case 0x1e4d: case 0x1e4f:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	890 case 0x1e51: case 0x1e53: case 0x1ecd: case 0x1ecf:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	891 case 0x1ed1: case 0x1ed3: case 0x1ed5: case 0x1ed7:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	892 case 0x1ed9: case 0x1edb: case 0x1edd: case 0x1edf:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	893 case 0x1ee1: case 0x1ee3:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	894 regmbc('o'); regmbc(0xf2); regmbc(0xf3);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	895 regmbc(0xf4); regmbc(0xf5); regmbc(0xf6);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	896 regmbc(0xf8); regmbc(0x14d); regmbc(0x14f);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	897 regmbc(0x151); regmbc(0x1a1); regmbc(0x1d2);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	898 regmbc(0x1eb); regmbc(0x1ed); regmbc(0x1ff);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	899 regmbc(0x20d); regmbc(0x20f); regmbc(0x22b);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	900 regmbc(0x22d); regmbc(0x22f); regmbc(0x231);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	901 regmbc(0x275); regmbc(0x1e4d); regmbc(0x1e4f);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	902 regmbc(0x1e51); regmbc(0x1e53); regmbc(0x1ecd);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	903 regmbc(0x1ecf); regmbc(0x1ed1); regmbc(0x1ed3);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	904 regmbc(0x1ed5); regmbc(0x1ed7); regmbc(0x1ed9);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	905 regmbc(0x1edb); regmbc(0x1edd); regmbc(0x1edf);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	906 regmbc(0x1ee1); regmbc(0x1ee3);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	907 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	908 case 'p': case 0x1a5: case 0x1d71: case 0x1d88: case 0x1d7d:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	909 case 0x1e55: case 0x1e57:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	910 regmbc('p'); regmbc(0x1a5); regmbc(0x1d71);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	911 regmbc(0x1d7d); regmbc(0x1d88); regmbc(0x1e55);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	912 regmbc(0x1e57);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	913 return;
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	914 case 'q': case 0x24b: case 0x2a0:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	915 regmbc('q'); regmbc(0x24b); regmbc(0x2a0);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	916 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	917 case 'r': case 0x155: case 0x157: case 0x159: case 0x211:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	918 case 0x213: case 0x24d: case 0x27d: case 0x1d72: case 0x1d73:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	919 case 0x1d89: case 0x1e59: case 0x1e5b: case 0x1e5d: case 0x1e5f:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	920 case 0xa7a7:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	921 regmbc('r'); regmbc(0x155); regmbc(0x157);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	922 regmbc(0x159); regmbc(0x211); regmbc(0x213);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	923 regmbc(0x24d); regmbc(0x1d72); regmbc(0x1d73);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	924 regmbc(0x1d89); regmbc(0x1e59); regmbc(0x27d);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	925 regmbc(0x1e5b); regmbc(0x1e5d); regmbc(0x1e5f);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	926 regmbc(0xa7a7);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	927 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	928 case 's': case 0x15b: case 0x15d: case 0x15f: case 0x161:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	929 case 0x1e61: case 0x219: case 0x23f: case 0x1d74: case 0x1d8a:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	930 case 0x1e63: case 0x1e65: case 0x1e67: case 0x1e69: case 0xa7a9:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	931 regmbc('s'); regmbc(0x15b); regmbc(0x15d);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	932 regmbc(0x15f); regmbc(0x161); regmbc(0x23f);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	933 regmbc(0x219); regmbc(0x1d74); regmbc(0x1d8a);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	934 regmbc(0x1e61); regmbc(0x1e63); regmbc(0x1e65);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	935 regmbc(0x1e67); regmbc(0x1e69); regmbc(0xa7a9);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	936 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	937 case 't': case 0x163: case 0x165: case 0x167: case 0x1ab:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	938 case 0x1ad: case 0x21b: case 0x288: case 0x1d75: case 0x1e6b:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	939 case 0x1e6d: case 0x1e6f: case 0x1e71: case 0x1e97: case 0x2c66:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	940 regmbc('t'); regmbc(0x163); regmbc(0x165);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	941 regmbc(0x167); regmbc(0x1ab); regmbc(0x21b);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	942 regmbc(0x1ad); regmbc(0x288); regmbc(0x1d75);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	943 regmbc(0x1e6b); regmbc(0x1e6d); regmbc(0x1e6f);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	944 regmbc(0x1e71); regmbc(0x1e97); regmbc(0x2c66);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	945 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	946 case 'u': case 0xf9: case 0xfa: case 0xfb: case 0xfc:
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	947 case 0x169: case 0x16b: case 0x16d: case 0x16f:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	948 case 0x171: case 0x173: case 0x1b0: case 0x1d4:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	949 case 0x1d6: case 0x1d8: case 0x1da: case 0x1dc:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	950 case 0x215: case 0x217: case 0x289: case 0x1e73:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	951 case 0x1d7e: case 0x1d99: case 0x1e75: case 0x1e77:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	952 case 0x1e79: case 0x1e7b: case 0x1ee5: case 0x1ee7:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	953 case 0x1ee9: case 0x1eeb: case 0x1eed: case 0x1eef:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	954 case 0x1ef1:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	955 regmbc('u'); regmbc(0xf9); regmbc(0xfa);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	956 regmbc(0xfb); regmbc(0xfc); regmbc(0x169);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	957 regmbc(0x16b); regmbc(0x16d); regmbc(0x16f);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	958 regmbc(0x171); regmbc(0x173); regmbc(0x1d6);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	959 regmbc(0x1d8); regmbc(0x1da); regmbc(0x1dc);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	960 regmbc(0x215); regmbc(0x217); regmbc(0x1b0);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	961 regmbc(0x1d4); regmbc(0x289); regmbc(0x1d7e);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	962 regmbc(0x1d99); regmbc(0x1e73); regmbc(0x1e75);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	963 regmbc(0x1e77); regmbc(0x1e79); regmbc(0x1e7b);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	964 regmbc(0x1ee5); regmbc(0x1ee7); regmbc(0x1ee9);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	965 regmbc(0x1eeb); regmbc(0x1eed); regmbc(0x1eef);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	966 regmbc(0x1ef1);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	967 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	968 case 'v': case 0x28b: case 0x1d8c: case 0x1e7d: case 0x1e7f:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	969 regmbc('v'); regmbc(0x28b); regmbc(0x1d8c);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	970 regmbc(0x1e7d); regmbc(0x1e7f);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	971 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	972 case 'w': case 0x175: case 0x1e81: case 0x1e83:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	973 case 0x1e85: case 0x1e87: case 0x1e89: case 0x1e98:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	974 regmbc('w'); regmbc(0x175); regmbc(0x1e81);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	975 regmbc(0x1e83); regmbc(0x1e85); regmbc(0x1e87);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	976 regmbc(0x1e89); regmbc(0x1e98);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	977 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	978 case 'x': case 0x1e8b: case 0x1e8d:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	979 regmbc('x'); regmbc(0x1e8b); regmbc(0x1e8d);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	980 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	981 case 'y': case 0xfd: case 0xff: case 0x177: case 0x1b4:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	982 case 0x233: case 0x24f: case 0x1e8f: case 0x1e99: case 0x1ef3:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	983 case 0x1ef5: case 0x1ef7: case 0x1ef9:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	984 regmbc('y'); regmbc(0xfd); regmbc(0xff);
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	985 regmbc(0x177); regmbc(0x1b4); regmbc(0x233);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	986 regmbc(0x24f); regmbc(0x1e8f); regmbc(0x1e99);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	987 regmbc(0x1ef3); regmbc(0x1ef5); regmbc(0x1ef7);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	988 regmbc(0x1ef9);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	989 return;
24351 585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	990 case 'z': case 0x17a: case 0x17c: case 0x17e: case 0x1b6:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	991 case 0x1d76: case 0x1d8e: case 0x1e91: case 0x1e93:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	992 case 0x1e95: case 0x2c6c:
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	993 regmbc('z'); regmbc(0x17a); regmbc(0x17c);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	994 regmbc(0x17e); regmbc(0x1b6); regmbc(0x1d76);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	995 regmbc(0x1d8e); regmbc(0x1e91); regmbc(0x1e93);
585695c70392 patch 8.2.2716: the equivalent class regexp is missing some characters Bram Moolenaar <Bram@vim.org> parents: 23270 diff changeset	996 regmbc(0x1e95); regmbc(0x2c6c);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	997 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	998 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	999 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1000 regmbc(c);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1001 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1002
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1003 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1004 * Emit a node.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1005 * Return pointer to generated code.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1006 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1007 static char_u *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1008 regnode(int op)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1009 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1010 char_u *ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1011
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1012 ret = regcode;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1013 if (ret == JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1014 regsize += 3;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1015 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1016 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1017 *regcode++ = op;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1018 *regcode++ = NUL; // Null "next" pointer.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1019 *regcode++ = NUL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1020 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1021 return ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1022 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1023
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1024 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1025 * Write a long as four bytes at "p" and return pointer to the next char.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1026 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1027 static char_u *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1028 re_put_long(char_u *p, long_u val)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1029 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1030 *p++ = (char_u) ((val >> 24) & 0377);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1031 *p++ = (char_u) ((val >> 16) & 0377);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1032 *p++ = (char_u) ((val >> 8) & 0377);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1033 *p++ = (char_u) (val & 0377);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1034 return p;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1035 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1036
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1037 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1038 * regnext - dig the "next" pointer out of a node
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1039 * Returns NULL when calculating size, when there is no next item and when
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1040 * there is an error.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1041 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1042 static char_u *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1043 regnext(char_u *p)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1044 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1045 int offset;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1046
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1047 if (p == JUST_CALC_SIZE \|\| reg_toolong)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1048 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1049
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1050 offset = NEXT(p);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1051 if (offset == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1052 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1053
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1054 if (OP(p) == BACK)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1055 return p - offset;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1056 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1057 return p + offset;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1058 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1059
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1060 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1061 * Set the next-pointer at the end of a node chain.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1062 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1063 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1064 regtail(char_u p, char_u val)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1065 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1066 char_u *scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1067 char_u *temp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1068 int offset;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1069
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1070 if (p == JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1071 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1072
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1073 // Find last node.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1074 scan = p;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1075 for (;;)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1076 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1077 temp = regnext(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1078 if (temp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1079 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1080 scan = temp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1081 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1082
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1083 if (OP(scan) == BACK)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1084 offset = (int)(scan - val);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1085 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1086 offset = (int)(val - scan);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1087 // When the offset uses more than 16 bits it can no longer fit in the two
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1088 // bytes available. Use a global flag to avoid having to check return
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1089 // values in too many places.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1090 if (offset > 0xffff)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1091 reg_toolong = TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1092 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1093 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1094 *(scan + 1) = (char_u) (((unsigned)offset >> 8) & 0377);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1095 *(scan + 2) = (char_u) (offset & 0377);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1096 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1097 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1098
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1099 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1100 * Like regtail, on item after a BRANCH; nop if none.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1101 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1102 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1103 regoptail(char_u p, char_u val)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1104 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1105 // When op is neither BRANCH nor BRACE_COMPLEX0-9, it is "operandless"
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1106 if (p == NULL \|\| p == JUST_CALC_SIZE
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1107 \|\| (OP(p) != BRANCH
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1108 && (OP(p) < BRACE_COMPLEX \|\| OP(p) > BRACE_COMPLEX + 9)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1109 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1110 regtail(OPERAND(p), val);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1111 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1112
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1113 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1114 * Insert an operator in front of already-emitted operand
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1115 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1116 * Means relocating the operand.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1117 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1118 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1119 reginsert(int op, char_u *opnd)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1120 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1121 char_u *src;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1122 char_u *dst;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1123 char_u *place;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1124
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1125 if (regcode == JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1126 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1127 regsize += 3;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1128 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1129 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1130 src = regcode;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1131 regcode += 3;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1132 dst = regcode;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1133 while (src > opnd)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1134 --dst = --src;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1135
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1136 place = opnd; // Op node, where operand used to be.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1137 *place++ = op;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1138 *place++ = NUL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1139 *place = NUL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1140 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1141
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1142 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1143 * Insert an operator in front of already-emitted operand.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1144 * Add a number to the operator.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1145 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1146 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1147 reginsert_nr(int op, long val, char_u *opnd)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1148 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1149 char_u *src;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1150 char_u *dst;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1151 char_u *place;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1152
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1153 if (regcode == JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1154 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1155 regsize += 7;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1156 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1157 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1158 src = regcode;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1159 regcode += 7;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1160 dst = regcode;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1161 while (src > opnd)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1162 --dst = --src;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1163
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1164 place = opnd; // Op node, where operand used to be.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1165 *place++ = op;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1166 *place++ = NUL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1167 *place++ = NUL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1168 re_put_long(place, (long_u)val);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1169 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1170
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1171 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1172 * Insert an operator in front of already-emitted operand.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1173 * The operator has the given limit values as operands. Also set next pointer.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1174 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1175 * Means relocating the operand.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1176 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1177 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1178 reginsert_limits(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1179 int op,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1180 long minval,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1181 long maxval,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1182 char_u *opnd)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1183 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1184 char_u *src;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1185 char_u *dst;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1186 char_u *place;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1187
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1188 if (regcode == JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1189 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1190 regsize += 11;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1191 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1192 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1193 src = regcode;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1194 regcode += 11;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1195 dst = regcode;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1196 while (src > opnd)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1197 --dst = --src;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1198
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1199 place = opnd; // Op node, where operand used to be.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1200 *place++ = op;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1201 *place++ = NUL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1202 *place++ = NUL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1203 place = re_put_long(place, (long_u)minval);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1204 place = re_put_long(place, (long_u)maxval);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1205 regtail(opnd, place);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1206 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1207
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1208 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1209 * Return TRUE if the back reference is legal. We must have seen the close
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1210 * brace.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1211 * TODO: Should also check that we don't refer to something that is repeated
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1212 * (+*=): what instance of the repetition should we match?
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1213 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1214 static int
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1215 seen_endbrace(int refnum)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1216 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1217 if (!had_endbrace[refnum])
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1218 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1219 char_u *p;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1220
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1221 // Trick: check if "@<=" or "@<!" follows, in which case
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1222 // the \1 can appear before the referenced match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1223 for (p = regparse; *p != NUL; ++p)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1224 if (p[0] == '@' && p[1] == '<' && (p[2] == '!' \|\| p[2] == '='))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1225 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1226 if (*p == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1227 {
26436 ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	1228 emsg(_(e_illegal_back_reference));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1229 rc_did_emsg = TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1230 return FALSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1231 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1232 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1233 return TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1234 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1235
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1236 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1237 * Parse the lowest level.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1238 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1239 * Optimization: gobbles an entire sequence of ordinary characters so that
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1240 * it can turn them into a single node, which is smaller to store and
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1241 * faster to run. Don't do this when one_exactly is set.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1242 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1243 static char_u *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1244 regatom(int *flagp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1245 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1246 char_u *ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1247 int flags;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1248 int c;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1249 char_u *p;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1250 int extra = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1251 int save_prev_at_start = prev_at_start;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1252
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1253 *flagp = WORST; // Tentatively.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1254
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1255 c = getchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1256 switch (c)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1257 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1258 case Magic('^'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1259 ret = regnode(BOL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1260 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1261
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1262 case Magic('$'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1263 ret = regnode(EOL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1264 #if defined(FEAT_SYN_HL) \|\| defined(PROTO)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1265 had_eol = TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1266 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1267 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1268
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1269 case Magic('<'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1270 ret = regnode(BOW);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1271 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1272
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1273 case Magic('>'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1274 ret = regnode(EOW);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1275 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1276
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1277 case Magic('_'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1278 c = no_Magic(getchr());
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1279 if (c == '^') // "\_^" is start-of-line
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1280 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1281 ret = regnode(BOL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1282 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1283 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1284 if (c == '$') // "\_$" is end-of-line
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1285 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1286 ret = regnode(EOL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1287 #if defined(FEAT_SYN_HL) \|\| defined(PROTO)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1288 had_eol = TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1289 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1290 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1291 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1292
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1293 extra = ADD_NL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1294 *flagp \|= HASNL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1295
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1296 // "\_[" is character range plus newline
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1297 if (c == '[')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1298 goto collection;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1299
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1300 // "\_x" is character class plus newline
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1301 // FALLTHROUGH
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1302
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1303 // Character classes.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1304 case Magic('.'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1305 case Magic('i'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1306 case Magic('I'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1307 case Magic('k'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1308 case Magic('K'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1309 case Magic('f'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1310 case Magic('F'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1311 case Magic('p'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1312 case Magic('P'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1313 case Magic('s'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1314 case Magic('S'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1315 case Magic('d'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1316 case Magic('D'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1317 case Magic('x'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1318 case Magic('X'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1319 case Magic('o'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1320 case Magic('O'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1321 case Magic('w'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1322 case Magic('W'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1323 case Magic('h'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1324 case Magic('H'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1325 case Magic('a'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1326 case Magic('A'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1327 case Magic('l'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1328 case Magic('L'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1329 case Magic('u'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1330 case Magic('U'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1331 p = vim_strchr(classchars, no_Magic(c));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1332 if (p == NULL)
26436 ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	1333 EMSG_RET_NULL(_(e_invalid_use_of_underscore));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1334
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1335 // When '.' is followed by a composing char ignore the dot, so that
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1336 // the composing char is matched here.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1337 if (enc_utf8 && c == Magic('.') && utf_iscomposing(peekchr()))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1338 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1339 c = getchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1340 goto do_multibyte;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1341 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1342 ret = regnode(classcodes[p - classchars] + extra);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1343 *flagp \|= HASWIDTH \| SIMPLE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1344 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1345
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1346 case Magic('n'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1347 if (reg_string)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1348 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1349 // In a string "\n" matches a newline character.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1350 ret = regnode(EXACTLY);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1351 regc(NL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1352 regc(NUL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1353 *flagp \|= HASWIDTH \| SIMPLE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1354 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1355 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1356 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1357 // In buffer text "\n" matches the end of a line.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1358 ret = regnode(NEWL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1359 *flagp \|= HASWIDTH \| HASNL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1360 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1361 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1362
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1363 case Magic('('):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1364 if (one_exactly)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1365 EMSG_ONE_RET_NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1366 ret = reg(REG_PAREN, &flags);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1367 if (ret == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1368 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1369 *flagp \|= flags & (HASWIDTH \| SPSTART \| HASNL \| HASLOOKBH);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1370 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1371
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1372 case NUL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1373 case Magic('\|'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1374 case Magic('&'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1375 case Magic(')'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1376 if (one_exactly)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1377 EMSG_ONE_RET_NULL;
26867 d66ba549f68a patch 8.2.3962: build fails for missing error message Bram Moolenaar <Bram@vim.org> parents: 26436 diff changeset	1378 // Supposed to be caught earlier.
d66ba549f68a patch 8.2.3962: build fails for missing error message Bram Moolenaar <Bram@vim.org> parents: 26436 diff changeset	1379 IEMSG_RET_NULL(_(e_internal_error_in_regexp));
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1380 // NOTREACHED
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1381
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1382 case Magic('='):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1383 case Magic('?'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1384 case Magic('+'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1385 case Magic('@'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1386 case Magic('{'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1387 case Magic('*'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1388 c = no_Magic(c);
26436 ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	1389 EMSG3_RET_NULL(_(e_str_chr_follows_nothing),
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1390 (c == '*' ? reg_magic >= MAGIC_ON : reg_magic == MAGIC_ALL), c);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1391 // NOTREACHED
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1392
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1393 case Magic('~'): // previous substitute pattern
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1394 if (reg_prev_sub != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1395 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1396 char_u *lp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1397
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1398 ret = regnode(EXACTLY);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1399 lp = reg_prev_sub;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1400 while (*lp != NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1401 regc(*lp++);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1402 regc(NUL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1403 if (*reg_prev_sub != NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1404 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1405 *flagp \|= HASWIDTH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1406 if ((lp - reg_prev_sub) == 1)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1407 *flagp \|= SIMPLE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1408 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1409 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1410 else
25306 078edc1821bf patch 8.2.3190: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25147 diff changeset	1411 EMSG_RET_NULL(_(e_no_previous_substitute_regular_expression));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1412 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1413
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1414 case Magic('1'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1415 case Magic('2'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1416 case Magic('3'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1417 case Magic('4'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1418 case Magic('5'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1419 case Magic('6'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1420 case Magic('7'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1421 case Magic('8'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1422 case Magic('9'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1423 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1424 int refnum;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1425
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1426 refnum = c - Magic('0');
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1427 if (!seen_endbrace(refnum))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1428 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1429 ret = regnode(BACKREF + refnum);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1430 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1431 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1432
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1433 case Magic('z'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1434 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1435 c = no_Magic(getchr());
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1436 switch (c)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1437 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1438 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1439 case '(': if ((reg_do_extmatch & REX_SET) == 0)
26436 ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	1440 EMSG_RET_NULL(_(e_z_not_allowed_here));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1441 if (one_exactly)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1442 EMSG_ONE_RET_NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1443 ret = reg(REG_ZPAREN, &flags);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1444 if (ret == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1445 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1446 *flagp \|= flags & (HASWIDTH\|SPSTART\|HASNL\|HASLOOKBH);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1447 re_has_z = REX_SET;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1448 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1449
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1450 case '1':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1451 case '2':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1452 case '3':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1453 case '4':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1454 case '5':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1455 case '6':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1456 case '7':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1457 case '8':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1458 case '9': if ((reg_do_extmatch & REX_USE) == 0)
26436 ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	1459 EMSG_RET_NULL(_(e_z1_z9_not_allowed_here));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1460 ret = regnode(ZREF + c - '0');
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1461 re_has_z = REX_USE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1462 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1463 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1464
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1465 case 's': ret = regnode(MOPEN + 0);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1466 if (re_mult_next("\\zs") == FAIL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1467 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1468 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1469
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1470 case 'e': ret = regnode(MCLOSE + 0);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1471 if (re_mult_next("\\ze") == FAIL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1472 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1473 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1474
27034 b31cc7630773 patch 8.2.4046: some error messages not in the right place Bram Moolenaar <Bram@vim.org> parents: 26958 diff changeset	1475 default: EMSG_RET_NULL(_(e_invalid_character_after_bsl_z));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1476 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1477 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1478 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1479
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1480 case Magic('%'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1481 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1482 c = no_Magic(getchr());
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1483 switch (c)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1484 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1485 // () without a back reference
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1486 case '(':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1487 if (one_exactly)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1488 EMSG_ONE_RET_NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1489 ret = reg(REG_NPAREN, &flags);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1490 if (ret == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1491 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1492 *flagp \|= flags & (HASWIDTH \| SPSTART \| HASNL \| HASLOOKBH);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1493 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1494
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1495 // Catch \%^ and \%$ regardless of where they appear in the
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1496 // pattern -- regardless of whether or not it makes sense.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1497 case '^':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1498 ret = regnode(RE_BOF);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1499 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1500
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1501 case '$':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1502 ret = regnode(RE_EOF);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1503 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1504
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1505 case '#':
28911 e25196adb7c1 patch 8.2.4978: no error if engine selection atom is not at the start Bram Moolenaar <Bram@vim.org> parents: 28335 diff changeset	1506 if (regparse[0] == '=' && regparse[1] >= 48
e25196adb7c1 patch 8.2.4978: no error if engine selection atom is not at the start Bram Moolenaar <Bram@vim.org> parents: 28335 diff changeset	1507 && regparse[1] <= 50)
e25196adb7c1 patch 8.2.4978: no error if engine selection atom is not at the start Bram Moolenaar <Bram@vim.org> parents: 28335 diff changeset	1508 {
e25196adb7c1 patch 8.2.4978: no error if engine selection atom is not at the start Bram Moolenaar <Bram@vim.org> parents: 28335 diff changeset	1509 // misplaced \%#=1
e25196adb7c1 patch 8.2.4978: no error if engine selection atom is not at the start Bram Moolenaar <Bram@vim.org> parents: 28335 diff changeset	1510 semsg(_(e_atom_engine_must_be_at_start_of_pattern),
e25196adb7c1 patch 8.2.4978: no error if engine selection atom is not at the start Bram Moolenaar <Bram@vim.org> parents: 28335 diff changeset	1511 regparse[1]);
e25196adb7c1 patch 8.2.4978: no error if engine selection atom is not at the start Bram Moolenaar <Bram@vim.org> parents: 28335 diff changeset	1512 return FAIL;
e25196adb7c1 patch 8.2.4978: no error if engine selection atom is not at the start Bram Moolenaar <Bram@vim.org> parents: 28335 diff changeset	1513 }
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1514 ret = regnode(CURSOR);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1515 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1516
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1517 case 'V':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1518 ret = regnode(RE_VISUAL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1519 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1520
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1521 case 'C':
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1522 ret = regnode(RE_COMPOSING);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1523 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1524
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1525 // \%[abc]: Emit as a list of branches, all ending at the last
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1526 // branch which matches nothing.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1527 case '[':
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1528 if (one_exactly) // doesn't nest
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1529 EMSG_ONE_RET_NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1530 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1531 char_u *lastbranch;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1532 char_u *lastnode = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1533 char_u *br;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1534
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1535 ret = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1536 while ((c = getchr()) != ']')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1537 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1538 if (c == NUL)
26436 ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	1539 EMSG2_RET_NULL(_(e_missing_sb_after_str),
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1540 reg_magic == MAGIC_ALL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1541 br = regnode(BRANCH);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1542 if (ret == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1543 ret = br;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1544 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1545 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1546 regtail(lastnode, br);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1547 if (reg_toolong)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1548 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1549 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1550
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1551 ungetchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1552 one_exactly = TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1553 lastnode = regatom(flagp);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1554 one_exactly = FALSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1555 if (lastnode == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1556 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1557 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1558 if (ret == NULL)
26436 ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	1559 EMSG2_RET_NULL(_(e_empty_str_brackets),
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1560 reg_magic == MAGIC_ALL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1561 lastbranch = regnode(BRANCH);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1562 br = regnode(NOTHING);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1563 if (ret != JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1564 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1565 regtail(lastnode, br);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1566 regtail(lastbranch, br);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1567 // connect all branches to the NOTHING
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1568 // branch at the end
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1569 for (br = ret; br != lastnode; )
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1570 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1571 if (OP(br) == BRANCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1572 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1573 regtail(br, lastbranch);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1574 if (reg_toolong)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1575 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1576 br = OPERAND(br);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1577 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1578 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1579 br = regnext(br);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1580 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1581 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1582 *flagp &= ~(HASWIDTH \| SIMPLE);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1583 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1584 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1585
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1586 case 'd': // %d123 decimal
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1587 case 'o': // %o123 octal
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1588 case 'x': // %xab hex 2
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1589 case 'u': // %uabcd hex 4
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1590 case 'U': // %U1234abcd hex 8
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1591 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1592 long i;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1593
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1594 switch (c)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1595 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1596 case 'd': i = getdecchrs(); break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1597 case 'o': i = getoctchrs(); break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1598 case 'x': i = gethexchrs(2); break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1599 case 'u': i = gethexchrs(4); break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1600 case 'U': i = gethexchrs(8); break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1601 default: i = -1; break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1602 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1603
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1604 if (i < 0 \|\| i > INT_MAX)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1605 EMSG2_RET_NULL(
26952 b34ddbca305c patch 8.2.4005: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26909 diff changeset	1606 _(e_invalid_character_after_str_2),
b34ddbca305c patch 8.2.4005: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26909 diff changeset	1607 reg_magic == MAGIC_ALL);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1608 if (use_multibytecode(i))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1609 ret = regnode(MULTIBYTECODE);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1610 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1611 ret = regnode(EXACTLY);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1612 if (i == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1613 regc(0x0a);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1614 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1615 regmbc(i);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1616 regc(NUL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1617 *flagp \|= HASWIDTH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1618 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1619 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1620
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1621 default:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1622 if (VIM_ISDIGIT(c) \|\| c == '<' \|\| c == '>'
25147 10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1623 \|\| c == '\'' \|\| c == '.')
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1624 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1625 long_u n = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1626 int cmp;
25147 10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1627 int cur = FALSE;
28335 786707ef91de patch 8.2.4693: new regexp does not accept pattern "%>0v" Bram Moolenaar <Bram@vim.org> parents: 28325 diff changeset	1628 int got_digit = FALSE;
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1629
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1630 cmp = c;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1631 if (cmp == '<' \|\| cmp == '>')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1632 c = getchr();
25147 10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1633 if (no_Magic(c) == '.')
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1634 {
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1635 cur = TRUE;
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1636 c = getchr();
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1637 }
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1638 while (VIM_ISDIGIT(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1639 {
28335 786707ef91de patch 8.2.4693: new regexp does not accept pattern "%>0v" Bram Moolenaar <Bram@vim.org> parents: 28325 diff changeset	1640 got_digit = TRUE;
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1641 n = n * 10 + (c - '0');
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1642 c = getchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1643 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1644 if (c == '\'' && n == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1645 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1646 // "\%'m", "\%<'m" and "\%>'m": Mark
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1647 c = getchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1648 ret = regnode(RE_MARK);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1649 if (ret == JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1650 regsize += 2;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1651 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1652 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1653 *regcode++ = c;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1654 *regcode++ = cmp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1655 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1656 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1657 }
28335 786707ef91de patch 8.2.4693: new regexp does not accept pattern "%>0v" Bram Moolenaar <Bram@vim.org> parents: 28325 diff changeset	1658 else if ((c == 'l' \|\| c == 'c' \|\| c == 'v')
786707ef91de patch 8.2.4693: new regexp does not accept pattern "%>0v" Bram Moolenaar <Bram@vim.org> parents: 28325 diff changeset	1659 && (cur \|\| got_digit))
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1660 {
25147 10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1661 if (cur && n)
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1662 {
28325 a3a760ee765f patch 8.2.4688: new regexp engine does not give an error for "%v" Bram Moolenaar <Bram@vim.org> parents: 28240 diff changeset	1663 semsg(_(e_regexp_number_after_dot_pos_search_chr),
a3a760ee765f patch 8.2.4688: new regexp engine does not give an error for "%v" Bram Moolenaar <Bram@vim.org> parents: 28240 diff changeset	1664 no_Magic(c));
25147 10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1665 rc_did_emsg = TRUE;
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1666 return NULL;
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1667 }
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1668 if (c == 'l')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1669 {
25147 10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1670 if (cur)
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1671 n = curwin->w_cursor.lnum;
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1672 ret = regnode(RE_LNUM);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1673 if (save_prev_at_start)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1674 at_start = TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1675 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1676 else if (c == 'c')
25147 10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1677 {
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1678 if (cur)
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1679 {
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1680 n = curwin->w_cursor.col;
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1681 n++;
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1682 }
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1683 ret = regnode(RE_COL);
25147 10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1684 }
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1685 else
25147 10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1686 {
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1687 if (cur)
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1688 {
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1689 colnr_T vcol = 0;
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1690
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1691 getvvcol(curwin, &curwin->w_cursor,
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1692 NULL, NULL, &vcol);
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1693 ++vcol;
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1694 n = vcol;
10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1695 }
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1696 ret = regnode(RE_VCOL);
25147 10b269321459 patch 8.2.3110: a pattern that matches the cursor position is complicated Bram Moolenaar <Bram@vim.org> parents: 24693 diff changeset	1697 }
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1698 if (ret == JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1699 regsize += 5;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1700 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1701 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1702 // put the number and the optional
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1703 // comparator after the opcode
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1704 regcode = re_put_long(regcode, n);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1705 *regcode++ = cmp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1706 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1707 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1708 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1709 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1710
26436 ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	1711 EMSG2_RET_NULL(_(e_invalid_character_after_str),
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1712 reg_magic == MAGIC_ALL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1713 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1714 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1715 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1716
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1717 case Magic('['):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1718 collection:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1719 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1720 char_u *lp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1721
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1722 // If there is no matching ']', we assume the '[' is a normal
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1723 // character. This makes 'incsearch' and ":help [" work.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1724 lp = skip_anyof(regparse);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1725 if (*lp == ']') // there is a matching ']'
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1726 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1727 int startc = -1; // > 0 when next '-' is a range
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1728 int endc;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1729
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1730 // In a character class, different parsing rules apply.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1731 // Not even \ is special anymore, nothing is.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1732 if (*regparse == '^') // Complement of range.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1733 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1734 ret = regnode(ANYBUT + extra);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1735 regparse++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1736 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1737 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1738 ret = regnode(ANYOF + extra);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1739
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1740 // At the start ']' and '-' mean the literal character.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1741 if (regparse == ']' \|\| regparse == '-')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1742 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1743 startc = *regparse;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1744 regc(*regparse++);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1745 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1746
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1747 while (regparse != NUL && regparse != ']')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1748 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1749 if (*regparse == '-')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1750 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1751 ++regparse;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1752 // The '-' is not used for a range at the end and
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1753 // after or before a '\n'.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1754 if (regparse == ']' \|\| regparse == NUL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1755 \|\| startc == -1
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1756 \|\| (regparse[0] == '\\' && regparse[1] == 'n'))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1757 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1758 regc('-');
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1759 startc = '-'; // [--x] is a range
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1760 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1761 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1762 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1763 // Also accept "a-[.z.]"
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1764 endc = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1765 if (*regparse == '[')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1766 endc = get_coll_element(&regparse);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1767 if (endc == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1768 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1769 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1770 endc = mb_ptr2char_adv(&regparse);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1771 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1772 endc = *regparse++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1773 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1774
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1775 // Handle \o40, \x20 and \u20AC style sequences
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1776 if (endc == '\\' && !reg_cpo_lit && !reg_cpo_bsl)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1777 endc = coll_get_char();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1778
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1779 if (startc > endc)
26958 d92e0d85923f patch 8.2.4008: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26952 diff changeset	1780 EMSG_RET_NULL(_(e_reverse_range_in_character_class));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1781 if (has_mbyte && ((*mb_char2len)(startc) > 1
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1782 \|\| (*mb_char2len)(endc) > 1))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1783 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1784 // Limit to a range of 256 chars.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1785 if (endc > startc + 256)
26958 d92e0d85923f patch 8.2.4008: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26952 diff changeset	1786 EMSG_RET_NULL(_(e_range_too_large_in_character_class));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1787 while (++startc <= endc)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1788 regmbc(startc);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1789 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1790 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1791 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1792 while (++startc <= endc)
27490 fb4c30606b4a patch 8.2.4273: the EBCDIC support is outdated Bram Moolenaar <Bram@vim.org> parents: 27034 diff changeset	1793 regc(startc);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1794 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1795 startc = -1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1796 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1797 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1798 // Only "\]", "\^", "\]" and "\\" are special in Vi. Vim
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1799 // accepts "\t", "\e", etc., but only when the 'l' flag in
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1800 // 'cpoptions' is not included.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1801 // Posix doesn't recognize backslash at all.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1802 else if (*regparse == '\\'
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1803 && !reg_cpo_bsl
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1804 && (vim_strchr(REGEXP_INRANGE, regparse[1]) != NULL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1805 \|\| (!reg_cpo_lit
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1806 && vim_strchr(REGEXP_ABBR,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1807 regparse[1]) != NULL)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1808 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1809 regparse++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1810 if (*regparse == 'n')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1811 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1812 // '\n' in range: also match NL
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1813 if (ret != JUST_CALC_SIZE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1814 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1815 // Using \n inside [^] does not change what
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1816 // matches. "[^\n]" is the same as ".".
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1817 if (*ret == ANYOF)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1818 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1819 *ret = ANYOF + ADD_NL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1820 *flagp \|= HASNL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1821 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1822 // else: must have had a \n already
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1823 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1824 regparse++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1825 startc = -1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1826 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1827 else if (*regparse == 'd'
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1828 \|\| *regparse == 'o'
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1829 \|\| *regparse == 'x'
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1830 \|\| *regparse == 'u'
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1831 \|\| *regparse == 'U')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1832 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1833 startc = coll_get_char();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1834 if (startc == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1835 regc(0x0a);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1836 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1837 regmbc(startc);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1838 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1839 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1840 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1841 startc = backslash_trans(*regparse++);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1842 regc(startc);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1843 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1844 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1845 else if (*regparse == '[')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1846 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1847 int c_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1848 int cu;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1849
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1850 c_class = get_char_class(&regparse);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1851 startc = -1;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1852 // Characters assumed to be 8 bits!
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1853 switch (c_class)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1854 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1855 case CLASS_NONE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1856 c_class = get_equi_class(&regparse);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1857 if (c_class != 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1858 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1859 // produce equivalence class
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1860 reg_equi_class(c_class);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1861 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1862 else if ((c_class =
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1863 get_coll_element(&regparse)) != 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1864 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1865 // produce a collating element
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1866 regmbc(c_class);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1867 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1868 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1869 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1870 // literal '[', allow [[-x] as a range
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1871 startc = *regparse++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1872 regc(startc);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1873 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1874 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1875 case CLASS_ALNUM:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1876 for (cu = 1; cu < 128; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1877 if (isalnum(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1878 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1879 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1880 case CLASS_ALPHA:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1881 for (cu = 1; cu < 128; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1882 if (isalpha(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1883 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1884 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1885 case CLASS_BLANK:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1886 regc(' ');
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1887 regc('\t');
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1888 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1889 case CLASS_CNTRL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1890 for (cu = 1; cu <= 127; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1891 if (iscntrl(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1892 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1893 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1894 case CLASS_DIGIT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1895 for (cu = 1; cu <= 127; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1896 if (VIM_ISDIGIT(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1897 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1898 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1899 case CLASS_GRAPH:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1900 for (cu = 1; cu <= 127; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1901 if (isgraph(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1902 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1903 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1904 case CLASS_LOWER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1905 for (cu = 1; cu <= 255; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1906 if (MB_ISLOWER(cu) && cu != 170
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1907 && cu != 186)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1908 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1909 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1910 case CLASS_PRINT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1911 for (cu = 1; cu <= 255; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1912 if (vim_isprintc(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1913 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1914 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1915 case CLASS_PUNCT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1916 for (cu = 1; cu < 128; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1917 if (ispunct(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1918 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1919 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1920 case CLASS_SPACE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1921 for (cu = 9; cu <= 13; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1922 regc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1923 regc(' ');
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1924 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1925 case CLASS_UPPER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1926 for (cu = 1; cu <= 255; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1927 if (MB_ISUPPER(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1928 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1929 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1930 case CLASS_XDIGIT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1931 for (cu = 1; cu <= 255; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1932 if (vim_isxdigit(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1933 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1934 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1935 case CLASS_TAB:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1936 regc('\t');
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1937 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1938 case CLASS_RETURN:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1939 regc('\r');
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1940 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1941 case CLASS_BACKSPACE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1942 regc('\b');
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1943 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1944 case CLASS_ESCAPE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1945 regc('\033');
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1946 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1947 case CLASS_IDENT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1948 for (cu = 1; cu <= 255; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1949 if (vim_isIDc(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1950 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1951 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1952 case CLASS_KEYWORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1953 for (cu = 1; cu <= 255; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1954 if (reg_iswordc(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1955 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1956 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1957 case CLASS_FNAME:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1958 for (cu = 1; cu <= 255; cu++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1959 if (vim_isfilec(cu))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1960 regmbc(cu);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1961 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1962 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1963 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1964 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1965 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1966 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1967 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1968 int len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1969
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1970 // produce a multibyte character, including any
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1971 // following composing characters
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1972 startc = mb_ptr2char(regparse);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1973 len = (*mb_ptr2len)(regparse);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1974 if (enc_utf8 && utf_char2len(startc) != len)
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1975 startc = -1; // composing chars
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1976 while (--len >= 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1977 regc(*regparse++);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1978 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1979 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1980 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1981 startc = *regparse++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1982 regc(startc);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1983 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1984 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1985 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1986 regc(NUL);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1987 prevchr_len = 1; // last char was the ']'
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1988 if (*regparse != ']')
26436 ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	1989 EMSG_RET_NULL(_(e_too_many_brackets)); // Cannot happen?
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1990 skipchr(); // let's be friends with the lexer again
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1991 *flagp \|= HASWIDTH \| SIMPLE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1992 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1993 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1994 else if (reg_strict)
26958 d92e0d85923f patch 8.2.4008: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26952 diff changeset	1995 EMSG2_RET_NULL(_(e_missing_rsb_after_str_lsb),
d92e0d85923f patch 8.2.4008: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26952 diff changeset	1996 reg_magic > MAGIC_OFF);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1997 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	1998 // FALLTHROUGH
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	1999
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2000 default:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2001 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2002 int len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2003
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2004 // A multi-byte character is handled as a separate atom if it's
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2005 // before a multi and when it's a composing char.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2006 if (use_multibytecode(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2007 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2008 do_multibyte:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2009 ret = regnode(MULTIBYTECODE);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2010 regmbc(c);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2011 *flagp \|= HASWIDTH \| SIMPLE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2012 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2013 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2014
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2015 ret = regnode(EXACTLY);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2016
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2017 // Append characters as long as:
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2018 // - there is no following multi, we then need the character in
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2019 // front of it as a single character operand
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2020 // - not running into a Magic character
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2021 // - "one_exactly" is not set
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2022 // But always emit at least one character. Might be a Multi,
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2023 // e.g., a "[" without matching "]".
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2024 for (len = 0; c != NUL && (len == 0
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2025 \|\| (re_multi_type(peekchr()) == NOT_MULTI
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2026 && !one_exactly
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2027 && !is_Magic(c))); ++len)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2028 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2029 c = no_Magic(c);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2030 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2031 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2032 regmbc(c);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2033 if (enc_utf8)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2034 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2035 int l;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2036
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2037 // Need to get composing character too.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2038 for (;;)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2039 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2040 l = utf_ptr2len(regparse);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2041 if (!UTF_COMPOSINGLIKE(regparse, regparse + l))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2042 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2043 regmbc(utf_ptr2char(regparse));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2044 skipchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2045 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2046 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2047 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2048 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2049 regc(c);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2050 c = getchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2051 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2052 ungetchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2053
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2054 regc(NUL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2055 *flagp \|= HASWIDTH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2056 if (len == 1)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2057 *flagp \|= SIMPLE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2058 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2059 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2060 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2061
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2062 return ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2063 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2064
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2065 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2066 * Parse something followed by possible [*+=].
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2067 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2068 * Note that the branching code sequences used for = and the general cases
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2069 * of * and + are somewhat optimized: they use the same NOTHING node as
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2070 * both the endmarker for their branch list and the body of the last branch.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2071 * It might seem that this node could be dispensed with entirely, but the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2072 * endmarker role is not redundant.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2073 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2074 static char_u *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2075 regpiece(int *flagp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2076 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2077 char_u *ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2078 int op;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2079 char_u *next;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2080 int flags;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2081 long minval;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2082 long maxval;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2083
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2084 ret = regatom(&flags);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2085 if (ret == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2086 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2087
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2088 op = peekchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2089 if (re_multi_type(op) == NOT_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2090 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2091 *flagp = flags;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2092 return ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2093 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2094 // default flags
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2095 *flagp = (WORST \| SPSTART \| (flags & (HASNL \| HASLOOKBH)));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2096
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2097 skipchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2098 switch (op)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2099 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2100 case Magic('*'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2101 if (flags & SIMPLE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2102 reginsert(STAR, ret);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2103 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2104 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2105 // Emit x* as (x&\|), where & means "self".
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2106 reginsert(BRANCH, ret); // Either x
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2107 regoptail(ret, regnode(BACK)); // and loop
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2108 regoptail(ret, ret); // back
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2109 regtail(ret, regnode(BRANCH)); // or
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2110 regtail(ret, regnode(NOTHING)); // null.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2111 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2112 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2113
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2114 case Magic('+'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2115 if (flags & SIMPLE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2116 reginsert(PLUS, ret);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2117 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2118 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2119 // Emit x+ as x(&\|), where & means "self".
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2120 next = regnode(BRANCH); // Either
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2121 regtail(ret, next);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2122 regtail(regnode(BACK), ret); // loop back
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2123 regtail(next, regnode(BRANCH)); // or
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2124 regtail(ret, regnode(NOTHING)); // null.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2125 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2126 *flagp = (WORST \| HASWIDTH \| (flags & (HASNL \| HASLOOKBH)));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2127 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2128
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2129 case Magic('@'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2130 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2131 int lop = END;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2132 long nr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2133
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2134 nr = getdecchrs();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2135 switch (no_Magic(getchr()))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2136 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2137 case '=': lop = MATCH; break; // \@=
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2138 case '!': lop = NOMATCH; break; // \@!
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2139 case '>': lop = SUBPAT; break; // \@>
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2140 case '<': switch (no_Magic(getchr()))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2141 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2142 case '=': lop = BEHIND; break; // \@<=
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2143 case '!': lop = NOBEHIND; break; // \@<!
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2144 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2145 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2146 if (lop == END)
25320 1e6da8364a02 patch 8.2.3197: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2147 EMSG2_RET_NULL(_(e_invalid_character_after_str_at),
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2148 reg_magic == MAGIC_ALL);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2149 // Look behind must match with behind_pos.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2150 if (lop == BEHIND \|\| lop == NOBEHIND)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2151 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2152 regtail(ret, regnode(BHPOS));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2153 *flagp \|= HASLOOKBH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2154 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2155 regtail(ret, regnode(END)); // operand ends
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2156 if (lop == BEHIND \|\| lop == NOBEHIND)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2157 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2158 if (nr < 0)
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2159 nr = 0; // no limit is same as zero limit
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2160 reginsert_nr(lop, nr, ret);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2161 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2162 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2163 reginsert(lop, ret);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2164 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2165 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2166
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2167 case Magic('?'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2168 case Magic('='):
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2169 // Emit x= as (x\|)
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2170 reginsert(BRANCH, ret); // Either x
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2171 regtail(ret, regnode(BRANCH)); // or
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2172 next = regnode(NOTHING); // null.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2173 regtail(ret, next);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2174 regoptail(ret, next);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2175 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2176
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2177 case Magic('{'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2178 if (!read_limits(&minval, &maxval))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2179 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2180 if (flags & SIMPLE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2181 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2182 reginsert(BRACE_SIMPLE, ret);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2183 reginsert_limits(BRACE_LIMITS, minval, maxval, ret);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2184 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2185 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2186 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2187 if (num_complex_braces >= 10)
25320 1e6da8364a02 patch 8.2.3197: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2188 EMSG2_RET_NULL(_(e_too_many_complex_str_curly),
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2189 reg_magic == MAGIC_ALL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2190 reginsert(BRACE_COMPLEX + num_complex_braces, ret);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2191 regoptail(ret, regnode(BACK));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2192 regoptail(ret, ret);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2193 reginsert_limits(BRACE_LIMITS, minval, maxval, ret);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2194 ++num_complex_braces;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2195 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2196 if (minval > 0 && maxval > 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2197 *flagp = (HASWIDTH \| (flags & (HASNL \| HASLOOKBH)));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2198 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2199 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2200 if (re_multi_type(peekchr()) != NOT_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2201 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2202 // Can't have a multi follow a multi.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2203 if (peekchr() == Magic('*'))
26436 ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	2204 EMSG2_RET_NULL(_(e_nested_str), reg_magic >= MAGIC_ON);
ef0c07cbf53f patch 8.2.3749: error messages are everywhere Bram Moolenaar <Bram@vim.org> parents: 25320 diff changeset	2205 EMSG3_RET_NULL(_(e_nested_str_chr), reg_magic == MAGIC_ALL,
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2206 no_Magic(peekchr()));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2207 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2208
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2209 return ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2210 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2211
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2212 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2213 * Parse one alternative of an \| or & operator.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2214 * Implements the concatenation operator.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2215 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2216 static char_u *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2217 regconcat(int *flagp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2218 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2219 char_u *first = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2220 char_u *chain = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2221 char_u *latest;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2222 int flags;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2223 int cont = TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2224
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2225 *flagp = WORST; // Tentatively.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2226
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2227 while (cont)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2228 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2229 switch (peekchr())
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2230 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2231 case NUL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2232 case Magic('\|'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2233 case Magic('&'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2234 case Magic(')'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2235 cont = FALSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2236 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2237 case Magic('Z'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2238 regflags \|= RF_ICOMBINE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2239 skipchr_keepstart();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2240 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2241 case Magic('c'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2242 regflags \|= RF_ICASE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2243 skipchr_keepstart();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2244 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2245 case Magic('C'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2246 regflags \|= RF_NOICASE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2247 skipchr_keepstart();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2248 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2249 case Magic('v'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2250 reg_magic = MAGIC_ALL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2251 skipchr_keepstart();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2252 curchr = -1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2253 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2254 case Magic('m'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2255 reg_magic = MAGIC_ON;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2256 skipchr_keepstart();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2257 curchr = -1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2258 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2259 case Magic('M'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2260 reg_magic = MAGIC_OFF;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2261 skipchr_keepstart();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2262 curchr = -1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2263 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2264 case Magic('V'):
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2265 reg_magic = MAGIC_NONE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2266 skipchr_keepstart();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2267 curchr = -1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2268 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2269 default:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2270 latest = regpiece(&flags);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2271 if (latest == NULL \|\| reg_toolong)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2272 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2273 *flagp \|= flags & (HASWIDTH \| HASNL \| HASLOOKBH);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2274 if (chain == NULL) // First piece.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2275 *flagp \|= flags & SPSTART;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2276 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2277 regtail(chain, latest);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2278 chain = latest;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2279 if (first == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2280 first = latest;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2281 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2282 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2283 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2284 if (first == NULL) // Loop ran zero times.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2285 first = regnode(NOTHING);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2286 return first;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2287 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2288
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2289 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2290 * Parse one alternative of an \| operator.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2291 * Implements the & operator.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2292 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2293 static char_u *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2294 regbranch(int *flagp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2295 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2296 char_u *ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2297 char_u *chain = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2298 char_u *latest;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2299 int flags;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2300
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2301 *flagp = WORST \| HASNL; // Tentatively.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2302
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2303 ret = regnode(BRANCH);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2304 for (;;)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2305 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2306 latest = regconcat(&flags);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2307 if (latest == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2308 return NULL;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2309 // If one of the branches has width, the whole thing has. If one of
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2310 // the branches anchors at start-of-line, the whole thing does.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2311 // If one of the branches uses look-behind, the whole thing does.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2312 *flagp \|= flags & (HASWIDTH \| SPSTART \| HASLOOKBH);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2313 // If one of the branches doesn't match a line-break, the whole thing
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2314 // doesn't.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2315 *flagp &= ~HASNL \| (flags & HASNL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2316 if (chain != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2317 regtail(chain, latest);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2318 if (peekchr() != Magic('&'))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2319 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2320 skipchr();
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2321 regtail(latest, regnode(END)); // operand ends
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2322 if (reg_toolong)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2323 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2324 reginsert(MATCH, latest);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2325 chain = latest;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2326 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2327
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2328 return ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2329 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2330
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2331 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2332 * Parse regular expression, i.e. main body or parenthesized thing.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2333 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2334 * Caller must absorb opening parenthesis.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2335 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2336 * Combining parenthesis handling with the base level of regular expression
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2337 * is a trifle forced, but the need to tie the tails of the branches to what
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2338 * follows makes it hard to avoid.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2339 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2340 static char_u *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2341 reg(
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2342 int paren, // REG_NOPAREN, REG_PAREN, REG_NPAREN or REG_ZPAREN
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2343 int *flagp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2344 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2345 char_u *ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2346 char_u *br;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2347 char_u *ender;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2348 int parno = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2349 int flags;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2350
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2351 *flagp = HASWIDTH; // Tentatively.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2352
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2353 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2354 if (paren == REG_ZPAREN)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2355 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2356 // Make a ZOPEN node.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2357 if (regnzpar >= NSUBEXP)
25320 1e6da8364a02 patch 8.2.3197: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2358 EMSG_RET_NULL(_(e_too_many_z));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2359 parno = regnzpar;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2360 regnzpar++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2361 ret = regnode(ZOPEN + parno);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2362 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2363 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2364 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2365 if (paren == REG_PAREN)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2366 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2367 // Make a MOPEN node.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2368 if (regnpar >= NSUBEXP)
25320 1e6da8364a02 patch 8.2.3197: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2369 EMSG2_RET_NULL(_(e_too_many_str_open), reg_magic == MAGIC_ALL);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2370 parno = regnpar;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2371 ++regnpar;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2372 ret = regnode(MOPEN + parno);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2373 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2374 else if (paren == REG_NPAREN)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2375 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2376 // Make a NOPEN node.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2377 ret = regnode(NOPEN);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2378 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2379 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2380 ret = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2381
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2382 // Pick up the branches, linking them together.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2383 br = regbranch(&flags);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2384 if (br == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2385 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2386 if (ret != NULL)
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2387 regtail(ret, br); // [MZ]OPEN -> first.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2388 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2389 ret = br;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2390 // If one of the branches can be zero-width, the whole thing can.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2391 // If one of the branches has * at start or matches a line-break, the
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2392 // whole thing can.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2393 if (!(flags & HASWIDTH))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2394 *flagp &= ~HASWIDTH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2395 *flagp \|= flags & (SPSTART \| HASNL \| HASLOOKBH);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2396 while (peekchr() == Magic('\|'))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2397 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2398 skipchr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2399 br = regbranch(&flags);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2400 if (br == NULL \|\| reg_toolong)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2401 return NULL;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2402 regtail(ret, br); // BRANCH -> BRANCH.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2403 if (!(flags & HASWIDTH))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2404 *flagp &= ~HASWIDTH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2405 *flagp \|= flags & (SPSTART \| HASNL \| HASLOOKBH);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2406 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2407
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2408 // Make a closing node, and hook it on the end.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2409 ender = regnode(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2410 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2411 paren == REG_ZPAREN ? ZCLOSE + parno :
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2412 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2413 paren == REG_PAREN ? MCLOSE + parno :
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2414 paren == REG_NPAREN ? NCLOSE : END);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2415 regtail(ret, ender);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2416
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2417 // Hook the tails of the branches to the closing node.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2418 for (br = ret; br != NULL; br = regnext(br))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2419 regoptail(br, ender);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2420
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2421 // Check for proper termination.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2422 if (paren != REG_NOPAREN && getchr() != Magic(')'))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2423 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2424 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2425 if (paren == REG_ZPAREN)
25320 1e6da8364a02 patch 8.2.3197: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2426 EMSG_RET_NULL(_(e_unmatched_z));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2427 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2428 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2429 if (paren == REG_NPAREN)
25320 1e6da8364a02 patch 8.2.3197: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2430 EMSG2_RET_NULL(_(e_unmatched_str_percent_open), reg_magic == MAGIC_ALL);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2431 else
25320 1e6da8364a02 patch 8.2.3197: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2432 EMSG2_RET_NULL(_(e_unmatched_str_open), reg_magic == MAGIC_ALL);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2433 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2434 else if (paren == REG_NOPAREN && peekchr() != NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2435 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2436 if (curchr == Magic(')'))
25320 1e6da8364a02 patch 8.2.3197: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25306 diff changeset	2437 EMSG2_RET_NULL(_(e_unmatched_str_close), reg_magic == MAGIC_ALL);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2438 else
26883 7f150a4936f2 patch 8.2.3970: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26867 diff changeset	2439 EMSG_RET_NULL(_(e_trailing_characters)); // "Can't happen".
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2440 // NOTREACHED
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2441 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2442 // Here we set the flag allowing back references to this set of
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2443 // parentheses.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2444 if (paren == REG_PAREN)
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2445 had_endbrace[parno] = TRUE; // have seen the close paren
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2446 return ret;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2447 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2448
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2449 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2450 * bt_regcomp() - compile a regular expression into internal code for the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2451 * traditional back track matcher.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2452 * Returns the program in allocated space. Returns NULL for an error.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2453 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2454 * We can't allocate space until we know how big the compiled form will be,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2455 * but we can't compile it (and thus know how big it is) until we've got a
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2456 * place to put the code. So we cheat: we compile it twice, once with code
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2457 * generation turned off and size counting turned on, and once "for real".
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2458 * This also means that we don't allocate space until we are sure that the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2459 * thing really will compile successfully, and we never have to move the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2460 * code and thus invalidate pointers into it. (Note that it has to be in
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2461 * one piece because vim_free() must be able to free it all.)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2462 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2463 * Whether upper/lower case is to be ignored is decided when executing the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2464 * program, it does not matter here.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2465 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2466 * Beware that the optimization-preparation code in here knows about some
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2467 * of the structure of the compiled regexp.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2468 * "re_flags": RE_MAGIC and/or RE_STRING.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2469 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2470 static regprog_T *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2471 bt_regcomp(char_u *expr, int re_flags)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2472 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2473 bt_regprog_T *r;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2474 char_u *scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2475 char_u *longest;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2476 int len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2477 int flags;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2478
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2479 if (expr == NULL)
25306 078edc1821bf patch 8.2.3190: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25147 diff changeset	2480 IEMSG_RET_NULL(_(e_null_argument));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2481
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2482 init_class_tab();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2483
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2484 // First pass: determine size, legality.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2485 regcomp_start(expr, re_flags);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2486 regcode = JUST_CALC_SIZE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2487 regc(REGMAGIC);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2488 if (reg(REG_NOPAREN, &flags) == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2489 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2490
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2491 // Allocate space.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2492 r = alloc(offsetof(bt_regprog_T, program) + regsize);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2493 if (r == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2494 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2495 r->re_in_use = FALSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2496
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2497 // Second pass: emit code.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2498 regcomp_start(expr, re_flags);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2499 regcode = r->program;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2500 regc(REGMAGIC);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2501 if (reg(REG_NOPAREN, &flags) == NULL \|\| reg_toolong)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2502 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2503 vim_free(r);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2504 if (reg_toolong)
26909 aa65d1808bd0 patch 8.2.3983: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26883 diff changeset	2505 EMSG_RET_NULL(_(e_pattern_too_long));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2506 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2507 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2508
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2509 // Dig out information for optimizations.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2510 r->regstart = NUL; // Worst-case defaults.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2511 r->reganch = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2512 r->regmust = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2513 r->regmlen = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2514 r->regflags = regflags;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2515 if (flags & HASNL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2516 r->regflags \|= RF_HASNL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2517 if (flags & HASLOOKBH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2518 r->regflags \|= RF_LOOKBH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2519 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2520 // Remember whether this pattern has any \z specials in it.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2521 r->reghasz = re_has_z;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2522 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2523 scan = r->program + 1; // First BRANCH.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2524 if (OP(regnext(scan)) == END) // Only one top-level choice.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2525 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2526 scan = OPERAND(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2527
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2528 // Starting-point info.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2529 if (OP(scan) == BOL \|\| OP(scan) == RE_BOF)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2530 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2531 r->reganch++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2532 scan = regnext(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2533 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2534
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2535 if (OP(scan) == EXACTLY)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2536 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2537 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2538 r->regstart = (*mb_ptr2char)(OPERAND(scan));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2539 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2540 r->regstart = *OPERAND(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2541 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2542 else if ((OP(scan) == BOW
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2543 \|\| OP(scan) == EOW
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2544 \|\| OP(scan) == NOTHING
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2545 \|\| OP(scan) == MOPEN + 0 \|\| OP(scan) == NOPEN
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2546 \|\| OP(scan) == MCLOSE + 0 \|\| OP(scan) == NCLOSE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2547 && OP(regnext(scan)) == EXACTLY)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2548 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2549 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2550 r->regstart = (*mb_ptr2char)(OPERAND(regnext(scan)));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2551 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2552 r->regstart = *OPERAND(regnext(scan));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2553 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2554
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2555 // If there's something expensive in the r.e., find the longest
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2556 // literal string that must appear and make it the regmust. Resolve
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2557 // ties in favor of later strings, since the regstart check works
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2558 // with the beginning of the r.e. and avoiding duplication
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2559 // strengthens checking. Not a strong reason, but sufficient in the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2560 // absence of others.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2561
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2562 // When the r.e. starts with BOW, it is faster to look for a regmust
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2563 // first. Used a lot for "#" and "*" commands. (Added by mool).
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2564 if ((flags & SPSTART \|\| OP(scan) == BOW \|\| OP(scan) == EOW)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2565 && !(flags & HASNL))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2566 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2567 longest = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2568 len = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2569 for (; scan != NULL; scan = regnext(scan))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2570 if (OP(scan) == EXACTLY && STRLEN(OPERAND(scan)) >= (size_t)len)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2571 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2572 longest = OPERAND(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2573 len = (int)STRLEN(OPERAND(scan));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2574 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2575 r->regmust = longest;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2576 r->regmlen = len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2577 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2578 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2579 #ifdef BT_REGEXP_DUMP
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2580 regdump(expr, r);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2581 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2582 r->engine = &bt_regengine;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2583 return (regprog_T *)r;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2584 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2585
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2586 #if defined(FEAT_SYN_HL) \|\| defined(PROTO)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2587 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2588 * Check if during the previous call to vim_regcomp the EOL item "$" has been
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2589 * found. This is messy, but it works fine.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2590 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2591 int
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2592 vim_regcomp_had_eol(void)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2593 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2594 return had_eol;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2595 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2596 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2597
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2598 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2599 * Get a number after a backslash that is inside [].
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2600 * When nothing is recognized return a backslash.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2601 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2602 static int
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2603 coll_get_char(void)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2604 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2605 long nr = -1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2606
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2607 switch (*regparse++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2608 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2609 case 'd': nr = getdecchrs(); break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2610 case 'o': nr = getoctchrs(); break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2611 case 'x': nr = gethexchrs(2); break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2612 case 'u': nr = gethexchrs(4); break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2613 case 'U': nr = gethexchrs(8); break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2614 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2615 if (nr < 0 \|\| nr > INT_MAX)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2616 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2617 // If getting the number fails be backwards compatible: the character
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2618 // is a backslash.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2619 --regparse;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2620 nr = '\\';
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2621 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2622 return nr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2623 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2624
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2625 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2626 * Free a compiled regexp program, returned by bt_regcomp().
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2627 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2628 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2629 bt_regfree(regprog_T *prog)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2630 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2631 vim_free(prog);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2632 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2633
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2634 #define ADVANCE_REGINPUT() MB_PTR_ADV(rex.input)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2635
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2636 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2637 * The arguments from BRACE_LIMITS are stored here. They are actually local
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2638 * to regmatch(), but they are here to reduce the amount of stack space used
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2639 * (it can be called recursively many times).
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2640 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2641 static long bl_minval;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2642 static long bl_maxval;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2643
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2644 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2645 * Save the input line and position in a regsave_T.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2646 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2647 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2648 reg_save(regsave_T save, garray_T gap)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2649 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2650 if (REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2651 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2652 save->rs_u.pos.col = (colnr_T)(rex.input - rex.line);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2653 save->rs_u.pos.lnum = rex.lnum;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2654 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2655 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2656 save->rs_u.ptr = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2657 save->rs_len = gap->ga_len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2658 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2659
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2660 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2661 * Restore the input line and position from a regsave_T.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2662 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2663 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2664 reg_restore(regsave_T save, garray_T gap)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2665 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2666 if (REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2667 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2668 if (rex.lnum != save->rs_u.pos.lnum)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2669 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2670 // only call reg_getline() when the line number changed to save
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2671 // a bit of time
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2672 rex.lnum = save->rs_u.pos.lnum;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2673 rex.line = reg_getline(rex.lnum);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2674 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2675 rex.input = rex.line + save->rs_u.pos.col;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2676 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2677 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2678 rex.input = save->rs_u.ptr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2679 gap->ga_len = save->rs_len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2680 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2681
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2682 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2683 * Return TRUE if current position is equal to saved position.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2684 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2685 static int
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2686 reg_save_equal(regsave_T *save)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2687 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2688 if (REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2689 return rex.lnum == save->rs_u.pos.lnum
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2690 && rex.input == rex.line + save->rs_u.pos.col;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2691 return rex.input == save->rs_u.ptr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2692 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2693
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2694 // Save the sub-expressions before attempting a match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2695 #define save_se(savep, posp, pp) \
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2696 REG_MULTI ? save_se_multi((savep), (posp)) : save_se_one((savep), (pp))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2697
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2698 // After a failed match restore the sub-expressions.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2699 #define restore_se(savep, posp, pp) { \
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2700 if (REG_MULTI) \
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2701 *(posp) = (savep)->se_u.pos; \
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2702 else \
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2703 *(pp) = (savep)->se_u.ptr; }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2704
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2705 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2706 * Tentatively set the sub-expression start to the current position (after
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2707 * calling regmatch() they will have changed). Need to save the existing
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2708 * values for when there is no match.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2709 * Use se_save() to use pointer (save_se_multi()) or position (save_se_one()),
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2710 * depending on REG_MULTI.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2711 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2712 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2713 save_se_multi(save_se_T savep, lpos_T posp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2714 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2715 savep->se_u.pos = *posp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2716 posp->lnum = rex.lnum;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2717 posp->col = (colnr_T)(rex.input - rex.line);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2718 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2719
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2720 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2721 save_se_one(save_se_T savep, char_u *pp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2722 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2723 savep->se_u.ptr = *pp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2724 *pp = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2725 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2726
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2727 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2728 * regrepeat - repeatedly match something simple, return how many.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2729 * Advances rex.input (and rex.lnum) to just after the matched chars.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2730 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2731 static int
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2732 regrepeat(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2733 char_u *p,
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2734 long maxcount) // maximum number of matches allowed
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2735 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2736 long count = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2737 char_u *scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2738 char_u *opnd;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2739 int mask;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2740 int testval = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2741
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2742 scan = rex.input; // Make local copy of rex.input for speed.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2743 opnd = OPERAND(p);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2744 switch (OP(p))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2745 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2746 case ANY:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2747 case ANY + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2748 while (count < maxcount)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2749 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2750 // Matching anything means we continue until end-of-line (or
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2751 // end-of-file for ANY + ADD_NL), only limited by maxcount.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2752 while (*scan != NUL && count < maxcount)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2753 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2754 ++count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2755 MB_PTR_ADV(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2756 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2757 if (!REG_MULTI \|\| !WITH_NL(OP(p)) \|\| rex.lnum > rex.reg_maxline
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2758 \|\| rex.reg_line_lbr \|\| count == maxcount)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2759 break;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2760 ++count; // count the line-break
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2761 reg_nextline();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2762 scan = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2763 if (got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2764 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2765 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2766 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2767
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2768 case IDENT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2769 case IDENT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2770 testval = TRUE;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2771 // FALLTHROUGH
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2772 case SIDENT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2773 case SIDENT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2774 while (count < maxcount)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2775 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2776 if (vim_isIDc(PTR2CHAR(scan)) && (testval \|\| !VIM_ISDIGIT(*scan)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2777 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2778 MB_PTR_ADV(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2779 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2780 else if (*scan == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2781 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2782 if (!REG_MULTI \|\| !WITH_NL(OP(p)) \|\| rex.lnum > rex.reg_maxline
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2783 \|\| rex.reg_line_lbr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2784 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2785 reg_nextline();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2786 scan = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2787 if (got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2788 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2789 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2790 else if (rex.reg_line_lbr && *scan == '\n' && WITH_NL(OP(p)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2791 ++scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2792 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2793 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2794 ++count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2795 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2796 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2797
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2798 case KWORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2799 case KWORD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2800 testval = TRUE;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2801 // FALLTHROUGH
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2802 case SKWORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2803 case SKWORD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2804 while (count < maxcount)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2805 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2806 if (vim_iswordp_buf(scan, rex.reg_buf)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2807 && (testval \|\| !VIM_ISDIGIT(*scan)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2808 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2809 MB_PTR_ADV(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2810 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2811 else if (*scan == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2812 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2813 if (!REG_MULTI \|\| !WITH_NL(OP(p)) \|\| rex.lnum > rex.reg_maxline
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2814 \|\| rex.reg_line_lbr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2815 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2816 reg_nextline();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2817 scan = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2818 if (got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2819 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2820 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2821 else if (rex.reg_line_lbr && *scan == '\n' && WITH_NL(OP(p)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2822 ++scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2823 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2824 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2825 ++count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2826 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2827 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2828
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2829 case FNAME:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2830 case FNAME + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2831 testval = TRUE;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2832 // FALLTHROUGH
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2833 case SFNAME:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2834 case SFNAME + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2835 while (count < maxcount)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2836 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2837 if (vim_isfilec(PTR2CHAR(scan)) && (testval \|\| !VIM_ISDIGIT(*scan)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2838 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2839 MB_PTR_ADV(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2840 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2841 else if (*scan == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2842 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2843 if (!REG_MULTI \|\| !WITH_NL(OP(p)) \|\| rex.lnum > rex.reg_maxline
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2844 \|\| rex.reg_line_lbr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2845 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2846 reg_nextline();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2847 scan = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2848 if (got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2849 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2850 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2851 else if (rex.reg_line_lbr && *scan == '\n' && WITH_NL(OP(p)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2852 ++scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2853 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2854 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2855 ++count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2856 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2857 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2858
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2859 case PRINT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2860 case PRINT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2861 testval = TRUE;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2862 // FALLTHROUGH
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2863 case SPRINT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2864 case SPRINT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2865 while (count < maxcount)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2866 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2867 if (*scan == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2868 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2869 if (!REG_MULTI \|\| !WITH_NL(OP(p)) \|\| rex.lnum > rex.reg_maxline
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2870 \|\| rex.reg_line_lbr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2871 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2872 reg_nextline();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2873 scan = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2874 if (got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2875 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2876 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2877 else if (vim_isprintc(PTR2CHAR(scan)) == 1
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2878 && (testval \|\| !VIM_ISDIGIT(*scan)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2879 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2880 MB_PTR_ADV(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2881 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2882 else if (rex.reg_line_lbr && *scan == '\n' && WITH_NL(OP(p)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2883 ++scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2884 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2885 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2886 ++count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2887 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2888 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2889
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2890 case WHITE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2891 case WHITE + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2892 testval = mask = RI_WHITE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2893 do_class:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2894 while (count < maxcount)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2895 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2896 int l;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2897
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2898 if (*scan == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2899 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2900 if (!REG_MULTI \|\| !WITH_NL(OP(p)) \|\| rex.lnum > rex.reg_maxline
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2901 \|\| rex.reg_line_lbr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2902 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2903 reg_nextline();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2904 scan = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2905 if (got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2906 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2907 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2908 else if (has_mbyte && (l = (*mb_ptr2len)(scan)) > 1)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2909 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2910 if (testval != 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2911 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2912 scan += l;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2913 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2914 else if ((class_tab[*scan] & mask) == testval)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2915 ++scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2916 else if (rex.reg_line_lbr && *scan == '\n' && WITH_NL(OP(p)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2917 ++scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2918 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2919 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2920 ++count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2921 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2922 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2923
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2924 case NWHITE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2925 case NWHITE + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2926 mask = RI_WHITE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2927 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2928 case DIGIT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2929 case DIGIT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2930 testval = mask = RI_DIGIT;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2931 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2932 case NDIGIT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2933 case NDIGIT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2934 mask = RI_DIGIT;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2935 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2936 case HEX:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2937 case HEX + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2938 testval = mask = RI_HEX;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2939 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2940 case NHEX:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2941 case NHEX + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2942 mask = RI_HEX;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2943 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2944 case OCTAL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2945 case OCTAL + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2946 testval = mask = RI_OCTAL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2947 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2948 case NOCTAL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2949 case NOCTAL + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2950 mask = RI_OCTAL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2951 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2952 case WORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2953 case WORD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2954 testval = mask = RI_WORD;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2955 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2956 case NWORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2957 case NWORD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2958 mask = RI_WORD;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2959 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2960 case HEAD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2961 case HEAD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2962 testval = mask = RI_HEAD;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2963 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2964 case NHEAD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2965 case NHEAD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2966 mask = RI_HEAD;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2967 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2968 case ALPHA:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2969 case ALPHA + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2970 testval = mask = RI_ALPHA;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2971 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2972 case NALPHA:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2973 case NALPHA + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2974 mask = RI_ALPHA;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2975 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2976 case LOWER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2977 case LOWER + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2978 testval = mask = RI_LOWER;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2979 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2980 case NLOWER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2981 case NLOWER + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2982 mask = RI_LOWER;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2983 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2984 case UPPER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2985 case UPPER + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2986 testval = mask = RI_UPPER;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2987 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2988 case NUPPER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2989 case NUPPER + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2990 mask = RI_UPPER;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2991 goto do_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2992
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2993 case EXACTLY:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2994 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2995 int cu, cl;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	2996
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2997 // This doesn't do a multi-byte character, because a MULTIBYTECODE
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2998 // would have been used for it. It does handle single-byte
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	2999 // characters, such as latin1.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3000 if (rex.reg_ic)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3001 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3002 cu = MB_TOUPPER(*opnd);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3003 cl = MB_TOLOWER(*opnd);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3004 while (count < maxcount && (scan == cu \|\| scan == cl))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3005 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3006 count++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3007 scan++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3008 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3009 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3010 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3011 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3012 cu = *opnd;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3013 while (count < maxcount && *scan == cu)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3014 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3015 count++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3016 scan++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3017 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3018 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3019 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3020 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3021
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3022 case MULTIBYTECODE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3023 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3024 int i, len, cf = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3025
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3026 // Safety check (just in case 'encoding' was changed since
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3027 // compiling the program).
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3028 if ((len = (*mb_ptr2len)(opnd)) > 1)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3029 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3030 if (rex.reg_ic && enc_utf8)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3031 cf = utf_fold(utf_ptr2char(opnd));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3032 while (count < maxcount && (*mb_ptr2len)(scan) >= len)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3033 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3034 for (i = 0; i < len; ++i)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3035 if (opnd[i] != scan[i])
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3036 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3037 if (i < len && (!rex.reg_ic \|\| !enc_utf8
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3038 \|\| utf_fold(utf_ptr2char(scan)) != cf))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3039 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3040 scan += len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3041 ++count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3042 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3043 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3044 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3045 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3046
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3047 case ANYOF:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3048 case ANYOF + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3049 testval = TRUE;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3050 // FALLTHROUGH
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3051
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3052 case ANYBUT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3053 case ANYBUT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3054 while (count < maxcount)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3055 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3056 int len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3057
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3058 if (*scan == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3059 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3060 if (!REG_MULTI \|\| !WITH_NL(OP(p)) \|\| rex.lnum > rex.reg_maxline
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3061 \|\| rex.reg_line_lbr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3062 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3063 reg_nextline();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3064 scan = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3065 if (got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3066 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3067 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3068 else if (rex.reg_line_lbr && *scan == '\n' && WITH_NL(OP(p)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3069 ++scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3070 else if (has_mbyte && (len = (*mb_ptr2len)(scan)) > 1)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3071 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3072 if ((cstrchr(opnd, (*mb_ptr2char)(scan)) == NULL) == testval)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3073 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3074 scan += len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3075 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3076 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3077 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3078 if ((cstrchr(opnd, *scan) == NULL) == testval)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3079 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3080 ++scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3081 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3082 ++count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3083 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3084 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3085
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3086 case NEWL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3087 while (count < maxcount
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3088 && ((*scan == NUL && rex.lnum <= rex.reg_maxline
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3089 && !rex.reg_line_lbr && REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3090 \|\| (*scan == '\n' && rex.reg_line_lbr)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3091 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3092 count++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3093 if (rex.reg_line_lbr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3094 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3095 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3096 reg_nextline();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3097 scan = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3098 if (got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3099 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3100 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3101 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3102
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3103 default: // Oh dear. Called inappropriately.
25306 078edc1821bf patch 8.2.3190: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25147 diff changeset	3104 iemsg(_(e_corrupted_regexp_program));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3105 #ifdef DEBUG
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3106 printf("Called regrepeat with op code %d\n", OP(p));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3107 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3108 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3109 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3110
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3111 rex.input = scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3112
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3113 return (int)count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3114 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3115
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3116 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3117 * Push an item onto the regstack.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3118 * Returns pointer to new item. Returns NULL when out of memory.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3119 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3120 static regitem_T *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3121 regstack_push(regstate_T state, char_u *scan)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3122 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3123 regitem_T *rp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3124
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3125 if ((long)((unsigned)regstack.ga_len >> 10) >= p_mmp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3126 {
26883 7f150a4936f2 patch 8.2.3970: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26867 diff changeset	3127 emsg(_(e_pattern_uses_more_memory_than_maxmempattern));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3128 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3129 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3130 if (ga_grow(&regstack, sizeof(regitem_T)) == FAIL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3131 return NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3132
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3133 rp = (regitem_T )((char )regstack.ga_data + regstack.ga_len);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3134 rp->rs_state = state;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3135 rp->rs_scan = scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3136
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3137 regstack.ga_len += sizeof(regitem_T);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3138 return rp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3139 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3140
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3141 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3142 * Pop an item from the regstack.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3143 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3144 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3145 regstack_pop(char_u **scan)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3146 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3147 regitem_T *rp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3148
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3149 rp = (regitem_T )((char )regstack.ga_data + regstack.ga_len) - 1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3150 *scan = rp->rs_scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3151
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3152 regstack.ga_len -= sizeof(regitem_T);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3153 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3154
29191 0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3155 #ifdef FEAT_RELTIME
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3156 /*
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3157 * Check if the timer expired, return TRUE if so.
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3158 */
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3159 static int
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3160 bt_did_time_out(int *timed_out)
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3161 {
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3162 if (*timeout_flag)
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3163 {
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3164 if (timed_out != NULL)
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3165 {
29237 c7aa0c46acd5 patch 8.2.5137: cannot build without the +channel feature Bram Moolenaar <Bram@vim.org> parents: 29191 diff changeset	3166 # ifdef FEAT_JOB_CHANNEL
29191 0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3167 if (!*timed_out)
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3168 ch_log(NULL, "BT regexp timed out");
29237 c7aa0c46acd5 patch 8.2.5137: cannot build without the +channel feature Bram Moolenaar <Bram@vim.org> parents: 29191 diff changeset	3169 # endif
29191 0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3170 *timed_out = TRUE;
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3171 }
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3172 return TRUE;
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3173 }
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3174 return FALSE;
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3175 }
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3176 #endif
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3177
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3178 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3179 * Save the current subexpr to "bp", so that they can be restored
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3180 * later by restore_subexpr().
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3181 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3182 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3183 save_subexpr(regbehind_T *bp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3184 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3185 int i;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3186
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3187 // When "rex.need_clear_subexpr" is set we don't need to save the values,
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3188 // only remember that this flag needs to be set again when restoring.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3189 bp->save_need_clear_subexpr = rex.need_clear_subexpr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3190 if (!rex.need_clear_subexpr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3191 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3192 for (i = 0; i < NSUBEXP; ++i)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3193 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3194 if (REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3195 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3196 bp->save_start[i].se_u.pos = rex.reg_startpos[i];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3197 bp->save_end[i].se_u.pos = rex.reg_endpos[i];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3198 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3199 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3200 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3201 bp->save_start[i].se_u.ptr = rex.reg_startp[i];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3202 bp->save_end[i].se_u.ptr = rex.reg_endp[i];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3203 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3204 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3205 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3206 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3207
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3208 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3209 * Restore the subexpr from "bp".
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3210 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3211 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3212 restore_subexpr(regbehind_T *bp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3213 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3214 int i;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3215
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3216 // Only need to restore saved values when they are not to be cleared.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3217 rex.need_clear_subexpr = bp->save_need_clear_subexpr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3218 if (!rex.need_clear_subexpr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3219 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3220 for (i = 0; i < NSUBEXP; ++i)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3221 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3222 if (REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3223 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3224 rex.reg_startpos[i] = bp->save_start[i].se_u.pos;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3225 rex.reg_endpos[i] = bp->save_end[i].se_u.pos;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3226 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3227 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3228 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3229 rex.reg_startp[i] = bp->save_start[i].se_u.ptr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3230 rex.reg_endp[i] = bp->save_end[i].se_u.ptr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3231 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3232 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3233 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3234 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3235
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3236 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3237 * regmatch - main matching routine
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3238 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3239 * Conceptually the strategy is simple: Check to see whether the current node
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3240 * matches, push an item onto the regstack and loop to see whether the rest
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3241 * matches, and then act accordingly. In practice we make some effort to
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3242 * avoid using the regstack, in particular by going through "ordinary" nodes
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3243 * (that don't need to know whether the rest of the match failed) by a nested
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3244 * loop.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3245 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3246 * Returns TRUE when there is a match. Leaves rex.input and rex.lnum just after
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3247 * the last matched character.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3248 * Returns FALSE when there is no match. Leaves rex.input and rex.lnum in an
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3249 * undefined state!
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3250 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3251 static int
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3252 regmatch(
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3253 char_u *scan, // Current node.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3254 int *timed_out UNUSED) // flag set on timeout or NULL
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3255 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3256 char_u *next; // Next node.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3257 int op;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3258 int c;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3259 regitem_T *rp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3260 int no;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3261 int status; // one of the RA_ values:
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3262
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3263 // Make "regstack" and "backpos" empty. They are allocated and freed in
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3264 // bt_regexec_both() to reduce malloc()/free() calls.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3265 regstack.ga_len = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3266 backpos.ga_len = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3267
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3268 // Repeat until "regstack" is empty.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3269 for (;;)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3270 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3271 // Some patterns may take a long time to match, e.g., "$[a-z]\+$\+Q".
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3272 // Allow interrupting them with CTRL-C.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3273 fast_breakcheck();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3274
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3275 #ifdef DEBUG
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3276 if (scan != NULL && regnarrate)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3277 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3278 mch_errmsg((char *)regprop(scan));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3279 mch_errmsg("(\n");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3280 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3281 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3282
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3283 // Repeat for items that can be matched sequentially, without using the
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3284 // regstack.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3285 for (;;)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3286 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3287 if (got_int \|\| scan == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3288 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3289 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3290 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3291 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3292 #ifdef FEAT_RELTIME
29191 0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	3293 if (bt_did_time_out(timed_out))
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3294 {
29071 b90bca860b5a patch 8.2.5057: using gettimeofday() for timeout is very inefficient Bram Moolenaar <Bram@vim.org> parents: 29012 diff changeset	3295 status = RA_FAIL;
b90bca860b5a patch 8.2.5057: using gettimeofday() for timeout is very inefficient Bram Moolenaar <Bram@vim.org> parents: 29012 diff changeset	3296 break;
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3297 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3298 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3299 status = RA_CONT;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3300
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3301 #ifdef DEBUG
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3302 if (regnarrate)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3303 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3304 mch_errmsg((char *)regprop(scan));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3305 mch_errmsg("...\n");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3306 # ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3307 if (re_extmatch_in != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3308 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3309 int i;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3310
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3311 mch_errmsg(_("External submatches:\n"));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3312 for (i = 0; i < NSUBEXP; i++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3313 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3314 mch_errmsg(" \"");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3315 if (re_extmatch_in->matches[i] != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3316 mch_errmsg((char *)re_extmatch_in->matches[i]);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3317 mch_errmsg("\"\n");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3318 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3319 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3320 # endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3321 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3322 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3323 next = regnext(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3324
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3325 op = OP(scan);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3326 // Check for character class with NL added.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3327 if (!rex.reg_line_lbr && WITH_NL(op) && REG_MULTI
29071 b90bca860b5a patch 8.2.5057: using gettimeofday() for timeout is very inefficient Bram Moolenaar <Bram@vim.org> parents: 29012 diff changeset	3328 && *rex.input == NUL && rex.lnum <= rex.reg_maxline)
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3329 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3330 reg_nextline();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3331 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3332 else if (rex.reg_line_lbr && WITH_NL(op) && *rex.input == '\n')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3333 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3334 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3335 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3336 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3337 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3338 if (WITH_NL(op))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3339 op -= ADD_NL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3340 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3341 c = (*mb_ptr2char)(rex.input);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3342 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3343 c = *rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3344 switch (op)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3345 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3346 case BOL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3347 if (rex.input != rex.line)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3348 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3349 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3350
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3351 case EOL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3352 if (c != NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3353 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3354 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3355
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3356 case RE_BOF:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3357 // We're not at the beginning of the file when below the first
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3358 // line where we started, not at the start of the line or we
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3359 // didn't start at the first line of the buffer.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3360 if (rex.lnum != 0 \|\| rex.input != rex.line
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3361 \|\| (REG_MULTI && rex.reg_firstlnum > 1))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3362 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3363 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3364
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3365 case RE_EOF:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3366 if (rex.lnum != rex.reg_maxline \|\| c != NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3367 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3368 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3369
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3370 case CURSOR:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3371 // Check if the buffer is in a window and compare the
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3372 // rex.reg_win->w_cursor position to the match position.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3373 if (rex.reg_win == NULL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3374 \|\| (rex.lnum + rex.reg_firstlnum
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3375 != rex.reg_win->w_cursor.lnum)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3376 \|\| ((colnr_T)(rex.input - rex.line)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3377 != rex.reg_win->w_cursor.col))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3378 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3379 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3380
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3381 case RE_MARK:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3382 // Compare the mark position to the match position.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3383 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3384 int mark = OPERAND(scan)[0];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3385 int cmp = OPERAND(scan)[1];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3386 pos_T *pos;
28240 692f6a861c47 patch 8.2.4646: using buffer line after it has been freed Bram Moolenaar <Bram@vim.org> parents: 27829 diff changeset	3387 size_t col = REG_MULTI ? rex.input - rex.line : 0;
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3388
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3389 pos = getmark_buf(rex.reg_buf, mark, FALSE);
28240 692f6a861c47 patch 8.2.4646: using buffer line after it has been freed Bram Moolenaar <Bram@vim.org> parents: 27829 diff changeset	3390
692f6a861c47 patch 8.2.4646: using buffer line after it has been freed Bram Moolenaar <Bram@vim.org> parents: 27829 diff changeset	3391 // Line may have been freed, get it again.
692f6a861c47 patch 8.2.4646: using buffer line after it has been freed Bram Moolenaar <Bram@vim.org> parents: 27829 diff changeset	3392 if (REG_MULTI)
692f6a861c47 patch 8.2.4646: using buffer line after it has been freed Bram Moolenaar <Bram@vim.org> parents: 27829 diff changeset	3393 {
692f6a861c47 patch 8.2.4646: using buffer line after it has been freed Bram Moolenaar <Bram@vim.org> parents: 27829 diff changeset	3394 rex.line = reg_getline(rex.lnum);
692f6a861c47 patch 8.2.4646: using buffer line after it has been freed Bram Moolenaar <Bram@vim.org> parents: 27829 diff changeset	3395 rex.input = rex.line + col;
692f6a861c47 patch 8.2.4646: using buffer line after it has been freed Bram Moolenaar <Bram@vim.org> parents: 27829 diff changeset	3396 }
692f6a861c47 patch 8.2.4646: using buffer line after it has been freed Bram Moolenaar <Bram@vim.org> parents: 27829 diff changeset	3397
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3398 if (pos == NULL // mark doesn't exist
24693 97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3399 \|\| pos->lnum <= 0) // mark isn't set in reg_buf
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3400 {
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3401 status = RA_NOMATCH;
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3402 }
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3403 else
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3404 {
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3405 colnr_T pos_col = pos->lnum == rex.lnum + rex.reg_firstlnum
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3406 && pos->col == MAXCOL
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3407 ? (colnr_T)STRLEN(reg_getline(
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3408 pos->lnum - rex.reg_firstlnum))
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3409 : pos->col;
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3410
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3411 if ((pos->lnum == rex.lnum + rex.reg_firstlnum
97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3412 ? (pos_col == (colnr_T)(rex.input - rex.line)
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3413 ? (cmp == '<' \|\| cmp == '>')
24693 97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3414 : (pos_col < (colnr_T)(rex.input - rex.line)
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3415 ? cmp != '>'
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3416 : cmp != '<'))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3417 : (pos->lnum < rex.lnum + rex.reg_firstlnum
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3418 ? cmp != '>'
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3419 : cmp != '<')))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3420 status = RA_NOMATCH;
24693 97789fcef0cf patch 8.2.2885: searching for %'> does not match linewise end of line Bram Moolenaar <Bram@vim.org> parents: 24580 diff changeset	3421 }
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3422 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3423 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3424
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3425 case RE_VISUAL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3426 if (!reg_match_visual())
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3427 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3428 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3429
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3430 case RE_LNUM:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3431 if (!REG_MULTI \|\| !re_num_cmp((long_u)(rex.lnum + rex.reg_firstlnum),
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3432 scan))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3433 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3434 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3435
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3436 case RE_COL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3437 if (!re_num_cmp((long_u)(rex.input - rex.line) + 1, scan))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3438 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3439 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3440
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3441 case RE_VCOL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3442 if (!re_num_cmp((long_u)win_linetabsize(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3443 rex.reg_win == NULL ? curwin : rex.reg_win,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3444 rex.line, (colnr_T)(rex.input - rex.line)) + 1, scan))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3445 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3446 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3447
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3448 case BOW: // \<word; rex.input points to w
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3449 if (c == NUL) // Can't match at end of line
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3450 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3451 else if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3452 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3453 int this_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3454
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3455 // Get class of current and previous char (if it exists).
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3456 this_class = mb_get_class_buf(rex.input, rex.reg_buf);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3457 if (this_class <= 1)
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3458 status = RA_NOMATCH; // not on a word at all
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3459 else if (reg_prev_class() == this_class)
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3460 status = RA_NOMATCH; // previous char is in same word
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3461 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3462 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3463 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3464 if (!vim_iswordc_buf(c, rex.reg_buf) \|\| (rex.input > rex.line
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3465 && vim_iswordc_buf(rex.input[-1], rex.reg_buf)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3466 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3467 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3468 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3469
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3470 case EOW: // word\>; rex.input points after d
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3471 if (rex.input == rex.line) // Can't match at start of line
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3472 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3473 else if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3474 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3475 int this_class, prev_class;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3476
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3477 // Get class of current and previous char (if it exists).
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3478 this_class = mb_get_class_buf(rex.input, rex.reg_buf);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3479 prev_class = reg_prev_class();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3480 if (this_class == prev_class
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3481 \|\| prev_class == 0 \|\| prev_class == 1)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3482 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3483 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3484 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3485 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3486 if (!vim_iswordc_buf(rex.input[-1], rex.reg_buf)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3487 \|\| (rex.input[0] != NUL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3488 && vim_iswordc_buf(c, rex.reg_buf)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3489 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3490 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3491 break; // Matched with EOW
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3492
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3493 case ANY:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3494 // ANY does not match new lines.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3495 if (c == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3496 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3497 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3498 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3499 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3500
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3501 case IDENT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3502 if (!vim_isIDc(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3503 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3504 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3505 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3506 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3507
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3508 case SIDENT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3509 if (VIM_ISDIGIT(*rex.input) \|\| !vim_isIDc(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3510 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3511 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3512 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3513 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3514
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3515 case KWORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3516 if (!vim_iswordp_buf(rex.input, rex.reg_buf))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3517 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3518 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3519 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3520 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3521
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3522 case SKWORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3523 if (VIM_ISDIGIT(*rex.input)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3524 \|\| !vim_iswordp_buf(rex.input, rex.reg_buf))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3525 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3526 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3527 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3528 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3529
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3530 case FNAME:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3531 if (!vim_isfilec(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3532 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3533 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3534 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3535 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3536
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3537 case SFNAME:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3538 if (VIM_ISDIGIT(*rex.input) \|\| !vim_isfilec(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3539 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3540 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3541 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3542 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3543
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3544 case PRINT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3545 if (!vim_isprintc(PTR2CHAR(rex.input)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3546 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3547 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3548 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3549 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3550
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3551 case SPRINT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3552 if (VIM_ISDIGIT(*rex.input) \|\| !vim_isprintc(PTR2CHAR(rex.input)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3553 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3554 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3555 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3556 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3557
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3558 case WHITE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3559 if (!VIM_ISWHITE(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3560 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3561 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3562 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3563 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3564
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3565 case NWHITE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3566 if (c == NUL \|\| VIM_ISWHITE(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3567 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3568 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3569 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3570 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3571
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3572 case DIGIT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3573 if (!ri_digit(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3574 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3575 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3576 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3577 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3578
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3579 case NDIGIT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3580 if (c == NUL \|\| ri_digit(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3581 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3582 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3583 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3584 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3585
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3586 case HEX:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3587 if (!ri_hex(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3588 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3589 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3590 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3591 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3592
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3593 case NHEX:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3594 if (c == NUL \|\| ri_hex(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3595 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3596 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3597 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3598 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3599
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3600 case OCTAL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3601 if (!ri_octal(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3602 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3603 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3604 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3605 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3606
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3607 case NOCTAL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3608 if (c == NUL \|\| ri_octal(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3609 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3610 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3611 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3612 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3613
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3614 case WORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3615 if (!ri_word(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3616 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3617 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3618 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3619 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3620
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3621 case NWORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3622 if (c == NUL \|\| ri_word(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3623 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3624 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3625 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3626 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3627
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3628 case HEAD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3629 if (!ri_head(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3630 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3631 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3632 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3633 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3634
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3635 case NHEAD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3636 if (c == NUL \|\| ri_head(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3637 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3638 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3639 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3640 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3641
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3642 case ALPHA:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3643 if (!ri_alpha(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3644 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3645 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3646 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3647 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3648
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3649 case NALPHA:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3650 if (c == NUL \|\| ri_alpha(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3651 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3652 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3653 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3654 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3655
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3656 case LOWER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3657 if (!ri_lower(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3658 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3659 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3660 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3661 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3662
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3663 case NLOWER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3664 if (c == NUL \|\| ri_lower(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3665 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3666 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3667 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3668 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3669
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3670 case UPPER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3671 if (!ri_upper(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3672 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3673 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3674 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3675 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3676
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3677 case NUPPER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3678 if (c == NUL \|\| ri_upper(c))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3679 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3680 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3681 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3682 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3683
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3684 case EXACTLY:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3685 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3686 int len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3687 char_u *opnd;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3688
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3689 opnd = OPERAND(scan);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3690 // Inline the first byte, for speed.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3691 if (opnd != rex.input
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3692 && (!rex.reg_ic
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3693 \|\| (!enc_utf8
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3694 && MB_TOLOWER(opnd) != MB_TOLOWER(rex.input))))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3695 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3696 else if (*opnd == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3697 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3698 // match empty string always works; happens when "~" is
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3699 // empty.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3700 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3701 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3702 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3703 if (opnd[1] == NUL && !(enc_utf8 && rex.reg_ic))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3704 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3705 len = 1; // matched a single byte above
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3706 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3707 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3708 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3709 // Need to match first byte again for multi-byte.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3710 len = (int)STRLEN(opnd);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3711 if (cstrncmp(opnd, rex.input, &len) != 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3712 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3713 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3714 // Check for following composing character, unless %C
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3715 // follows (skips over all composing chars).
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3716 if (status != RA_NOMATCH
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3717 && enc_utf8
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3718 && UTF_COMPOSINGLIKE(rex.input, rex.input + len)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3719 && !rex.reg_icombine
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3720 && OP(next) != RE_COMPOSING)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3721 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3722 // raaron: This code makes a composing character get
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3723 // ignored, which is the correct behavior (sometimes)
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3724 // for voweled Hebrew texts.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3725 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3726 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3727 if (status != RA_NOMATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3728 rex.input += len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3729 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3730 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3731 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3732
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3733 case ANYOF:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3734 case ANYBUT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3735 if (c == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3736 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3737 else if ((cstrchr(OPERAND(scan), c) == NULL) == (op == ANYOF))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3738 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3739 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3740 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3741 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3742
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3743 case MULTIBYTECODE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3744 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3745 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3746 int i, len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3747 char_u *opnd;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3748 int opndc = 0, inpc;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3749
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3750 opnd = OPERAND(scan);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3751 // Safety check (just in case 'encoding' was changed since
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3752 // compiling the program).
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3753 if ((len = (*mb_ptr2len)(opnd)) < 2)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3754 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3755 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3756 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3757 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3758 if (enc_utf8)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3759 opndc = utf_ptr2char(opnd);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3760 if (enc_utf8 && utf_iscomposing(opndc))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3761 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3762 // When only a composing char is given match at any
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3763 // position where that composing char appears.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3764 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3765 for (i = 0; rex.input[i] != NUL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3766 i += utf_ptr2len(rex.input + i))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3767 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3768 inpc = utf_ptr2char(rex.input + i);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3769 if (!utf_iscomposing(inpc))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3770 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3771 if (i > 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3772 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3773 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3774 else if (opndc == inpc)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3775 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3776 // Include all following composing chars.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3777 len = i + utfc_ptr2len(rex.input + i);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3778 status = RA_MATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3779 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3780 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3781 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3782 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3783 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3784 for (i = 0; i < len; ++i)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3785 if (opnd[i] != rex.input[i])
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3786 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3787 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3788 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3789 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3790 rex.input += len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3791 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3792 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3793 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3794 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3795 case RE_COMPOSING:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3796 if (enc_utf8)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3797 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3798 // Skip composing characters.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3799 while (utf_iscomposing(utf_ptr2char(rex.input)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3800 MB_CPTR_ADV(rex.input);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3801 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3802 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3803
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3804 case NOTHING:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3805 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3806
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3807 case BACK:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3808 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3809 int i;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3810 backpos_T *bp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3811
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3812 // When we run into BACK we need to check if we don't keep
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3813 // looping without matching any input. The second and later
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3814 // times a BACK is encountered it fails if the input is still
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3815 // at the same position as the previous time.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3816 // The positions are stored in "backpos" and found by the
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3817 // current value of "scan", the position in the RE program.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3818 bp = (backpos_T *)backpos.ga_data;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3819 for (i = 0; i < backpos.ga_len; ++i)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3820 if (bp[i].bp_scan == scan)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3821 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3822 if (i == backpos.ga_len)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3823 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3824 // First time at this BACK, make room to store the pos.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3825 if (ga_grow(&backpos, 1) == FAIL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3826 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3827 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3828 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3829 // get "ga_data" again, it may have changed
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3830 bp = (backpos_T *)backpos.ga_data;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3831 bp[i].bp_scan = scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3832 ++backpos.ga_len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3833 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3834 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3835 else if (reg_save_equal(&bp[i].bp_pos))
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3836 // Still at same position as last time, fail.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3837 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3838
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3839 if (status != RA_FAIL && status != RA_NOMATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3840 reg_save(&bp[i].bp_pos, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3841 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3842 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3843
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3844 case MOPEN + 0: // Match start: \zs
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3845 case MOPEN + 1: // \(
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3846 case MOPEN + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3847 case MOPEN + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3848 case MOPEN + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3849 case MOPEN + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3850 case MOPEN + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3851 case MOPEN + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3852 case MOPEN + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3853 case MOPEN + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3854 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3855 no = op - MOPEN;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3856 cleanup_subexpr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3857 rp = regstack_push(RS_MOPEN, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3858 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3859 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3860 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3861 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3862 rp->rs_no = no;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3863 save_se(&rp->rs_un.sesave, &rex.reg_startpos[no],
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3864 &rex.reg_startp[no]);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3865 // We simply continue and handle the result when done.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3866 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3867 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3868 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3869
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3870 case NOPEN: // \%(
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3871 case NCLOSE: // \) after \%(
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3872 if (regstack_push(RS_NOPEN, scan) == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3873 status = RA_FAIL;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3874 // We simply continue and handle the result when done.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3875 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3876
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3877 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3878 case ZOPEN + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3879 case ZOPEN + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3880 case ZOPEN + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3881 case ZOPEN + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3882 case ZOPEN + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3883 case ZOPEN + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3884 case ZOPEN + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3885 case ZOPEN + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3886 case ZOPEN + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3887 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3888 no = op - ZOPEN;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3889 cleanup_zsubexpr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3890 rp = regstack_push(RS_ZOPEN, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3891 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3892 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3893 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3894 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3895 rp->rs_no = no;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3896 save_se(&rp->rs_un.sesave, &reg_startzpos[no],
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3897 &reg_startzp[no]);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3898 // We simply continue and handle the result when done.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3899 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3900 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3901 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3902 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3903
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3904 case MCLOSE + 0: // Match end: \ze
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3905 case MCLOSE + 1: // \)
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3906 case MCLOSE + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3907 case MCLOSE + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3908 case MCLOSE + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3909 case MCLOSE + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3910 case MCLOSE + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3911 case MCLOSE + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3912 case MCLOSE + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3913 case MCLOSE + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3914 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3915 no = op - MCLOSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3916 cleanup_subexpr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3917 rp = regstack_push(RS_MCLOSE, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3918 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3919 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3920 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3921 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3922 rp->rs_no = no;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3923 save_se(&rp->rs_un.sesave, &rex.reg_endpos[no],
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3924 &rex.reg_endp[no]);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3925 // We simply continue and handle the result when done.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3926 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3927 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3928 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3929
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3930 #ifdef FEAT_SYN_HL
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3931 case ZCLOSE + 1: // \) after \z(
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3932 case ZCLOSE + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3933 case ZCLOSE + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3934 case ZCLOSE + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3935 case ZCLOSE + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3936 case ZCLOSE + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3937 case ZCLOSE + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3938 case ZCLOSE + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3939 case ZCLOSE + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3940 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3941 no = op - ZCLOSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3942 cleanup_zsubexpr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3943 rp = regstack_push(RS_ZCLOSE, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3944 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3945 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3946 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3947 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3948 rp->rs_no = no;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3949 save_se(&rp->rs_un.sesave, &reg_endzpos[no],
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3950 &reg_endzp[no]);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3951 // We simply continue and handle the result when done.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3952 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3953 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3954 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3955 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3956
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3957 case BACKREF + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3958 case BACKREF + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3959 case BACKREF + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3960 case BACKREF + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3961 case BACKREF + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3962 case BACKREF + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3963 case BACKREF + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3964 case BACKREF + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3965 case BACKREF + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3966 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3967 int len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3968
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3969 no = op - BACKREF;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3970 cleanup_subexpr();
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3971 if (!REG_MULTI) // Single-line regexp
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3972 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3973 if (rex.reg_startp[no] == NULL \|\| rex.reg_endp[no] == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3974 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3975 // Backref was not set: Match an empty string.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3976 len = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3977 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3978 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3979 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3980 // Compare current input with back-ref in the same
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3981 // line.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3982 len = (int)(rex.reg_endp[no] - rex.reg_startp[no]);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3983 if (cstrncmp(rex.reg_startp[no], rex.input, &len) != 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3984 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3985 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3986 }
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3987 else // Multi-line regexp
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3988 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3989 if (rex.reg_startpos[no].lnum < 0
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3990 \|\| rex.reg_endpos[no].lnum < 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3991 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	3992 // Backref was not set: Match an empty string.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3993 len = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3994 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3995 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3996 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3997 if (rex.reg_startpos[no].lnum == rex.lnum
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3998 && rex.reg_endpos[no].lnum == rex.lnum)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	3999 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4000 // Compare back-ref within the current line.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4001 len = rex.reg_endpos[no].col
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4002 - rex.reg_startpos[no].col;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4003 if (cstrncmp(rex.line + rex.reg_startpos[no].col,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4004 rex.input, &len) != 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4005 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4006 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4007 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4008 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4009 // Messy situation: Need to compare between two
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4010 // lines.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4011 int r = match_with_backref(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4012 rex.reg_startpos[no].lnum,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4013 rex.reg_startpos[no].col,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4014 rex.reg_endpos[no].lnum,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4015 rex.reg_endpos[no].col,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4016 &len);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4017
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4018 if (r != RA_MATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4019 status = r;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4020 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4021 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4022 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4023
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4024 // Matched the backref, skip over it.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4025 rex.input += len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4026 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4027 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4028
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4029 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4030 case ZREF + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4031 case ZREF + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4032 case ZREF + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4033 case ZREF + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4034 case ZREF + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4035 case ZREF + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4036 case ZREF + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4037 case ZREF + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4038 case ZREF + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4039 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4040 int len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4041
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4042 cleanup_zsubexpr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4043 no = op - ZREF;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4044 if (re_extmatch_in != NULL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4045 && re_extmatch_in->matches[no] != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4046 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4047 len = (int)STRLEN(re_extmatch_in->matches[no]);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4048 if (cstrncmp(re_extmatch_in->matches[no],
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4049 rex.input, &len) != 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4050 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4051 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4052 rex.input += len;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4053 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4054 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4055 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4056 // Backref was not set: Match an empty string.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4057 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4058 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4059 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4060 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4061
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4062 case BRANCH:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4063 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4064 if (OP(next) != BRANCH) // No choice.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4065 next = OPERAND(scan); // Avoid recursion.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4066 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4067 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4068 rp = regstack_push(RS_BRANCH, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4069 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4070 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4071 else
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4072 status = RA_BREAK; // rest is below
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4073 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4074 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4075 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4076
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4077 case BRACE_LIMITS:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4078 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4079 if (OP(next) == BRACE_SIMPLE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4080 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4081 bl_minval = OPERAND_MIN(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4082 bl_maxval = OPERAND_MAX(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4083 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4084 else if (OP(next) >= BRACE_COMPLEX
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4085 && OP(next) < BRACE_COMPLEX + 10)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4086 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4087 no = OP(next) - BRACE_COMPLEX;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4088 brace_min[no] = OPERAND_MIN(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4089 brace_max[no] = OPERAND_MAX(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4090 brace_count[no] = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4091 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4092 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4093 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4094 internal_error("BRACE_LIMITS");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4095 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4096 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4097 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4098 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4099
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4100 case BRACE_COMPLEX + 0:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4101 case BRACE_COMPLEX + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4102 case BRACE_COMPLEX + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4103 case BRACE_COMPLEX + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4104 case BRACE_COMPLEX + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4105 case BRACE_COMPLEX + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4106 case BRACE_COMPLEX + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4107 case BRACE_COMPLEX + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4108 case BRACE_COMPLEX + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4109 case BRACE_COMPLEX + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4110 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4111 no = op - BRACE_COMPLEX;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4112 ++brace_count[no];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4113
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4114 // If not matched enough times yet, try one more
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4115 if (brace_count[no] <= (brace_min[no] <= brace_max[no]
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4116 ? brace_min[no] : brace_max[no]))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4117 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4118 rp = regstack_push(RS_BRCPLX_MORE, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4119 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4120 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4121 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4122 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4123 rp->rs_no = no;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4124 reg_save(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4125 next = OPERAND(scan);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4126 // We continue and handle the result when done.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4127 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4128 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4129 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4130
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4131 // If matched enough times, may try matching some more
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4132 if (brace_min[no] <= brace_max[no])
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4133 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4134 // Range is the normal way around, use longest match
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4135 if (brace_count[no] <= brace_max[no])
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4136 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4137 rp = regstack_push(RS_BRCPLX_LONG, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4138 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4139 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4140 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4141 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4142 rp->rs_no = no;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4143 reg_save(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4144 next = OPERAND(scan);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4145 // We continue and handle the result when done.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4146 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4147 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4148 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4149 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4150 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4151 // Range is backwards, use shortest match first
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4152 if (brace_count[no] <= brace_min[no])
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4153 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4154 rp = regstack_push(RS_BRCPLX_SHORT, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4155 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4156 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4157 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4158 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4159 reg_save(&rp->rs_un.regsave, &backpos);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4160 // We continue and handle the result when done.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4161 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4162 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4163 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4164 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4165 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4166
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4167 case BRACE_SIMPLE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4168 case STAR:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4169 case PLUS:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4170 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4171 regstar_T rst;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4172
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4173 // Lookahead to avoid useless match attempts when we know
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4174 // what character comes next.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4175 if (OP(next) == EXACTLY)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4176 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4177 rst.nextb = *OPERAND(next);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4178 if (rex.reg_ic)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4179 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4180 if (MB_ISUPPER(rst.nextb))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4181 rst.nextb_ic = MB_TOLOWER(rst.nextb);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4182 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4183 rst.nextb_ic = MB_TOUPPER(rst.nextb);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4184 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4185 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4186 rst.nextb_ic = rst.nextb;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4187 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4188 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4189 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4190 rst.nextb = NUL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4191 rst.nextb_ic = NUL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4192 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4193 if (op != BRACE_SIMPLE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4194 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4195 rst.minval = (op == STAR) ? 0 : 1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4196 rst.maxval = MAX_LIMIT;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4197 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4198 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4199 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4200 rst.minval = bl_minval;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4201 rst.maxval = bl_maxval;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4202 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4203
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4204 // When maxval > minval, try matching as much as possible, up
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4205 // to maxval. When maxval < minval, try matching at least the
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4206 // minimal number (since the range is backwards, that's also
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4207 // maxval!).
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4208 rst.count = regrepeat(OPERAND(scan), rst.maxval);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4209 if (got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4210 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4211 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4212 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4213 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4214 if (rst.minval <= rst.maxval
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4215 ? rst.count >= rst.minval : rst.count >= rst.maxval)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4216 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4217 // It could match. Prepare for trying to match what
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4218 // follows. The code is below. Parameters are stored in
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4219 // a regstar_T on the regstack.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4220 if ((long)((unsigned)regstack.ga_len >> 10) >= p_mmp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4221 {
26883 7f150a4936f2 patch 8.2.3970: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26867 diff changeset	4222 emsg(_(e_pattern_uses_more_memory_than_maxmempattern));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4223 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4224 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4225 else if (ga_grow(&regstack, sizeof(regstar_T)) == FAIL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4226 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4227 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4228 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4229 regstack.ga_len += sizeof(regstar_T);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4230 rp = regstack_push(rst.minval <= rst.maxval
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4231 ? RS_STAR_LONG : RS_STAR_SHORT, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4232 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4233 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4234 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4235 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4236 (((regstar_T )rp) - 1) = rst;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4237 status = RA_BREAK; // skip the restore bits
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4238 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4239 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4240 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4241 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4242 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4243
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4244 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4245 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4246
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4247 case NOMATCH:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4248 case MATCH:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4249 case SUBPAT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4250 rp = regstack_push(RS_NOMATCH, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4251 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4252 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4253 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4254 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4255 rp->rs_no = op;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4256 reg_save(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4257 next = OPERAND(scan);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4258 // We continue and handle the result when done.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4259 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4260 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4261
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4262 case BEHIND:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4263 case NOBEHIND:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4264 // Need a bit of room to store extra positions.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4265 if ((long)((unsigned)regstack.ga_len >> 10) >= p_mmp)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4266 {
26883 7f150a4936f2 patch 8.2.3970: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 26867 diff changeset	4267 emsg(_(e_pattern_uses_more_memory_than_maxmempattern));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4268 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4269 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4270 else if (ga_grow(&regstack, sizeof(regbehind_T)) == FAIL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4271 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4272 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4273 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4274 regstack.ga_len += sizeof(regbehind_T);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4275 rp = regstack_push(RS_BEHIND1, scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4276 if (rp == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4277 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4278 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4279 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4280 // Need to save the subexpr to be able to restore them
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4281 // when there is a match but we don't use it.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4282 save_subexpr(((regbehind_T *)rp) - 1);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4283
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4284 rp->rs_no = op;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4285 reg_save(&rp->rs_un.regsave, &backpos);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4286 // First try if what follows matches. If it does then we
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4287 // check the behind match by looping.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4288 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4289 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4290 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4291
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4292 case BHPOS:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4293 if (REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4294 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4295 if (behind_pos.rs_u.pos.col != (colnr_T)(rex.input - rex.line)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4296 \|\| behind_pos.rs_u.pos.lnum != rex.lnum)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4297 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4298 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4299 else if (behind_pos.rs_u.ptr != rex.input)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4300 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4301 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4302
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4303 case NEWL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4304 if ((c != NUL \|\| !REG_MULTI \|\| rex.lnum > rex.reg_maxline
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4305 \|\| rex.reg_line_lbr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4306 && (c != '\n' \|\| !rex.reg_line_lbr))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4307 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4308 else if (rex.reg_line_lbr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4309 ADVANCE_REGINPUT();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4310 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4311 reg_nextline();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4312 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4313
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4314 case END:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4315 status = RA_MATCH; // Success!
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4316 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4317
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4318 default:
25306 078edc1821bf patch 8.2.3190: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25147 diff changeset	4319 iemsg(_(e_corrupted_regexp_program));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4320 #ifdef DEBUG
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4321 printf("Illegal op code %d\n", op);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4322 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4323 status = RA_FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4324 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4325 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4326 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4327
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4328 // If we can't continue sequentially, break the inner loop.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4329 if (status != RA_CONT)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4330 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4331
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4332 // Continue in inner loop, advance to next item.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4333 scan = next;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4334
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4335 } // end of inner loop
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4336
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4337 // If there is something on the regstack execute the code for the state.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4338 // If the state is popped then loop and use the older state.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4339 while (regstack.ga_len > 0 && status != RA_FAIL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4340 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4341 rp = (regitem_T )((char )regstack.ga_data + regstack.ga_len) - 1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4342 switch (rp->rs_state)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4343 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4344 case RS_NOPEN:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4345 // Result is passed on as-is, simply pop the state.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4346 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4347 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4348
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4349 case RS_MOPEN:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4350 // Pop the state. Restore pointers when there is no match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4351 if (status == RA_NOMATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4352 restore_se(&rp->rs_un.sesave, &rex.reg_startpos[rp->rs_no],
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4353 &rex.reg_startp[rp->rs_no]);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4354 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4355 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4356
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4357 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4358 case RS_ZOPEN:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4359 // Pop the state. Restore pointers when there is no match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4360 if (status == RA_NOMATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4361 restore_se(&rp->rs_un.sesave, &reg_startzpos[rp->rs_no],
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4362 &reg_startzp[rp->rs_no]);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4363 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4364 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4365 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4366
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4367 case RS_MCLOSE:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4368 // Pop the state. Restore pointers when there is no match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4369 if (status == RA_NOMATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4370 restore_se(&rp->rs_un.sesave, &rex.reg_endpos[rp->rs_no],
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4371 &rex.reg_endp[rp->rs_no]);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4372 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4373 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4374
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4375 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4376 case RS_ZCLOSE:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4377 // Pop the state. Restore pointers when there is no match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4378 if (status == RA_NOMATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4379 restore_se(&rp->rs_un.sesave, &reg_endzpos[rp->rs_no],
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4380 &reg_endzp[rp->rs_no]);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4381 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4382 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4383 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4384
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4385 case RS_BRANCH:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4386 if (status == RA_MATCH)
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4387 // this branch matched, use it
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4388 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4389 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4390 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4391 if (status != RA_BREAK)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4392 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4393 // After a non-matching branch: try next one.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4394 reg_restore(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4395 scan = rp->rs_scan;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4396 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4397 if (scan == NULL \|\| OP(scan) != BRANCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4398 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4399 // no more branches, didn't find a match
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4400 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4401 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4402 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4403 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4404 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4405 // Prepare to try a branch.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4406 rp->rs_scan = regnext(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4407 reg_save(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4408 scan = OPERAND(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4409 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4410 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4411 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4412
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4413 case RS_BRCPLX_MORE:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4414 // Pop the state. Restore pointers when there is no match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4415 if (status == RA_NOMATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4416 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4417 reg_restore(&rp->rs_un.regsave, &backpos);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4418 --brace_count[rp->rs_no]; // decrement match count
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4419 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4420 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4421 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4422
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4423 case RS_BRCPLX_LONG:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4424 // Pop the state. Restore pointers when there is no match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4425 if (status == RA_NOMATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4426 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4427 // There was no match, but we did find enough matches.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4428 reg_restore(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4429 --brace_count[rp->rs_no];
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4430 // continue with the items after "\{}"
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4431 status = RA_CONT;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4432 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4433 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4434 if (status == RA_CONT)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4435 scan = regnext(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4436 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4437
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4438 case RS_BRCPLX_SHORT:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4439 // Pop the state. Restore pointers when there is no match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4440 if (status == RA_NOMATCH)
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4441 // There was no match, try to match one more item.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4442 reg_restore(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4443 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4444 if (status == RA_NOMATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4445 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4446 scan = OPERAND(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4447 status = RA_CONT;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4448 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4449 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4450
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4451 case RS_NOMATCH:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4452 // Pop the state. If the operand matches for NOMATCH or
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4453 // doesn't match for MATCH/SUBPAT, we fail. Otherwise backup,
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4454 // except for SUBPAT, and continue with the next item.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4455 if (status == (rp->rs_no == NOMATCH ? RA_MATCH : RA_NOMATCH))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4456 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4457 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4458 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4459 status = RA_CONT;
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4460 if (rp->rs_no != SUBPAT) // zero-width
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4461 reg_restore(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4462 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4463 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4464 if (status == RA_CONT)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4465 scan = regnext(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4466 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4467
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4468 case RS_BEHIND1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4469 if (status == RA_NOMATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4470 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4471 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4472 regstack.ga_len -= sizeof(regbehind_T);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4473 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4474 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4475 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4476 // The stuff after BEHIND/NOBEHIND matches. Now try if
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4477 // the behind part does (not) match before the current
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4478 // position in the input. This must be done at every
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4479 // position in the input and checking if the match ends at
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4480 // the current position.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4481
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4482 // save the position after the found match for next
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4483 reg_save(&(((regbehind_T *)rp) - 1)->save_after, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4484
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4485 // Start looking for a match with operand at the current
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4486 // position. Go back one character until we find the
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4487 // result, hitting the start of the line or the previous
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4488 // line (for multi-line matching).
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4489 // Set behind_pos to where the match should end, BHPOS
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4490 // will match it. Save the current value.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4491 (((regbehind_T *)rp) - 1)->save_behind = behind_pos;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4492 behind_pos = rp->rs_un.regsave;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4493
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4494 rp->rs_state = RS_BEHIND2;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4495
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4496 reg_restore(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4497 scan = OPERAND(rp->rs_scan) + 4;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4498 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4499 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4500
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4501 case RS_BEHIND2:
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4502 // Looping for BEHIND / NOBEHIND match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4503 if (status == RA_MATCH && reg_save_equal(&behind_pos))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4504 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4505 // found a match that ends where "next" started
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4506 behind_pos = (((regbehind_T *)rp) - 1)->save_behind;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4507 if (rp->rs_no == BEHIND)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4508 reg_restore(&(((regbehind_T *)rp) - 1)->save_after,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4509 &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4510 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4511 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4512 // But we didn't want a match. Need to restore the
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4513 // subexpr, because what follows matched, so they have
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4514 // been set.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4515 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4516 restore_subexpr(((regbehind_T *)rp) - 1);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4517 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4518 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4519 regstack.ga_len -= sizeof(regbehind_T);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4520 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4521 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4522 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4523 long limit;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4524
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4525 // No match or a match that doesn't end where we want it: Go
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4526 // back one character. May go to previous line once.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4527 no = OK;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4528 limit = OPERAND_MIN(rp->rs_scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4529 if (REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4530 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4531 if (limit > 0
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4532 && ((rp->rs_un.regsave.rs_u.pos.lnum
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4533 < behind_pos.rs_u.pos.lnum
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4534 ? (colnr_T)STRLEN(rex.line)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4535 : behind_pos.rs_u.pos.col)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4536 - rp->rs_un.regsave.rs_u.pos.col >= limit))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4537 no = FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4538 else if (rp->rs_un.regsave.rs_u.pos.col == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4539 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4540 if (rp->rs_un.regsave.rs_u.pos.lnum
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4541 < behind_pos.rs_u.pos.lnum
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4542 \|\| reg_getline(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4543 --rp->rs_un.regsave.rs_u.pos.lnum)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4544 == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4545 no = FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4546 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4547 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4548 reg_restore(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4549 rp->rs_un.regsave.rs_u.pos.col =
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4550 (colnr_T)STRLEN(rex.line);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4551 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4552 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4553 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4554 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4555 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4556 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4557 char_u *line =
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4558 reg_getline(rp->rs_un.regsave.rs_u.pos.lnum);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4559
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4560 rp->rs_un.regsave.rs_u.pos.col -=
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4561 (*mb_head_off)(line, line
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4562 + rp->rs_un.regsave.rs_u.pos.col - 1) + 1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4563 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4564 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4565 --rp->rs_un.regsave.rs_u.pos.col;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4566 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4567 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4568 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4569 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4570 if (rp->rs_un.regsave.rs_u.ptr == rex.line)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4571 no = FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4572 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4573 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4574 MB_PTR_BACK(rex.line, rp->rs_un.regsave.rs_u.ptr);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4575 if (limit > 0 && (long)(behind_pos.rs_u.ptr
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4576 - rp->rs_un.regsave.rs_u.ptr) > limit)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4577 no = FAIL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4578 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4579 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4580 if (no == OK)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4581 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4582 // Advanced, prepare for finding match again.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4583 reg_restore(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4584 scan = OPERAND(rp->rs_scan) + 4;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4585 if (status == RA_MATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4586 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4587 // We did match, so subexpr may have been changed,
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4588 // need to restore them for the next try.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4589 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4590 restore_subexpr(((regbehind_T *)rp) - 1);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4591 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4592 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4593 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4594 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4595 // Can't advance. For NOBEHIND that's a match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4596 behind_pos = (((regbehind_T *)rp) - 1)->save_behind;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4597 if (rp->rs_no == NOBEHIND)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4598 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4599 reg_restore(&(((regbehind_T *)rp) - 1)->save_after,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4600 &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4601 status = RA_MATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4602 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4603 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4604 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4605 // We do want a proper match. Need to restore the
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4606 // subexpr if we had a match, because they may have
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4607 // been set.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4608 if (status == RA_MATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4609 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4610 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4611 restore_subexpr(((regbehind_T *)rp) - 1);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4612 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4613 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4614 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4615 regstack.ga_len -= sizeof(regbehind_T);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4616 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4617 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4618 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4619
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4620 case RS_STAR_LONG:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4621 case RS_STAR_SHORT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4622 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4623 regstar_T rst = ((regstar_T )rp) - 1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4624
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4625 if (status == RA_MATCH)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4626 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4627 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4628 regstack.ga_len -= sizeof(regstar_T);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4629 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4630 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4631
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4632 // Tried once already, restore input pointers.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4633 if (status != RA_BREAK)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4634 reg_restore(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4635
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4636 // Repeat until we found a position where it could match.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4637 for (;;)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4638 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4639 if (status != RA_BREAK)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4640 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4641 // Tried first position already, advance.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4642 if (rp->rs_state == RS_STAR_LONG)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4643 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4644 // Trying for longest match, but couldn't or
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4645 // didn't match -- back up one char.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4646 if (--rst->count < rst->minval)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4647 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4648 if (rex.input == rex.line)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4649 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4650 // backup to last char of previous line
27829 0138ce89703b patch 8.2.4440: crash with specific regexp pattern and string Bram Moolenaar <Bram@vim.org> parents: 27490 diff changeset	4651 if (rex.lnum == 0)
0138ce89703b patch 8.2.4440: crash with specific regexp pattern and string Bram Moolenaar <Bram@vim.org> parents: 27490 diff changeset	4652 {
0138ce89703b patch 8.2.4440: crash with specific regexp pattern and string Bram Moolenaar <Bram@vim.org> parents: 27490 diff changeset	4653 status = RA_NOMATCH;
0138ce89703b patch 8.2.4440: crash with specific regexp pattern and string Bram Moolenaar <Bram@vim.org> parents: 27490 diff changeset	4654 break;
0138ce89703b patch 8.2.4440: crash with specific regexp pattern and string Bram Moolenaar <Bram@vim.org> parents: 27490 diff changeset	4655 }
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4656 --rex.lnum;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4657 rex.line = reg_getline(rex.lnum);
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4658 // Just in case regrepeat() didn't count
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4659 // right.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4660 if (rex.line == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4661 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4662 rex.input = rex.line + STRLEN(rex.line);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4663 fast_breakcheck();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4664 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4665 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4666 MB_PTR_BACK(rex.line, rex.input);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4667 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4668 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4669 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4670 // Range is backwards, use shortest match first.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4671 // Careful: maxval and minval are exchanged!
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4672 // Couldn't or didn't match: try advancing one
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4673 // char.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4674 if (rst->count == rst->minval
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4675 \|\| regrepeat(OPERAND(rp->rs_scan), 1L) == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4676 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4677 ++rst->count;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4678 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4679 if (got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4680 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4681 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4682 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4683 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4684
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4685 // If it could match, try it.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4686 if (rst->nextb == NUL \|\| *rex.input == rst->nextb
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4687 \|\| *rex.input == rst->nextb_ic)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4688 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4689 reg_save(&rp->rs_un.regsave, &backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4690 scan = regnext(rp->rs_scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4691 status = RA_CONT;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4692 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4693 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4694 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4695 if (status != RA_CONT)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4696 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4697 // Failed.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4698 regstack_pop(&scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4699 regstack.ga_len -= sizeof(regstar_T);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4700 status = RA_NOMATCH;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4701 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4702 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4703 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4704 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4705
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4706 // If we want to continue the inner loop or didn't pop a state
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4707 // continue matching loop
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4708 if (status == RA_CONT \|\| rp == (regitem_T *)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4709 ((char *)regstack.ga_data + regstack.ga_len) - 1)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4710 break;
29191 0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	4711
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	4712 #ifdef FEAT_RELTIME
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	4713 if (bt_did_time_out(timed_out))
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	4714 {
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	4715 status = RA_FAIL;
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	4716 break;
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	4717 }
0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	4718 #endif
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4719 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4720
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4721 // May need to continue with the inner loop, starting at "scan".
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4722 if (status == RA_CONT)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4723 continue;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4724
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4725 // If the regstack is empty or something failed we are done.
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4726 if (regstack.ga_len == 0 \|\| status == RA_FAIL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4727 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4728 if (scan == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4729 {
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4730 // We get here only if there's trouble -- normally "case END" is
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4731 // the terminating point.
25306 078edc1821bf patch 8.2.3190: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25147 diff changeset	4732 iemsg(_(e_corrupted_regexp_program));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4733 #ifdef DEBUG
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4734 printf("Premature EOL\n");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4735 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4736 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4737 return (status == RA_MATCH);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4738 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4739
18029 72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4740 } // End of loop until the regstack is empty.
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4741
72524e906658 patch 8.1.2010: new file uses old style comments Bram Moolenaar <Bram@vim.org> parents: 18019 diff changeset	4742 // NOTREACHED
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4743 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4744
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4745 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4746 * regtry - try match of "prog" with at rex.line["col"].
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4747 * Returns 0 for failure, number of lines contained in the match otherwise.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4748 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4749 static long
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4750 regtry(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4751 bt_regprog_T *prog,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4752 colnr_T col,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4753 int *timed_out) // flag set on timeout or NULL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4754 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4755 rex.input = rex.line + col;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4756 rex.need_clear_subexpr = TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4757 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4758 // Clear the external match subpointers if necessary.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4759 rex.need_clear_zsubexpr = (prog->reghasz == REX_SET);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4760 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4761
29071 b90bca860b5a patch 8.2.5057: using gettimeofday() for timeout is very inefficient Bram Moolenaar <Bram@vim.org> parents: 29012 diff changeset	4762 if (regmatch(prog->program + 1, timed_out) == 0)
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4763 return 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4764
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4765 cleanup_subexpr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4766 if (REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4767 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4768 if (rex.reg_startpos[0].lnum < 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4769 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4770 rex.reg_startpos[0].lnum = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4771 rex.reg_startpos[0].col = col;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4772 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4773 if (rex.reg_endpos[0].lnum < 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4774 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4775 rex.reg_endpos[0].lnum = rex.lnum;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4776 rex.reg_endpos[0].col = (int)(rex.input - rex.line);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4777 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4778 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4779 // Use line number of "\ze".
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4780 rex.lnum = rex.reg_endpos[0].lnum;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4781 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4782 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4783 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4784 if (rex.reg_startp[0] == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4785 rex.reg_startp[0] = rex.line + col;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4786 if (rex.reg_endp[0] == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4787 rex.reg_endp[0] = rex.input;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4788 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4789 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4790 // Package any found \z(...\) matches for export. Default is none.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4791 unref_extmatch(re_extmatch_out);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4792 re_extmatch_out = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4793
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4794 if (prog->reghasz == REX_SET)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4795 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4796 int i;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4797
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4798 cleanup_zsubexpr();
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4799 re_extmatch_out = make_extmatch();
18945 c62d63d2b9f0 patch 8.2.0033: crash when make_extmatch() runs out of memory Bram Moolenaar <Bram@vim.org> parents: 18029 diff changeset	4800 if (re_extmatch_out == NULL)
c62d63d2b9f0 patch 8.2.0033: crash when make_extmatch() runs out of memory Bram Moolenaar <Bram@vim.org> parents: 18029 diff changeset	4801 return 0;
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4802 for (i = 0; i < NSUBEXP; i++)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4803 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4804 if (REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4805 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4806 // Only accept single line matches.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4807 if (reg_startzpos[i].lnum >= 0
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4808 && reg_endzpos[i].lnum == reg_startzpos[i].lnum
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4809 && reg_endzpos[i].col >= reg_startzpos[i].col)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4810 re_extmatch_out->matches[i] =
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4811 vim_strnsave(reg_getline(reg_startzpos[i].lnum)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4812 + reg_startzpos[i].col,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4813 reg_endzpos[i].col - reg_startzpos[i].col);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4814 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4815 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4816 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4817 if (reg_startzp[i] != NULL && reg_endzp[i] != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4818 re_extmatch_out->matches[i] =
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4819 vim_strnsave(reg_startzp[i],
20830 9064044fd4f6 patch 8.2.0967: unnecessary type casts for vim_strnsave() Bram Moolenaar <Bram@vim.org> parents: 20007 diff changeset	4820 reg_endzp[i] - reg_startzp[i]);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4821 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4822 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4823 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4824 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4825 return 1 + rex.lnum;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4826 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4827
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4828 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4829 * Match a regexp against a string ("line" points to the string) or multiple
24580 87ff80c08e4b patch 8.2.2829: some comments are not correct or clear Bram Moolenaar <Bram@vim.org> parents: 24351 diff changeset	4830 * lines (if "line" is NULL, use reg_getline()).
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4831 * Returns 0 for failure, number of lines contained in the match otherwise.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4832 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4833 static long
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4834 bt_regexec_both(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4835 char_u *line,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4836 colnr_T col, // column to start looking for match
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4837 int *timed_out) // flag set on timeout or NULL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4838 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4839 bt_regprog_T *prog;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4840 char_u *s;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4841 long retval = 0L;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4842
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4843 // Create "regstack" and "backpos" if they are not allocated yet.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4844 // We allocate *_INITIAL amount of bytes first and then set the grow size
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4845 // to much bigger value to avoid many malloc calls in case of deep regular
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4846 // expressions.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4847 if (regstack.ga_data == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4848 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4849 // Use an item size of 1 byte, since we push different things
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4850 // onto the regstack.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4851 ga_init2(&regstack, 1, REGSTACK_INITIAL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4852 (void)ga_grow(&regstack, REGSTACK_INITIAL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4853 regstack.ga_growsize = REGSTACK_INITIAL * 8;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4854 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4855
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4856 if (backpos.ga_data == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4857 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4858 ga_init2(&backpos, sizeof(backpos_T), BACKPOS_INITIAL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4859 (void)ga_grow(&backpos, BACKPOS_INITIAL);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4860 backpos.ga_growsize = BACKPOS_INITIAL * 8;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4861 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4862
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4863 if (REG_MULTI)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4864 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4865 prog = (bt_regprog_T *)rex.reg_mmatch->regprog;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4866 line = reg_getline((linenr_T)0);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4867 rex.reg_startpos = rex.reg_mmatch->startpos;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4868 rex.reg_endpos = rex.reg_mmatch->endpos;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4869 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4870 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4871 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4872 prog = (bt_regprog_T *)rex.reg_match->regprog;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4873 rex.reg_startp = rex.reg_match->startp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4874 rex.reg_endp = rex.reg_match->endp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4875 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4876
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4877 // Be paranoid...
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4878 if (prog == NULL \|\| line == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4879 {
25306 078edc1821bf patch 8.2.3190: error messages are spread out Bram Moolenaar <Bram@vim.org> parents: 25147 diff changeset	4880 iemsg(_(e_null_argument));
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4881 goto theend;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4882 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4883
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4884 // Check validity of program.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4885 if (prog_magic_wrong())
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4886 goto theend;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4887
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4888 // If the start column is past the maximum column: no need to try.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4889 if (rex.reg_maxcol > 0 && col >= rex.reg_maxcol)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4890 goto theend;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4891
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4892 // If pattern contains "\c" or "\C": overrule value of rex.reg_ic
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4893 if (prog->regflags & RF_ICASE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4894 rex.reg_ic = TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4895 else if (prog->regflags & RF_NOICASE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4896 rex.reg_ic = FALSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4897
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4898 // If pattern contains "\Z" overrule value of rex.reg_icombine
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4899 if (prog->regflags & RF_ICOMBINE)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4900 rex.reg_icombine = TRUE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4901
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4902 // If there is a "must appear" string, look for it.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4903 if (prog->regmust != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4904 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4905 int c;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4906
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4907 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4908 c = (*mb_ptr2char)(prog->regmust);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4909 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4910 c = *prog->regmust;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4911 s = line + col;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4912
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4913 // This is used very often, esp. for ":global". Use three versions of
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4914 // the loop to avoid overhead of conditions.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4915 if (!rex.reg_ic && !has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4916 while ((s = vim_strbyte(s, c)) != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4917 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4918 if (cstrncmp(s, prog->regmust, &prog->regmlen) == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4919 break; // Found it.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4920 ++s;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4921 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4922 else if (!rex.reg_ic \|\| (!enc_utf8 && mb_char2len(c) > 1))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4923 while ((s = vim_strchr(s, c)) != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4924 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4925 if (cstrncmp(s, prog->regmust, &prog->regmlen) == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4926 break; // Found it.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4927 MB_PTR_ADV(s);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4928 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4929 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4930 while ((s = cstrchr(s, c)) != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4931 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4932 if (cstrncmp(s, prog->regmust, &prog->regmlen) == 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4933 break; // Found it.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4934 MB_PTR_ADV(s);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4935 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4936 if (s == NULL) // Not present.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4937 goto theend;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4938 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4939
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4940 rex.line = line;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4941 rex.lnum = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4942 reg_toolong = FALSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4943
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4944 // Simplest case: Anchored match need be tried only once.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4945 if (prog->reganch)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4946 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4947 int c;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4948
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4949 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4950 c = (*mb_ptr2char)(rex.line + col);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4951 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4952 c = rex.line[col];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4953 if (prog->regstart == NUL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4954 \|\| prog->regstart == c
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4955 \|\| (rex.reg_ic
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4956 && (((enc_utf8 && utf_fold(prog->regstart) == utf_fold(c)))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4957 \|\| (c < 255 && prog->regstart < 255 &&
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4958 MB_TOLOWER(prog->regstart) == MB_TOLOWER(c)))))
29071 b90bca860b5a patch 8.2.5057: using gettimeofday() for timeout is very inefficient Bram Moolenaar <Bram@vim.org> parents: 29012 diff changeset	4959 retval = regtry(prog, col, timed_out);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4960 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4961 retval = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4962 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4963 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4964 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4965 // Messy cases: unanchored match.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4966 while (!got_int)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4967 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4968 if (prog->regstart != NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4969 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4970 // Skip until the char we know it must start with.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4971 // Used often, do some work to avoid call overhead.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4972 if (!rex.reg_ic && !has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4973 s = vim_strbyte(rex.line + col, prog->regstart);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4974 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4975 s = cstrchr(rex.line + col, prog->regstart);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4976 if (s == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4977 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4978 retval = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4979 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4980 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4981 col = (int)(s - rex.line);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4982 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4983
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4984 // Check for maximum column to try.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4985 if (rex.reg_maxcol > 0 && col >= rex.reg_maxcol)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4986 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4987 retval = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4988 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4989 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4990
29071 b90bca860b5a patch 8.2.5057: using gettimeofday() for timeout is very inefficient Bram Moolenaar <Bram@vim.org> parents: 29012 diff changeset	4991 retval = regtry(prog, col, timed_out);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4992 if (retval > 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4993 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4994
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4995 // if not currently on the first line, get it again
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4996 if (rex.lnum != 0)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4997 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4998 rex.lnum = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	4999 rex.line = reg_getline((linenr_T)0);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5000 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5001 if (rex.line[col] == NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5002 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5003 if (has_mbyte)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5004 col += (*mb_ptr2len)(rex.line + col);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5005 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5006 ++col;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5007 #ifdef FEAT_RELTIME
29191 0af5fe160e4e patch 8.2.5115: search timeout is overrun with some patterns Bram Moolenaar <Bram@vim.org> parents: 29071 diff changeset	5008 if (bt_did_time_out(timed_out))
29071 b90bca860b5a patch 8.2.5057: using gettimeofday() for timeout is very inefficient Bram Moolenaar <Bram@vim.org> parents: 29012 diff changeset	5009 break;
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5010 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5011 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5012 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5013
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5014 theend:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5015 // Free "reg_tofree" when it's a bit big.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5016 // Free regstack and backpos if they are bigger than their initial size.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5017 if (reg_tofreelen > 400)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5018 VIM_CLEAR(reg_tofree);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5019 if (regstack.ga_maxlen > REGSTACK_INITIAL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5020 ga_clear(&regstack);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5021 if (backpos.ga_maxlen > BACKPOS_INITIAL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5022 ga_clear(&backpos);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5023
23270 22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5024 if (retval > 0)
23150 90b16a0022e5 patch 8.2.2121: internal error when using ze before zs in a pattern Bram Moolenaar <Bram@vim.org> parents: 22167 diff changeset	5025 {
23270 22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5026 // Make sure the end is never before the start. Can happen when \zs
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5027 // and \ze are used.
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5028 if (REG_MULTI)
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5029 {
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5030 lpos_T *start = &rex.reg_mmatch->startpos[0];
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5031 lpos_T *end = &rex.reg_mmatch->endpos[0];
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5032
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5033 if (end->lnum < start->lnum
23150 90b16a0022e5 patch 8.2.2121: internal error when using ze before zs in a pattern Bram Moolenaar <Bram@vim.org> parents: 22167 diff changeset	5034 \|\| (end->lnum == start->lnum && end->col < start->col))
23270 22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5035 rex.reg_mmatch->endpos[0] = rex.reg_mmatch->startpos[0];
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5036 }
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5037 else
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5038 {
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5039 if (rex.reg_match->endp[0] < rex.reg_match->startp[0])
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5040 rex.reg_match->endp[0] = rex.reg_match->startp[0];
22d0c25869d8 patch 8.2.2181: valgrind warnings for using uninitialized value Bram Moolenaar <Bram@vim.org> parents: 23150 diff changeset	5041 }
23150 90b16a0022e5 patch 8.2.2121: internal error when using ze before zs in a pattern Bram Moolenaar <Bram@vim.org> parents: 22167 diff changeset	5042 }
90b16a0022e5 patch 8.2.2121: internal error when using ze before zs in a pattern Bram Moolenaar <Bram@vim.org> parents: 22167 diff changeset	5043
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5044 return retval;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5045 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5046
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5047 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5048 * Match a regexp against a string.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5049 * "rmp->regprog" is a compiled regexp as returned by vim_regcomp().
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5050 * Uses curbuf for line count and 'iskeyword'.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5051 * if "line_lbr" is TRUE consider a "\n" in "line" to be a line break.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5052 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5053 * Returns 0 for failure, number of lines contained in the match otherwise.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5054 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5055 static int
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5056 bt_regexec_nl(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5057 regmatch_T *rmp,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5058 char_u *line, // string to match against
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5059 colnr_T col, // column to start looking for match
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5060 int line_lbr)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5061 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5062 rex.reg_match = rmp;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5063 rex.reg_mmatch = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5064 rex.reg_maxline = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5065 rex.reg_line_lbr = line_lbr;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5066 rex.reg_buf = curbuf;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5067 rex.reg_win = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5068 rex.reg_ic = rmp->rm_ic;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5069 rex.reg_icombine = FALSE;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5070 rex.reg_maxcol = 0;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5071
29071 b90bca860b5a patch 8.2.5057: using gettimeofday() for timeout is very inefficient Bram Moolenaar <Bram@vim.org> parents: 29012 diff changeset	5072 return bt_regexec_both(line, col, NULL);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5073 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5074
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5075 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5076 * Match a regexp against multiple lines.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5077 * "rmp->regprog" is a compiled regexp as returned by vim_regcomp().
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5078 * Uses curbuf for line count and 'iskeyword'.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5079 *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5080 * Return zero if there is no match. Return number of lines contained in the
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5081 * match otherwise.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5082 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5083 static long
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5084 bt_regexec_multi(
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5085 regmmatch_T *rmp,
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5086 win_T *win, // window in which to search or NULL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5087 buf_T *buf, // buffer in which to search
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5088 linenr_T lnum, // nr of line to start looking for match
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5089 colnr_T col, // column to start looking for match
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5090 int *timed_out) // flag set on timeout or NULL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5091 {
19405 08f4dc2ba716 patch 8.2.0260: several lines of code are duplicated Bram Moolenaar <Bram@vim.org> parents: 18945 diff changeset	5092 init_regexec_multi(rmp, win, buf, lnum);
29071 b90bca860b5a patch 8.2.5057: using gettimeofday() for timeout is very inefficient Bram Moolenaar <Bram@vim.org> parents: 29012 diff changeset	5093 return bt_regexec_both(NULL, col, timed_out);
18019 68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5094 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5095
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5096 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5097 * Compare a number with the operand of RE_LNUM, RE_COL or RE_VCOL.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5098 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5099 static int
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5100 re_num_cmp(long_u val, char_u *scan)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5101 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5102 long_u n = OPERAND_MIN(scan);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5103
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5104 if (OPERAND_CMP(scan) == '>')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5105 return val > n;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5106 if (OPERAND_CMP(scan) == '<')
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5107 return val < n;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5108 return val == n;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5109 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5110
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5111 #ifdef BT_REGEXP_DUMP
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5112
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5113 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5114 * regdump - dump a regexp onto stdout in vaguely comprehensible form
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5115 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5116 static void
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5117 regdump(char_u pattern, bt_regprog_T r)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5118 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5119 char_u *s;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5120 int op = EXACTLY; // Arbitrary non-END op.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5121 char_u *next;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5122 char_u *end = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5123 FILE *f;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5124
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5125 #ifdef BT_REGEXP_LOG
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5126 f = fopen("bt_regexp_log.log", "a");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5127 #else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5128 f = stdout;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5129 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5130 if (f == NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5131 return;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5132 fprintf(f, "-------------------------------------\n\r\nregcomp(%s):\r\n", pattern);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5133
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5134 s = r->program + 1;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5135 // Loop until we find the END that isn't before a referred next (an END
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5136 // can also appear in a NOMATCH operand).
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5137 while (op != END \|\| s <= end)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5138 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5139 op = OP(s);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5140 fprintf(f, "%2d%s", (int)(s - r->program), regprop(s)); // Where, what.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5141 next = regnext(s);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5142 if (next == NULL) // Next ptr.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5143 fprintf(f, "(0)");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5144 else
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5145 fprintf(f, "(%d)", (int)((s - r->program) + (next - s)));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5146 if (end < next)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5147 end = next;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5148 if (op == BRACE_LIMITS)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5149 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5150 // Two ints
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5151 fprintf(f, " minval %ld, maxval %ld", OPERAND_MIN(s), OPERAND_MAX(s));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5152 s += 8;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5153 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5154 else if (op == BEHIND \|\| op == NOBEHIND)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5155 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5156 // one int
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5157 fprintf(f, " count %ld", OPERAND_MIN(s));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5158 s += 4;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5159 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5160 else if (op == RE_LNUM \|\| op == RE_COL \|\| op == RE_VCOL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5161 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5162 // one int plus comparator
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5163 fprintf(f, " count %ld", OPERAND_MIN(s));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5164 s += 5;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5165 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5166 s += 3;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5167 if (op == ANYOF \|\| op == ANYOF + ADD_NL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5168 \|\| op == ANYBUT \|\| op == ANYBUT + ADD_NL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5169 \|\| op == EXACTLY)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5170 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5171 // Literal string, where present.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5172 fprintf(f, "\nxxxxxxxxx\n");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5173 while (*s != NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5174 fprintf(f, "%c", *s++);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5175 fprintf(f, "\nxxxxxxxxx\n");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5176 s++;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5177 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5178 fprintf(f, "\r\n");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5179 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5180
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5181 // Header fields of interest.
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5182 if (r->regstart != NUL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5183 fprintf(f, "start `%s' 0x%x; ", r->regstart < 256
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5184 ? (char *)transchar(r->regstart)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5185 : "multibyte", r->regstart);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5186 if (r->reganch)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5187 fprintf(f, "anchored; ");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5188 if (r->regmust != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5189 fprintf(f, "must have \"%s\"", r->regmust);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5190 fprintf(f, "\r\n");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5191
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5192 #ifdef BT_REGEXP_LOG
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5193 fclose(f);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5194 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5195 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5196 #endif // BT_REGEXP_DUMP
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5197
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5198 #ifdef DEBUG
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5199 /*
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5200 * regprop - printable representation of opcode
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5201 */
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5202 static char_u *
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5203 regprop(char_u *op)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5204 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5205 char *p;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5206 static char buf[50];
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5207
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5208 STRCPY(buf, ":");
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5209
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5210 switch ((int) OP(op))
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5211 {
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5212 case BOL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5213 p = "BOL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5214 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5215 case EOL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5216 p = "EOL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5217 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5218 case RE_BOF:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5219 p = "BOF";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5220 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5221 case RE_EOF:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5222 p = "EOF";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5223 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5224 case CURSOR:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5225 p = "CURSOR";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5226 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5227 case RE_VISUAL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5228 p = "RE_VISUAL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5229 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5230 case RE_LNUM:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5231 p = "RE_LNUM";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5232 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5233 case RE_MARK:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5234 p = "RE_MARK";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5235 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5236 case RE_COL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5237 p = "RE_COL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5238 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5239 case RE_VCOL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5240 p = "RE_VCOL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5241 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5242 case BOW:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5243 p = "BOW";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5244 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5245 case EOW:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5246 p = "EOW";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5247 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5248 case ANY:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5249 p = "ANY";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5250 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5251 case ANY + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5252 p = "ANY+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5253 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5254 case ANYOF:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5255 p = "ANYOF";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5256 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5257 case ANYOF + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5258 p = "ANYOF+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5259 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5260 case ANYBUT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5261 p = "ANYBUT";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5262 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5263 case ANYBUT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5264 p = "ANYBUT+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5265 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5266 case IDENT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5267 p = "IDENT";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5268 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5269 case IDENT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5270 p = "IDENT+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5271 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5272 case SIDENT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5273 p = "SIDENT";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5274 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5275 case SIDENT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5276 p = "SIDENT+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5277 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5278 case KWORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5279 p = "KWORD";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5280 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5281 case KWORD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5282 p = "KWORD+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5283 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5284 case SKWORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5285 p = "SKWORD";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5286 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5287 case SKWORD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5288 p = "SKWORD+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5289 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5290 case FNAME:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5291 p = "FNAME";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5292 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5293 case FNAME + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5294 p = "FNAME+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5295 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5296 case SFNAME:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5297 p = "SFNAME";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5298 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5299 case SFNAME + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5300 p = "SFNAME+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5301 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5302 case PRINT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5303 p = "PRINT";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5304 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5305 case PRINT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5306 p = "PRINT+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5307 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5308 case SPRINT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5309 p = "SPRINT";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5310 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5311 case SPRINT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5312 p = "SPRINT+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5313 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5314 case WHITE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5315 p = "WHITE";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5316 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5317 case WHITE + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5318 p = "WHITE+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5319 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5320 case NWHITE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5321 p = "NWHITE";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5322 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5323 case NWHITE + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5324 p = "NWHITE+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5325 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5326 case DIGIT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5327 p = "DIGIT";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5328 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5329 case DIGIT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5330 p = "DIGIT+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5331 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5332 case NDIGIT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5333 p = "NDIGIT";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5334 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5335 case NDIGIT + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5336 p = "NDIGIT+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5337 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5338 case HEX:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5339 p = "HEX";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5340 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5341 case HEX + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5342 p = "HEX+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5343 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5344 case NHEX:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5345 p = "NHEX";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5346 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5347 case NHEX + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5348 p = "NHEX+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5349 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5350 case OCTAL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5351 p = "OCTAL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5352 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5353 case OCTAL + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5354 p = "OCTAL+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5355 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5356 case NOCTAL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5357 p = "NOCTAL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5358 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5359 case NOCTAL + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5360 p = "NOCTAL+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5361 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5362 case WORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5363 p = "WORD";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5364 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5365 case WORD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5366 p = "WORD+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5367 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5368 case NWORD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5369 p = "NWORD";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5370 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5371 case NWORD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5372 p = "NWORD+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5373 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5374 case HEAD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5375 p = "HEAD";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5376 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5377 case HEAD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5378 p = "HEAD+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5379 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5380 case NHEAD:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5381 p = "NHEAD";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5382 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5383 case NHEAD + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5384 p = "NHEAD+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5385 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5386 case ALPHA:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5387 p = "ALPHA";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5388 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5389 case ALPHA + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5390 p = "ALPHA+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5391 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5392 case NALPHA:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5393 p = "NALPHA";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5394 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5395 case NALPHA + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5396 p = "NALPHA+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5397 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5398 case LOWER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5399 p = "LOWER";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5400 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5401 case LOWER + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5402 p = "LOWER+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5403 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5404 case NLOWER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5405 p = "NLOWER";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5406 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5407 case NLOWER + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5408 p = "NLOWER+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5409 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5410 case UPPER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5411 p = "UPPER";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5412 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5413 case UPPER + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5414 p = "UPPER+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5415 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5416 case NUPPER:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5417 p = "NUPPER";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5418 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5419 case NUPPER + ADD_NL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5420 p = "NUPPER+NL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5421 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5422 case BRANCH:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5423 p = "BRANCH";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5424 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5425 case EXACTLY:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5426 p = "EXACTLY";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5427 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5428 case NOTHING:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5429 p = "NOTHING";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5430 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5431 case BACK:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5432 p = "BACK";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5433 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5434 case END:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5435 p = "END";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5436 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5437 case MOPEN + 0:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5438 p = "MATCH START";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5439 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5440 case MOPEN + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5441 case MOPEN + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5442 case MOPEN + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5443 case MOPEN + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5444 case MOPEN + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5445 case MOPEN + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5446 case MOPEN + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5447 case MOPEN + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5448 case MOPEN + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5449 sprintf(buf + STRLEN(buf), "MOPEN%d", OP(op) - MOPEN);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5450 p = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5451 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5452 case MCLOSE + 0:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5453 p = "MATCH END";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5454 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5455 case MCLOSE + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5456 case MCLOSE + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5457 case MCLOSE + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5458 case MCLOSE + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5459 case MCLOSE + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5460 case MCLOSE + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5461 case MCLOSE + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5462 case MCLOSE + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5463 case MCLOSE + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5464 sprintf(buf + STRLEN(buf), "MCLOSE%d", OP(op) - MCLOSE);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5465 p = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5466 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5467 case BACKREF + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5468 case BACKREF + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5469 case BACKREF + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5470 case BACKREF + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5471 case BACKREF + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5472 case BACKREF + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5473 case BACKREF + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5474 case BACKREF + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5475 case BACKREF + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5476 sprintf(buf + STRLEN(buf), "BACKREF%d", OP(op) - BACKREF);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5477 p = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5478 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5479 case NOPEN:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5480 p = "NOPEN";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5481 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5482 case NCLOSE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5483 p = "NCLOSE";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5484 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5485 #ifdef FEAT_SYN_HL
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5486 case ZOPEN + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5487 case ZOPEN + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5488 case ZOPEN + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5489 case ZOPEN + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5490 case ZOPEN + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5491 case ZOPEN + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5492 case ZOPEN + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5493 case ZOPEN + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5494 case ZOPEN + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5495 sprintf(buf + STRLEN(buf), "ZOPEN%d", OP(op) - ZOPEN);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5496 p = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5497 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5498 case ZCLOSE + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5499 case ZCLOSE + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5500 case ZCLOSE + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5501 case ZCLOSE + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5502 case ZCLOSE + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5503 case ZCLOSE + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5504 case ZCLOSE + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5505 case ZCLOSE + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5506 case ZCLOSE + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5507 sprintf(buf + STRLEN(buf), "ZCLOSE%d", OP(op) - ZCLOSE);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5508 p = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5509 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5510 case ZREF + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5511 case ZREF + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5512 case ZREF + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5513 case ZREF + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5514 case ZREF + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5515 case ZREF + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5516 case ZREF + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5517 case ZREF + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5518 case ZREF + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5519 sprintf(buf + STRLEN(buf), "ZREF%d", OP(op) - ZREF);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5520 p = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5521 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5522 #endif
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5523 case STAR:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5524 p = "STAR";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5525 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5526 case PLUS:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5527 p = "PLUS";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5528 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5529 case NOMATCH:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5530 p = "NOMATCH";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5531 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5532 case MATCH:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5533 p = "MATCH";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5534 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5535 case BEHIND:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5536 p = "BEHIND";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5537 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5538 case NOBEHIND:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5539 p = "NOBEHIND";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5540 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5541 case SUBPAT:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5542 p = "SUBPAT";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5543 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5544 case BRACE_LIMITS:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5545 p = "BRACE_LIMITS";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5546 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5547 case BRACE_SIMPLE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5548 p = "BRACE_SIMPLE";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5549 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5550 case BRACE_COMPLEX + 0:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5551 case BRACE_COMPLEX + 1:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5552 case BRACE_COMPLEX + 2:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5553 case BRACE_COMPLEX + 3:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5554 case BRACE_COMPLEX + 4:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5555 case BRACE_COMPLEX + 5:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5556 case BRACE_COMPLEX + 6:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5557 case BRACE_COMPLEX + 7:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5558 case BRACE_COMPLEX + 8:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5559 case BRACE_COMPLEX + 9:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5560 sprintf(buf + STRLEN(buf), "BRACE_COMPLEX%d", OP(op) - BRACE_COMPLEX);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5561 p = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5562 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5563 case MULTIBYTECODE:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5564 p = "MULTIBYTECODE";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5565 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5566 case NEWL:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5567 p = "NEWL";
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5568 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5569 default:
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5570 sprintf(buf + STRLEN(buf), "corrupt %d", OP(op));
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5571 p = NULL;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5572 break;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5573 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5574 if (p != NULL)
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5575 STRCAT(buf, p);
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5576 return (char_u *)buf;
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5577 }
68fd5296bf73 patch 8.1.2005: the regexp.c file is too big Bram Moolenaar <Bram@vim.org> parents: diff changeset	5578 #endif // DEBUG

Mercurial > vim

annotate src/regexp_bt.c @ 29247:5f314b2ed494 v8.2.5142