Subversion Repositories Vertical

Rev

Rev 2 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

#A component of the edit_acf script, used to strip an ACF file of CHIP declarations
#somewhere in its interface list

BEGIN {
  s = 0;
};

#Look for a chip declaration
/CHIP /||/chip / { 
    s = 2;
    };

    
/^END;/|| /^end;/ {
  if (s == 2) {
#set flag to 1 to show we have skipped the lines
    s= 1;
    };
  };
  

# print to first half of split up to and including "("
//{  if (s == 0 )   { print  }
     if (s == 1 )  s=0; };