X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FException.hc;fp=ghc%2Frts%2FException.hc;h=688ef58f99d52952f32edbf60c619f182858dfed;hb=6ee03ad09cff73dc73a9395a7de5a25043d7e9d5;hp=fecdd608e02540f8ea9c4c13b6964d5166d95f71;hpb=1060b59bec219335e4f54e991044027c12b70678;p=ghc-hetmet.git diff --git a/ghc/rts/Exception.hc b/ghc/rts/Exception.hc index fecdd60..688ef58 100644 --- a/ghc/rts/Exception.hc +++ b/ghc/rts/Exception.hc @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Exception.hc,v 1.16 2000/11/14 12:52:55 simonmar Exp $ + * $Id: Exception.hc,v 1.17 2000/11/14 12:53:29 simonmar Exp $ * * (c) The GHC Team, 1998-2000 * @@ -282,7 +282,7 @@ VEC_POLY_INFO_TABLE(stg_catch_frame, CATCH_FRAME_BITMAP, NULL/*srt*/, 0/*srt_off * It is used in deleteThread when reverting blackholes. * -------------------------------------------------------------------------- */ -INFO_TABLE(stg_catch_info,catch_entry,2,0,FUN,,EF_,0,0); +INFO_TABLE(stg_catch_info,stg_catch_entry,2,0,FUN,,EF_,0,0); STGFUN(stg_catch_entry) { FB_