X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=243eae1b76f8a176ceedf00cca1fee332aa3167a;hb=41fea58220e763fcd55830a11a37ff44f21e4358;hp=65305f3d3d2cb9701262422a668cb20555691018;hpb=6099982b0968a636eeccbafccb9a3593f8841449;p=ghc-hetmet.git

diff --git a/rts/Linker.c b/rts/Linker.c
index 65305f3..243eae1 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -523,6 +523,7 @@ typedef struct _RtsSymbolVal {
       SymX(genSymZh)				\
       SymX(genericRaise)			\
       SymX(getProgArgv)				\
+      SymX(getFullProgArgv)				\
       SymX(getStablePtr)			\
       SymX(hs_init)				\
       SymX(hs_exit)				\
@@ -718,6 +719,8 @@ typedef struct _RtsSymbolVal {
       SymX(revertCAFs)                          \
       SymX(RtsFlags)                            \
       SymX(rts_breakpoint_io_action)		\
+      SymX(rts_stop_next_breakpoint)		\
+      SymX(rts_stop_on_exception)		\
       RTS_USER_SIGNALS_SYMBOLS
 
 #ifdef SUPPORT_LONG_LONGS