Tex: Allow omitting {} for some macros

Macros like \newcommand can be written both as

\newcommand{\foo}{bar}

and

\newcommand\foo{bar}

Unify \def parsing and \newcommand parsing so that when strategy type
is defined as '\\', the {} pair may or may not be present.

Units/parser-tex.r/newcommand.d/expected.tags

@@ -4,4 +4,5 @@
 \\mysection0	input.tex	/^\\newcommand{\\mysection0}{\\section{#1}}$/;"	C
 \\mysection1	input.tex	/^\\newcommand{\\mysection1}[1]{\\section{#1}}$/;"	C
 \\mysection2	input.tex	/^\\newcommand{\\mysection2}[1][1]{\\section{#1}}$/;"	C
+\\mysection3	input.tex	/^\\newcommand\\mysection3[1][1]{\\section{#1}}$/;"	C
 \\op	input.tex	/^\\DeclareMathOperator{\\op}{foo}$/;"	o

Units/parser-tex.r/newcommand.d/input.tex

@@ -2,6 +2,7 @@
 \newcommand{\mysection0}{\section{#1}}
 \newcommand{\mysection1}[1]{\section{#1}}
 \newcommand{\mysection2}[1][1]{\section{#1}}
+\newcommand\mysection3[1][1]{\section{#1}}
 \renewcommand{\foo}{\section{#1}}
 \providecommand{\bar}{\section{#1}}
 \def\baz{\section{#1}}

parsers/tex.c

@@ -622,13 +622,15 @@ static bool parseWithStrategy (tokenInfo *token,
 		}
 		else if (s->type == '*' && isType (token, '*'))
 			next_token = true;
-		else if ((s->type == '{' && isType (token, '{')) || (s->type == '\\' && isType (token, TOKEN_IDENTIFIER)))
+		else if (((s->type == '{' || s->type == '\\') && isType (token, '{')) ||
+			(s->type == '\\' && isType (token, TOKEN_IDENTIFIER)))
 		{
 			int depth = 1;
+			bool missing_parens = isType (token, TOKEN_IDENTIFIER);
 
 			next_token = true;
 
-			if (s->type == '{' && !readToken (token))
+			if (!missing_parens && !readToken (token))
 			{
 				eof = true;
 				break;
@@ -638,7 +640,7 @@ static bool parseWithStrategy (tokenInfo *token,
 				copyToken (name, token);
 				vStringClear (name->string);
 			}
-			if (s->type == '\\')
+			if (missing_parens)
 			{
 				vStringCat (name->string, token->string);
 				depth = 0;
@@ -831,10 +833,12 @@ static bool parseNewcommandFull (tokenInfo *const token, bool *tokenUnprocessed,
 {
 	bool eof = false;
 
-	/* \newcommand {cmd}[args][opt]{def} */
+	/* \newcommand{cmd}[args][opt]{def} */
+	/* \newcommand\cmd[args][opt]{def} */
+	/* \def\cmd{replacement} */
 	struct TexParseStrategy strategy [] = {
 		{
-			.type = '{',
+			.type = '\\',
 			.flags = 0,
 			.kindIndex = kind,
 			.roleIndex = ROLE_DEFINITION_INDEX,
@@ -875,37 +879,6 @@ static bool parseNewcommand (tokenInfo *const token, bool *tokenUnprocessed)
 	return parseNewcommandFull (token, tokenUnprocessed, TEXTAG_COMMAND);
 }
 
-static bool parseDef (tokenInfo *const token, bool *tokenUnprocessed)
-{
-	bool eof = false;
-
-	/* \def\cmd{replacement} */
-	struct TexParseStrategy strategy [] = {
-		{
-			.type = '\\',
-			.flags = 0,
-			.kindIndex = TEXTAG_COMMAND,
-			.roleIndex = ROLE_DEFINITION_INDEX,
-			.name = NULL,
-			.unique = false,
-		},
-		{
-			.type = '{',
-			.flags = 0,
-			.kindIndex = KIND_GHOST_INDEX,
-			.name = NULL,
-		},
-		{
-			.type = 0
-		}
-	};
-
-	if (parseWithStrategy (token, strategy, tokenUnprocessed))
-		eof = true;
-
-	return eof;
-}
-
 static bool parseNewEnvironment (tokenInfo *const token, bool *tokenUnprocessed)
 {
 	bool eof = false;
@@ -1088,10 +1061,8 @@ static void parseTexFile (tokenInfo *const token)
 				case KEYWORD_newcommand:
 				case KEYWORD_renewcommand:
 				case KEYWORD_providecommand:
-					eof = parseNewcommand (token, &tokenUnprocessed);
-					break;
 				case KEYWORD_def:
-					eof = parseDef (token, &tokenUnprocessed);
+					eof = parseNewcommand (token, &tokenUnprocessed);
 					break;
 				case KEYWORD_declaremathoperator:
 					eof = parseNewcommandFull (token, &tokenUnprocessed, TEXTAG_OPERATOR);

parsers/tex.h

@@ -42,8 +42,8 @@ enum TexNameFlag {
 };
 
 struct TexParseStrategy {
-	/* Expected token type '<', '[', '*', and '{' are supported.
-	 * 0 means the end of strategies.
+	/* Expected token type '<', '[', '*', '{', and '\\' are supported.
+	 * 0 means the end of strategies. '\\' means {} pair may be omitted.
 	 *
 	 * A string between <>, [], or {} (pairs) can be tagged or store to
 	 * a vString. See kindIndex and name field of this structure.