X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FException.h;h=68bd4999ca32b4380c4cf3cbdbe78318313e70f7;hb=d139a7ae37a61da8f641f0cae33d0ceb7479f398;hp=da214d6563eed17d2247b9ceb21c5192530f7d86;hpb=9ac55e08e159d7a4647ab01e7872e69dd762f275;p=ghc-hetmet.git diff --git a/ghc/rts/Exception.h b/ghc/rts/Exception.h index da214d6..68bd499 100644 --- a/ghc/rts/Exception.h +++ b/ghc/rts/Exception.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Exception.h,v 1.4 2000/12/04 12:31:20 simonmar Exp $ + * $Id: Exception.h,v 1.5 2002/12/11 15:36:42 simonmar Exp $ * * (c) The GHC Team, 1998-2000 * @@ -7,8 +7,8 @@ * * ---------------------------------------------------------------------------*/ -extern const StgInfoTable stg_blockAsyncExceptionszh_ret_info; -extern const StgInfoTable stg_unblockAsyncExceptionszh_ret_info; +extern const StgRetInfoTable stg_blockAsyncExceptionszh_ret_info; +extern const StgRetInfoTable stg_unblockAsyncExceptionszh_ret_info; /* Determine whether a thread is interruptible (ie. blocked * indefinitely). Interruptible threads can be sent an exception with