@@ -47,15 +47,15 @@ my %CMDLINE_OPTS = (
47
47
# INCLUDE => ['i','|include=s@'],
48
48
# KEEP_GOING => ['k','|keep-going',false], #not in gawk
49
49
# LIB => ['l','|load=s@'],
50
- LANGUAGE => [' L' ,' |language: s' ],
50
+ LANGUAGE => [' L' ,' |language= s' ],
51
51
# --man reserved
52
52
# OUTPUT_FILENAME => ['o','|output=s', ""], # conflict with gawk
53
53
# OPTIMIZE => ['O','|optimize'],
54
54
# SANDBOX => ['S','|sandbox',false],
55
55
# SOURCES reserved
56
56
# --usage reserved
57
57
PRINT_VERSION => [' version' ,' ' , false],
58
- DEFS => [' v' ,' |var: s%' ],
58
+ DEFS => [' v' ,' |var= s%' ],
59
59
# -? reserved
60
60
#
61
61
# gawk(1) long options: --dump-variables, --exec, --gen-po, --lint,
@@ -64,7 +64,7 @@ my %CMDLINE_OPTS = (
64
64
# Long-only options that are specific to axk.
65
65
NO_INPUT => [' no-input' ], # When set, don't read any files. This is so
66
66
# testing with empty inputs is easier.
67
- SHOW => [' show' ,' : s@' ], # which debugging output to print.
67
+ SHOW => [' show' ,' = s@' ], # which debugging output to print.
68
68
# TODO make it a hash instead?
69
69
);
70
70
@@ -143,7 +143,7 @@ sub Main {
143
143
144
144
# Treat the first non-option arg as a script if appropriate
145
145
unless (@{$opts {SOURCES }}) {
146
- croak " No scripts to run" unless @$lrArgs ;
146
+ die " No scripts to run" unless @$lrArgs ;
147
147
push @{$opts {SOURCES }}, [false, shift @$lrArgs ];
148
148
}
149
149
0 commit comments