static char *sccsid
= "@(#)cb.c 4.4 (Berkeley) %G%";
main(argc
,argv
) int argc
;
while((c
= getch()) != EOF
){
if(sflg
== 0 || j
> 0)string
[j
++] = c
;
if(sflg
== 0 || j
> 0)string
[j
++] = c
;
if((eflg
= lookup(welse
)) == 1)gotelse();
if(lookup(welse
) == 1)gotelse();
if(sflg
== 1 && pflg
[level
] != 0){
if((iflev
= siflev
[clevel
]-1) < 0)iflev
= 0;
if(pflg
[level
] >0 && ind
[level
] == 0){
if((peek
= getch()) == ';'){
if(clevel
< slevel
[level
])if(level
> 0)level
--;
while((cc
= getch()) != c
){
if(pflg
[level
] > 0 && ind
[level
] == 0){
if((peek
= getch()) == ';'){
if((peek
= getch()) != '*')continue;
while((cc
= getch()) != '\n')string
[j
++] = cc
;
while((c
= getstr()) != ';');
while((c
= getstr()) != ')'){
stabs
[clevel
][iflev
] = tabs
;
spflg
[clevel
][iflev
] = pflg
[level
];
sind
[clevel
][iflev
] = ind
[level
];
for(i
=0; i
< tabs
; i
++)printf("\t");
if(peek
< 0 && lastchar
!= ' ' && lastchar
!= '\t')pchar
= lastchar
;
lastchar
= (peek
<0) ? getc(stdin
):peek
;
while(string
[kk
] == ' ')kk
++;
for(i
=0; tab
[i
] != 0; i
++){
for(k
=kk
;(r
= tab
[i
][l
++]) == string
[k
] && r
!= '\0';k
++);
if(r
== '\0' && (string
[k
] < 'a' || string
[k
] > 'z' || k
>= j
))return(1);
if((ch
= string
[j
++] = getch()) == '\\'){
if(ch
== '\'' || ch
== '"'){
while((cc
= string
[j
++] = getch()) != ch
)if(cc
== '\\')string
[j
++] = getch();
tabs
= stabs
[clevel
][iflev
];
pflg
[level
] = spflg
[clevel
][iflev
];
ind
[level
] = sind
[clevel
][iflev
];
while((peek
= getch()) == '\t' || peek
== ' '){
if((peek
= getch()) == '/'){
if((peek
= getch()) == '*'){
if((peek
= getch()) == '\n'){
while ((c
= getch()) != EOF
) {
if (j
> i
+ 1 && string
[j
-2] == '*')