--- ray/src/meta/sort.c	2003/06/10 14:51:15	1.4
+++ ray/src/meta/sort.c	2003/11/15 02:13:37	1.8
@@ -1,18 +1,16 @@
 #ifndef lint
-static const char	RCSid[] = "$Id: sort.c,v 1.4 2003/06/10 14:51:15 schorsch Exp $";
+static const char	RCSid[] = "$Id: sort.c,v 1.8 2003/11/15 02:13:37 schorsch Exp $";
 #endif
 /*
  *   Sorting routines for meta-files
  */
 
-#include  "paths.h"
+#include  "platform.h"  /* [_]snprintf() */
+#include  "rtprocess.h" /* getpid() */
+#include  "rterror.h"
 #include  "meta.h"
 
-#ifdef _WIN32
-  #include <process.h> /* getpid() */
-#endif
 
-
 #define  PBSIZE  1000		/* max size of sort block */
 				/* maxalloc must be >= this */
 
@@ -83,7 +81,7 @@ int  (*pcmp)()		/* compares pointers to pointers to pr
  */
 
 void
-mergesort(	/* merge sorted files with list */
+pmergesort(	/* merge sorted files with list */
 
 FILE  *fi[],		/* array of input files */
 int  nf,		/* number of input files */
@@ -94,7 +92,7 @@ FILE  *ofp		/* output file */
 {
     PRIMITIVE  *plp;		/* position in list */
     PRIMITIVE  *pp[NFILES];	/* input primitives */
-    int  minf;
+    int  minf = 0;
     PRIMITIVE  *minp;
     register int i;
 
@@ -105,7 +103,7 @@ FILE  *ofp		/* output file */
 
     for (i = 0; i < nf; i++) {		/* initialize input files */
 	if ((pp[i] = palloc()) == NULL)
-	    error(SYSTEM, "memory exhausted in mergesort");
+	    error(SYSTEM, "memory exhausted in pmergesort");
 	readp(pp[i], fi[i]);
     }
 
@@ -167,7 +165,7 @@ FILE  *ofp
 	if ((fp = ofp) == NULL)
 	    fp = efopen(tfname(height + 1, nt), "w");
 	
-	mergesort(fi, nf, pl, pcmp, fp);
+	pmergesort(fi, nf, pl, pcmp, fp);
 	
 	for (i = 0; i < nf; i++) {
 	    fclose(fi[i]);
@@ -203,7 +201,6 @@ int  (*pcmp)()
 {
     static int  nf = 0,
     		intree = FALSE;
-    FILE  *fp;
 
     if (isglob(pl->pbot->com)) {