1 /*   .   */

2 /*         */     

3

4 ((include        <std.io.li>                                          

5 ((define         TABSIZE         8                                

7 /*   findstop */                                I  

I         8 int.Rnstoptint *);

10 main()

11 (                                                                      

12 int ;          /* ,   stdin */

13 int posn = 0;   /*     */

14 int inc;        /*     */

15

16 while (( = getcharO) != EOF)

17          switch()

18                   {

19                  case '\t':      /*  -   */

20                           inc = findstop(sposn) ;

21                          fort ; inc > 0; inc )

22                                  putcharC ');

23                          break;

24                  case '\n':      /*  -    */

25                          putchar(c);

26                          posn = 0;

27                          break;

28                  default:        /*  - -  */

29                          putchar(c);

30                         posn++;

31         /              break;

32       /        )

34 }^-

35

36 /*       */

/                                                    

38 int findstaia'Unt *col)

39 (      f^'

40 int colindex, retval;                        ^

41 retval = (TABSIZE - (*col  TABSIZE));    /

42                                          ./

43 /  (   )
    * 1^

44 *col += retval;

45

46 return retval;     /*    
   */

47 )

. 27.4.  badtabs.  (     
;      )

 27.                                          841