Function parseMatchArg

src/e9tool/e9action.cpp:291–723

* Parse a match argument. */

 * Parse a match argument.
 */
static const MatchArg parseMatchArg(Parser &parser, bool val = false)
{
    bool neg = false;
    int t = parser.getToken();

    // Step (1): attempt to parse a value:
    switch (t)
    {
        case TOKEN_STRING:
            return MatchArg(new MatchVal(strDup(parser.s)));
        case TOKEN_REGEX:
            try
            {
                return MatchArg(new MatchVal(new MatchRegex(parser.s)));
            }
            catch (const std::regex_error &e)
            {
                error("failed to parse regular expression \"%s\"", parser.s);
            }
        case '&':
        {
            if (parser.peekToken() == TOKEN_MEM)
                break;
            std::string name;
            switch (parser.getToken())
            {
                case '.':
                    name += '.';
                    parser.expectToken(TOKEN_NAME);
                    // Fallthrough:
                case TOKEN_NAME:
                    name += parser.s;
                    break;
                case TOKEN_STRING:
                    name += parser.s;
                    break;
                default:
                    parser.unexpectedToken();
            }
            intptr_t val = parseSymbol(parser, name.c_str());
            return MatchArg(val == INTPTR_MIN? new MatchVal():
                                               new MatchVal(val));
        }
        case TOKEN_NIL:
            return MatchArg(new MatchVal(nullptr));
        case '-':
            if (parser.peekToken() != TOKEN_INTEGER)
                return MatchArg(new MatchVal((Access)0x0));
            neg = true;
            // Fallthrough
        case '+':
            parser.expectToken(TOKEN_INTEGER);
            // Fallthrough
        case TOKEN_INTEGER:
            return MatchArg(new MatchVal((neg? -parser.i: parser.i)));
        case TOKEN_REGISTER:
            return MatchArg(new MatchVal((Register)parser.i));
        case TOKEN_MEM: case TOKEN_REG: case TOKEN_IMM: