X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=adac0912a60ced21afc3930a7fde54b58511a3c8;hb=4aedbf70883538ce30a0354d40c47e6db8466b0f;hp=58ee9392c627181e654cbc3687e3b6c230c87985;hpb=cdce647711c0f46f5799b24de087622cb77e647f;p=ghc-hetmet.git diff --git a/rts/Linker.c b/rts/Linker.c index 58ee939..adac091 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -527,6 +527,7 @@ typedef struct _RtsSymbolVal { SymX(initLinker) \ SymX(unpackClosurezh_fast) \ SymX(getApStackValzh_fast) \ + SymX(getStackFramezh_fast) \ SymX(int2Integerzh_fast) \ SymX(integer2Intzh_fast) \ SymX(integer2Wordzh_fast) \ @@ -710,6 +711,8 @@ typedef struct _RtsSymbolVal { SymX(getAllocations) \ SymX(revertCAFs) \ SymX(RtsFlags) \ + Sym(breakPointIOAction) \ + Sym(rts_setStepFlag) \ RTS_USER_SIGNALS_SYMBOLS #ifdef SUPPORT_LONG_LONGS