summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/cwebdir/refsort.w
diff options
context:
space:
mode:
authorAndreas Scherer <andreas_tex@freenet.de>2021-05-02 13:12:20 +0000
committerAndreas Scherer <andreas_tex@freenet.de>2021-05-02 13:12:20 +0000
commitd28619b4358aaa5c7ae210ce855df17e80b042a5 (patch)
tree96141dd0510f9501c56e1b3b0f5331179bd3fff9 /Build/source/texk/web2c/cwebdir/refsort.w
parentac2076a1c1574e8973c41270faf9064b46fd5130 (diff)
Revert "[CWEB] New release 4.3."
This reverts commit 3ccac2a7d0f4a19dde861c6f4c178e853d90f0cc. CWEB 4.3 is seriously broken. git-svn-id: svn://tug.org/texlive/trunk@59048 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/cwebdir/refsort.w')
-rw-r--r--Build/source/texk/web2c/cwebdir/refsort.w11
1 files changed, 6 insertions, 5 deletions
diff --git a/Build/source/texk/web2c/cwebdir/refsort.w b/Build/source/texk/web2c/cwebdir/refsort.w
index e18d1349bf6..162f696f568 100644
--- a/Build/source/texk/web2c/cwebdir/refsort.w
+++ b/Build/source/texk/web2c/cwebdir/refsort.w
@@ -40,9 +40,9 @@ be plenty big enough.
@d abort(c,m) { fprintf(stderr,"%s!\n%s",m,buf); return c; }
@c
-#include "stdio.h"
-#include "strings.h"
-#include "ctype.h"
+#include <stdio.h>
+#include <string.h>
+#include <ctype.h>
@#
typedef struct {
char key[max_key];
@@ -54,7 +54,7 @@ char cur_page[10]; /* page number, as a string */
char buf[max_size]; /* current line of input */
char *input_status; /* |NULL| if end of input reached, else |buf| */
@#
-main()
+int main()
{
register char *p,*q;
register int n; /* current number of items */
@@ -86,7 +86,7 @@ while (1) {
}
@ @<Output the current group@>=
-{ register int k;
+{
for (y=sorted;y<sorted+n;y++) printf("%s\n",(*y)->entry);
printf("\\donewithpage%s\n",cur_page);
}
@@ -162,3 +162,4 @@ characters. Ergo, the following routine replaced a simpler original loop.
for (;*p;p++) *q++=*p;
}
+@* Index.