mirror of https://github.com/pret/pokeemerald.git
Process calcrom options first
This commit is contained in:
parent
2f6928f016
commit
ceb871e3fa
|
@ -5,14 +5,14 @@ use Getopt::Long;
|
|||
|
||||
my $usage = "Usage: calcrom.pl file.map [--data]\n";
|
||||
|
||||
(@ARGV >= 1)
|
||||
my $showData;
|
||||
GetOptions("data" => \$showData) or die $usage;
|
||||
|
||||
(@ARGV == 1)
|
||||
or die $usage;
|
||||
open(my $file, $ARGV[0])
|
||||
or die "ERROR: could not open file '$ARGV[0]'.\n";
|
||||
|
||||
my $showData;
|
||||
GetOptions("data" => \$showData) or die $usage;
|
||||
|
||||
my $src = 0;
|
||||
my $asm = 0;
|
||||
my $srcdata = 0;
|
||||
|
|
Loading…
Reference in New Issue