diff -ruN klic-3.003-2002-02-18a/runtime/kmain.c klic-3.003-2002-02-18b/runtime/kmain.c
--- klic-3.003-2002-02-18a/runtime/kmain.c	Sun Feb 17 13:18:36 2002
+++ klic-3.003-2002-02-18b/runtime/kmain.c	Mon Feb 18 15:43:57 2002
@@ -52,6 +52,8 @@
 
 #include "options.h"
 
+extern void initiate_prioq(void);
+
 static long num_pes;
 static double max_a_ratio;
 static unsigned long h_size;
@@ -181,7 +183,6 @@
      char **argv;
 {
   declare_globals;
-  q *initiate_prioq();
 #ifdef USESIG
   void init_klic_signal_handling();
 #endif
@@ -288,7 +289,8 @@
     q *allocp;
     struct goalrec *qp;
 
-    allocp = initiate_prioq(heapp());
+    initiate_prioq();
+    allocp = heapp();
     qp = (struct goalrec *) allocp;
 
 #ifdef USESIG
@@ -376,7 +378,9 @@
 #else /*!DIST*/
       if (postmortem_pred == 0 || postmortem_args == 0) break;
       klic_fprintf(stderr, "Starting postmortem processing...\n");
-      allocp = initiate_prioq(heapp()+incrementsize/2); /* dirty patch */
+      set_heapp (heapp() + incrementsize/2);  /* dirty patch */
+      initiate_prioq();
+      allocp = heapp();
       qp = (struct goalrec *) allocp;
       qp->pred = postmortem_pred;
       allocp += 2;
diff -ruN klic-3.003-2002-02-18a/runtime/sched.c klic-3.003-2002-02-18b/runtime/sched.c
--- klic-3.003-2002-02-18a/runtime/sched.c	Sun Feb 17 14:45:48 2002
+++ klic-3.003-2002-02-18b/runtime/sched.c	Mon Feb 18 15:40:47 2002
@@ -102,13 +102,13 @@
 static struct predicate wait_prio_preds[MAXSTDARGS+1];
 static struct predicate wait_penum_preds[MAXSTDARGS+1]; /* for inter nodes */
 
-static q*
-reinitiate_prioq(allocp)
-  q* allocp;
+static void
+reinitiate_prioq(void)
 {
   declare_globals;
   static struct prioqrec* pq;
   static struct prioqrec tail_sentinel = { 0, -1, 0 };
+  q* allocp = heapp();
 
   new_prioqrec(pq);
 
@@ -136,12 +136,11 @@
 
   prioq.next = pq;
 
-  return allocp;
+  set_heapp(allocp);
 }
 
-extern q*
-initiate_prioq(allocp)
-  q* allocp;
+extern void
+initiate_prioq(void)
 {
   int k;
 
@@ -159,7 +158,7 @@
     wait_penum_preds[k].arity = k+2;
   }
 
-  return reinitiate_prioq(allocp);
+  reinitiate_prioq();
 }
 
 extern struct goalrec*