-D turn on debug (level 1) } currently only debug levels are
-Dnnn set debug level to nnn } 0 (none) and 1 (some), default=0
- -lL output for layer L (default: 5)
+ -lL output for layer L (digits, or `*' for any) (default: *)
-e<layersel>[ARSCcLlMNOm]...
Turn on and off drawing of elements in groups.
our $olu_textallowperc= $lmu_marktpt * 5.0/11;
our $pi= atan2(0,-1);
-our $output_layer= 5;
+our $output_layer= '*';
sub allwidth2 ($) {
my ($radius)= @_;
sub cmd_layer {
my ($kl, $k,$l, $eo,$cc);
- return if $ctx->{Draw} =~ m/X/;
$kl= can(\&cva_identity);
+ return if $ctx->{Draw} =~ m/X/;
$kl =~ m/^([A-Za-z_]*)(\d+)$/ or die "invalid layer spec";
($k,$l)=($1,$2);
- if ($l != $output_layer) {
+ if ($output_layer ne '*' && $l != $output_layer) {
$ctx->{Draw} = '';
} elsif ($k eq '') {
$ctx->{Draw}= 'RLMN';
}
foreach $eo (@eopts) {
next unless $k =~ m/^$eo->{GlobRe}$/;
- next unless &{ $eo->{LayerCheck} }($l);
+ next unless $output_layer eq '*' || &{ $eo->{LayerCheck} }($l);
foreach $cc (split //, $eo->{DrawMods}) {
$ctx->{Draw} =~ s/$cc//ig;
$ctx->{Draw} .= $cc if $cc =~ m/[A-Z]/;
m4 -s <$< $o
%-a.ps: %.d4 layout
- ./layout <$< -E10=100$(E_TRACK) $o
+ ./layout <$< $(LAYOUTOPTS) $o
ours-l%.ps: ours.d4 layout
./layout <$< $(LAYOUTOPTS) $o
m4 -s <$< $o
%-a.ps: %.d4 layout
- ./layout <$< -E10=100$(E_TRACK) $o
+ ./layout <$< $(LAYOUTOPTS) $o
ours-l%.ps: ours.d4 layout
./layout <$< $(LAYOUTOPTS) $o
m4 -s <$< $o
%-a.ps: %.d4 layout
- ./layout <$< -E10=100$(E_TRACK) $o
+ ./layout <$< $(LAYOUTOPTS) $o
ours-l%.ps: ours.d4 layout
./layout <$< $(LAYOUTOPTS) $o