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 5c5a93686b7e8985872ed451f53933f5303eba1c created 7 years 1 month ago. By Stefan Schmidt, atusb/fw: update changelog for 0.3 firmware release | |
|---|---|
| 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 | |
