[project @ 1996-06-30 16:31:21 by partain]

[ghc-hetmet.git] / ghc / runtime / main / GranSim.lc

diff --git a/ghc/runtime/main/GranSim.lc b/ghc/runtime/main/GranSim.lc
index 34828be..f8531ae 100644 (file)
--- a/ghc/runtime/main/GranSim.lc
+++ b/ghc/runtime/main/GranSim.lc
@@ -616,7 +616,7 @@ W_ ariths,branches,loads,stores,floats;
 */
 
 /* This function in Threads.lc is only needed for SimplifiedFetch */
-extern FetchNode PROTO((P_ node,PROC CurrentProc));
+FetchNode PROTO((P_ node,PROC CurrentProc));
 
 I_ 
 GranSimFetch(node /* , liveness_mask */ )