X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FEvaluator.h;h=84a44b83c4648026e45ce057f44d0b1d41d2ba8d;hb=53d50b9c155b7deb44267100aa58497b0eedde9f;hp=8c3e9a9c56e9fe8d6a81ec2cc10310c2da381d9e;hpb=35014cf1724f9d832f2f9a3e7e78ee966b4d4a3f;p=ghc-hetmet.git diff --git a/ghc/rts/Evaluator.h b/ghc/rts/Evaluator.h index 8c3e9a9..84a44b8 100644 --- a/ghc/rts/Evaluator.h +++ b/ghc/rts/Evaluator.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Evaluator.h,v 1.8 2000/10/09 11:21:18 daan Exp $ + * $Id: Evaluator.h,v 1.9 2000/12/14 15:19:47 sewardj Exp $ * * (c) The GHC Team, 1998-1999 * @@ -26,7 +26,7 @@ * * ------------------------------------------------------------------------*/ -extern StgThreadReturnCode enter ( Capability* cap, StgClosurePtr obj ); +extern StgThreadReturnCode interpretBCO ( Capability* cap ); extern nat marshall ( char arg_ty, void* arg ); extern nat unmarshall ( char res_ty, void* res );