IEEE 802.15.4 subsystem
Sign in or create your account | Project List | Help
IEEE 802.15.4 subsystem Git Source Tree
Root/
| Source at commit b0a3001ca23e9ba9a0d004b9971563cc5ef659ea created 7 years 3 months ago. By Werner Almesberger, atusb/atusb.kicad_pcb (C15): resolve silk screen on pad; add via | |
|---|---|
| 1 | #!/usr/bin/perl |
| 2 | $key = shift @ARGV; |
| 3 | $skip = 0; |
| 4 | $skipping = 0; |
| 5 | while (<>) { |
| 6 | if (/^#/ && $. != 1) { |
| 7 | $skip = $_ !~ /$key/; |
| 8 | print unless $skip; |
| 9 | next; |
| 10 | } |
| 11 | if (/^\s/) { |
| 12 | print unless $skipping; |
| 13 | next; |
| 14 | } |
| 15 | print unless $skip; |
| 16 | $skipping = $skip; |
| 17 | $skip = 0; |
| 18 | } |
| 19 | |
