chiark / gitweb /
Initial revision
[ssr] / StraySrc / SDLS / cdll / ordinal
1 #
2 # ordinal
3 #
4 # Add ordinals to a cdll file
5 #
6 # © 1994 Straylight
7 #
8
9 BEGIN   {
10           count=0;
11           write=1;
12         }
13
14 /=/     {
15           print $0,count;
16           count++;
17           write=0;
18         }
19
20         {
21           if (write)
22             print $0;
23           write=1;
24         }