Allow auto-declarations for dbdExpand.pl

This commit is contained in:
Simon Rose
2023-11-23 15:56:21 +01:00
committed by Andrew Johnson
parent 116881ad87
commit d9d35a4eab
+7 -3
View File
@@ -20,10 +20,14 @@ use EPICS::Getopts;
use EPICS::Readfile;
use EPICS::macLib;
our ($opt_D, @opt_I, @opt_S, $opt_o);
our ($opt_D, $opt_A, @opt_I, @opt_S, $opt_o);
getopts('DI@S@o:') or
die "Usage: dbdExpand [-D] [-I dir] [-S macro=val] [-o out.dbd] in.dbd ...";
getopts('DAI@S@o:') or
die "Usage: dbdExpand [-D] [-A] [-I dir] [-S macro=val] [-o out.dbd] in.dbd ...";
if ($opt_A) {
$DBD::Parser::allowAutoDeclarations = 1;
}
my @path = map { split /[:;]/ } @opt_I; # FIXME: Broken on Win32?
my $macros = EPICS::macLib->new(@opt_S);