From 66dfe58535e6ae604d7f203291a585cdd3411fcd Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Mon, 24 Nov 1997 21:08:25 +0000
Subject: [PATCH] [project @ 1997-11-24 21:08:25 by sof] GranSim msg fix
---
ghc/runtime/main/GranSim.lc | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/ghc/runtime/main/GranSim.lc b/ghc/runtime/main/GranSim.lc
index 56346ba43975..cdaee56da61a 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);
}
--
GitLab