Mercurial > hg > CbC > CbC_xv6
comparison src/gearsTools/generate_stub.pl @ 357:e194c940c664
fix Getopt
author | anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 15 Jun 2020 18:41:01 +0900 |
parents | fde5f96c6ff1 |
children | 87a28b02c88f |
comparison
equal
deleted
inserted
replaced
356:599ad98aee00 | 357:e194c940c664 |
---|---|
16 # } Worker; | 16 # } Worker; |
17 | 17 |
18 our($opt_o,$opt_d,$opt_h, $opt_project); | 18 our($opt_o,$opt_d,$opt_h, $opt_project); |
19 | 19 |
20 GetOptions( | 20 GetOptions( |
21 "o=s" => \$opt_o, | 21 "o=s" => \$opt_o, |
22 "d=s" => \$opt_d, | 22 "d=s" => \$opt_d, |
23 "h" => \$opt_h, | 23 "h" => \$opt_h, |
24 "project" => \$opt_project, | 24 "project=s" => \$opt_project, |
25 ); | 25 ); |
26 | 26 |
27 my $dir = "."; | 27 my $dir = "."; |
28 if ($opt_d) { | 28 if ($opt_d) { |
29 $dir = $opt_d; | 29 $dir = $opt_d; |