Merge pull request #3214 from masatake/minor-fixes

masatake · web-flow · commit c5cb48d1ee2c · 2021-12-03T08:58:51.000+09:00
Minor fixes
diff --git a/docs/man/ctags-lang-sql.7.rst b/docs/man/ctags-lang-sql.7.rst
@@ -47,7 +47,6 @@ guest parser for ``plv8``.
 
 EXAMPLES
 --------
-
 tagging code including a user-defined function in a string literal [GH3006]_:
 
 "input.sql"
diff --git a/man/ctags-lang-sql.7.rst.in b/man/ctags-lang-sql.7.rst.in
@@ -47,7 +47,6 @@ guest parser for ``plv8``.
 
 EXAMPLES
 --------
-
 tagging code including a user-defined function in a string literal [GH3006]_:
 
 "input.sql"
diff --git a/parsers/pascal.c b/parsers/pascal.c
@@ -44,7 +44,7 @@ static void createPascalTag (
 	if (PascalKinds [kind].enabled  &&  name != NULL  &&  vStringLength (name) > 0)
 	{
 		initTagEntry (tag, vStringValue (name), kind);
-		if (arglist != NULL && !vStringIsEmpty (arglist))
+		if (arglist && !vStringIsEmpty (arglist))
 		{
 			tag->extensionFields.signature = vStringValue (arglist);
 		}

Original file line number	Diff line number	Diff line change
`@@ -44,7 +44,7 @@ static void createPascalTag (`
`44`	`44`	`if (PascalKinds [kind].enabled && name != NULL && vStringLength (name) > 0)`
`45`	`45`	`{`
`46`	`46`	`initTagEntry (tag, vStringValue (name), kind);`
`47`		`- if (arglist != NULL && !vStringIsEmpty (arglist))`
	`47`	`+ if (arglist && !vStringIsEmpty (arglist))`
`48`	`48`	`{`
`49`	`49`	`tag->extensionFields.signature = vStringValue (arglist);`
`50`	`50`	`}`