summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/gftype.ch
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/gftype.ch')
-rw-r--r--Build/source/texk/web2c/gftype.ch3
1 files changed, 2 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/gftype.ch b/Build/source/texk/web2c/gftype.ch
index a663670e5f7..18357b3f475 100644
--- a/Build/source/texk/web2c/gftype.ch
+++ b/Build/source/texk/web2c/gftype.ch
@@ -426,6 +426,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;
@@ -440,7 +441,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);