Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 2 | mjames | 1 | #A component of the edit_acf script, used to strip an ACF file of CHIP declarations |
| 2 | #somewhere in its interface list |
||
| 3 | |||
| 4 | BEGIN { |
||
| 5 | s = 0; |
||
| 6 | }; |
||
| 7 | |||
| 8 | #Look for a chip declaration |
||
| 9 | /CHIP /||/chip / { |
||
| 10 | s = 2; |
||
| 11 | }; |
||
| 12 | |||
| 13 | |||
| 14 | /^END;/|| /^end;/ { |
||
| 15 | if (s == 2) { |
||
| 16 | #set flag to 1 to show we have skipped the lines |
||
| 17 | s= 1; |
||
| 18 | }; |
||
| 19 | }; |
||
| 20 | |||
| 21 | |||
| 22 | # print to first half of split up to and including "("
|
||
| 23 | //{ if (s == 0 ) { print } |
||
| 24 | if (s == 1 ) s=0; }; |
||
| 25 |