| line | % | coverage | branch |
|---|
| 37 | 50 | T | F | if $^O eq 'dos' |
| 112 | 50 | T | F | if (not @ARGV) |
| 137 | 50 | T | F | if /^(\w+):/ |
| 149 | 50 | T | F | unless my($domain, $file, $macro) = /^(AC|AU):(.*):([^:]*)$/ |
| 150 | 100 | T | F | if ($domain eq 'AU') { } |
| 100 | T | F | elsif ($file =~ m[(^|/)m4sugar/(m4sugar|version)\.m4$]) { } |
| 175 | 50 | T | F | unless keys %ac_macros |
| 177 | 50 | T | F | unless keys %au_macros |
| 180 | 50 | T | F | if ($debug) |
| 223 | 50 | T | F | if $debug |
| 224 | 50 | T | F | if $force |
| 225 | 50 | T | F | if $verbose |
| 250 | 50 | T | F | if ($file eq '-') { } |
| 50 | T | F | elsif (not -r "$file") { } |
| 385 | 50 | T | F | unless open INPUT_M4, '> ' . open_quote("$tmp/input.m4") |
| 387 | 50 | T | F | unless open FILE, '< ' . open_quote($file) |
| 395 | 50 | T | F | unless close FILE |
| 397 | 50 | T | F | unless close INPUT_M4 |
| 405 | 50 | T | F | "$file" eq "$tmp/stdin" ? : |