/[gcl]/gcl/debian/texi.awk
ViewVC logotype

Diff of /gcl/debian/texi.awk

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by camm, Thu Dec 20 20:51:47 2001 UTC revision 1.2 by camm, Sun Feb 3 18:44:07 2002 UTC
# Line 0  Line 1 
1    #!/usr/bin/awk -f
2    
3    /^@defun/ {
4      a=split($0,A,"(");
5      b=split($0,B,")");
6      if (a==b)
7        print ;
8      else {
9        i=1;
10        c=$0;
11      }
12      next;
13    }
14    {
15      if (i) {
16        sub("^ *","");
17        c=c " " $0;
18        a=split(c,A,"(");
19        b=split(c,B,")");
20        if (a==b) {
21          print c;
22          c="";
23          i=0;
24        }
25      } else
26        print;
27    }

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26