X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FRtsExternal.h;h=f0e7b75f8cbf6353fc3cff93c0cb4201b3d7e96f;hb=48565ca88a6b8a9f8b22add0c50d221a2a4a07e9;hp=b95da387bdb33c994355ade8988a12099b3a8759;hpb=a0d2d5bb9a949bc683d1fe576260f8c09930948a;p=ghc-hetmet.git diff --git a/includes/RtsExternal.h b/includes/RtsExternal.h index b95da38..f0e7b75 100644 --- a/includes/RtsExternal.h +++ b/includes/RtsExternal.h @@ -48,6 +48,7 @@ extern unsigned int n_capabilities; /* grimy low-level support functions defined in StgPrimFloat.c */ extern StgDouble __encodeDouble (I_ size, StgByteArray arr, I_ e); +extern StgDouble __2Int_encodeDouble (I_ j_high, I_ j_low, I_ e); extern StgDouble __int_encodeDouble (I_ j, I_ e); extern StgFloat __encodeFloat (I_ size, StgByteArray arr, I_ e); extern StgFloat __int_encodeFloat (I_ j, I_ e); @@ -111,9 +112,6 @@ extern void setIOManagerPipe (int fd); extern void* allocateExec(unsigned int len); // Breakpoint stuff -extern int rts_stop_next_breakpoint; -extern int rts_stop_on_exception; -extern HsStablePtr rts_breakpoint_io_action; /* ----------------------------------------------------------------------------- Storage manager stuff exported