diff options
author | Andreas Scherer <andreas_tex@freenet.de> | 2020-05-30 16:54:36 +0000 |
---|---|---|
committer | Andreas Scherer <andreas_tex@freenet.de> | 2020-05-30 16:54:36 +0000 |
commit | 36b6527ce0c7d1a7e8611a596ecf38d1aae871bd (patch) | |
tree | 4aef90846250480b266a7fbf78171b3ae09da9fa /Build/source/texk/web2c/gftopk.ch | |
parent | fba7c7372892cfcf69fe3302d4e7bb76dc59e361 (diff) |
[WEB2C] Improve typography of WEB sources.
git-svn-id: svn://tug.org/texlive/trunk@55343 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/gftopk.ch')
-rw-r--r-- | Build/source/texk/web2c/gftopk.ch | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/gftopk.ch b/Build/source/texk/web2c/gftopk.ch index d6949da91c8..38dd79decd3 100644 --- a/Build/source/texk/web2c/gftopk.ch +++ b/Build/source/texk/web2c/gftopk.ch @@ -389,6 +389,7 @@ itself will get a new section number. Parse a Unix-style command line. @d argument_is (#) == (strcmp (long_options[option_index].name, #) = 0) +@d do_nothing == {empty statement} @<Define |parse_arguments|@> = procedure parse_arguments; @@ -404,7 +405,7 @@ begin getopt_return_val := getopt_long_only (argc, argv, '', long_options, address_of (option_index)); if getopt_return_val = -1 then begin - {End of arguments; we exit the loop below.} ; + do_nothing; {End of arguments; we exit the loop below.} end else if getopt_return_val = "?" then begin usage (my_name); {|getopt| has already given an error message.} |