blob: a34b2ebff62ba61c7fce1bbd86254d49c7bc1d77 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
#line 18 "columns.nw"
static char rcsid[] = "$Id: columns.nw,v 2.24 2008/10/06 01:03:05 nr Exp nr $";
static char rcsname[] = "$Name: v2_12 $";
#include <stdio.h>
#include "columns.h"
int tabsize = 8;
#line 25 "columns.nw"
int columnwidth (char *s) { /* width of a string in columns */
(void)rcsid; /* avoid a warning */
(void)rcsname; /* avoid a warning */
return limitcolumn(s, 0);
}
#line 31 "columns.nw"
int limitcolumn (char *s, int col) {
while (*s) {
col++;
if (*s=='\t' && tabsize > 0) while (col % tabsize != 0) col++;
s++;
}
return col;
}
#line 40 "columns.nw"
void indent_for (int width, FILE *fp) {
/* write whitespace [[width]] columns wide */
/*fprintf(fp,"<%2d>",width); if (width>4) {fprintf(fp," "); width -= 4;}*/
if (tabsize > 1)
while (width >= tabsize) {
putc('\t', fp);
width -= tabsize;
}
while (width > 0) {
putc(' ', fp);
width--;
}
}
|