1/* os2 build scripts 2 3this script is used to process def results. 4Adds ordinal number to every line. 5 6*/ 7 8lmax = 0 9smax = '' 10 11ord = 1 12do while( lines()) 13 14 l = linein() 15 IF LENGTH(l)>0 THEN DO 16 say l /* ' @'ord ' RESIDENTNAME' */ 17 ord = ord + 1 18 END 19end
| 21/* os2 build scripts 22 23this script is used to process def results. 24Adds ordinal number to every line. 25 26*/ 27 28lmax = 0 29smax = '' 30 31ord = 1 32do while( lines()) 33 34 l = linein() 35 IF LENGTH(l)>0 THEN DO 36 say l /* ' @'ord ' RESIDENTNAME' */ 37 ord = ord + 1 38 END 39end
|