godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added manual page, some improvements

Browse Source
This commit is contained in:
ceriel
1990-09-21 16:58:20 +00:00
parent de395f4659
commit 0e0bf77274
10 changed files with 465 additions and 132 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
util/grind/list.c
View File

@@ -13,7 +13,6 @@ extern char *dirs[];
extern FILE *fopen();
extern FILE *db_out;
extern t_lineno currline;
#define window_size 21
static int
mk_filnm(dir, file, newname)
@@ -55,6 +54,7 @@ open_file(fn, mode, ffn)
return NULL;
}
#define window_size 21
/* Print a window of window_size lines around line "line" of
file "file".
*/
@@ -103,7 +103,7 @@ lines(file, l1, l2)
for (n = l1; n <= l2; n++) {
register int c;
fprintf(db_out, "%c%5d\t", n == currline ? '>' : ' ', n);
fprintf(db_out, "%c%5d\t", currfile && file == currfile->sy_file && n == currline ? '>' : ' ', n);
do {
c = getc(f);
if (c != EOF) putc(c, db_out);