From: sof <unknown>
Date: Mon, 24 Nov 1997 21:08:25 +0000 (+0000)
Subject: [project @ 1997-11-24 21:08:25 by sof]
X-Git-Tag: Approx_2487_patches~1257
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=66dfe58535e6ae604d7f203291a585cdd3411fcd;p=ghc-hetmet.git

[project @ 1997-11-24 21:08:25 by sof]
GranSim msg fix
---

diff --git a/ghc/runtime/main/GranSim.lc b/ghc/runtime/main/GranSim.lc
index 56346ba..cdaee56 100644
--- a/ghc/runtime/main/GranSim.lc
+++ b/ghc/runtime/main/GranSim.lc
@@ -2,7 +2,7 @@
 % (c) The GRASP/AQUA Project, Glasgow University, 1995 - 1996
 %     Hans Wolfgang Loidl
 %
-% Time-stamp: <Thu Jul 25 1996 04:01:57 Stardate: [-31]7860.63 hwloidl>
+% Time-stamp: <Sun Oct 19 1997 23:39:59 Stardate: [-30]0119.72 hwloidl>
 %
 %************************************************************************
 %*                                                                      *
@@ -305,7 +305,7 @@ get_next_event()
 
   if(EventHd == NULL)
     {
-      fprintf(stderr,"No next event\n");
+      fprintf(stderr,"No next event. This may be caused by a circular data dependency in the program.\n");
       EXIT(EXIT_FAILURE);
     }
 
@@ -437,7 +437,7 @@ grab_event()             /* undo prepend_event i.e. get the event */
  eventq event = EventHd;
 
  if(EventHd == NULL) {
-   fprintf(stderr,"No next event (in grab_event)\n");
+   fprintf(stderr,"No next event (in grab_event). This may be caused by a circular data dependency in the program.\n");
    EXIT(EXIT_FAILURE);
  }