[project @ 1996-06-27 15:55:53 by partain]

[ghc-hetmet.git] / ghc / includes / SMupdate.lh

diff --git a/ghc/includes/SMupdate.lh b/ghc/includes/SMupdate.lh
index 7da6a10..de1d35c 100644 (file)
--- a/ghc/includes/SMupdate.lh
+++ b/ghc/includes/SMupdate.lh
@@ -348,7 +348,7 @@ EXTFUN(UpdatePAP);
     (IS_MUTABLE(INFO_PTR(closure)) && MUT_LINK(closure) != MUT_NOT_LINKED)
 
 # if defined(GRAN)
-extern I_ AwakenBlockingQueue PROTO((P_));
+extern P_ AwakenBlockingQueue PROTO((P_));
 # else
 extern void AwakenBlockingQueue PROTO((P_));
 # endif