X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FException.h;h=68bd4999ca32b4380c4cf3cbdbe78318313e70f7;hb=4be00ac12eb12a88abadce5d38a17d53fc9339a9;hp=251a957c9f963e78652d5bfa283c16cc15c00940;hpb=afb300f543ff11b13f07fa620df7ef8b07512c79;p=ghc-hetmet.git diff --git a/ghc/rts/Exception.h b/ghc/rts/Exception.h index 251a957..68bd499 100644 --- a/ghc/rts/Exception.h +++ b/ghc/rts/Exception.h @@ -1,14 +1,14 @@ /* ----------------------------------------------------------------------------- - * $Id: Exception.h,v 1.2 2000/03/17 10:24:44 simonmar Exp $ + * $Id: Exception.h,v 1.5 2002/12/11 15:36:42 simonmar Exp $ * - * (c) The GHC Team, 1998-1999 + * (c) The GHC Team, 1998-2000 * * Exception support * * ---------------------------------------------------------------------------*/ -extern const StgInfoTable blockAsyncExceptionszh_ret_info; -extern const StgInfoTable 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