X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fruntime%2Fhooks%2FOutOfStk.lc;fp=ghc%2Fruntime%2Fhooks%2FOutOfStk.lc;h=0000000000000000000000000000000000000000;hb=438596897ebbe25a07e1c82085cfbc5bdb00f09e;hp=58a1a855fe5f3b8346f7de068fa1cc404a159381;hpb=967cc47f37cb93a5e2b6df7822c9a646f0428247;p=ghc-hetmet.git diff --git a/ghc/runtime/hooks/OutOfStk.lc b/ghc/runtime/hooks/OutOfStk.lc deleted file mode 100644 index 58a1a85..0000000 --- a/ghc/runtime/hooks/OutOfStk.lc +++ /dev/null @@ -1,9 +0,0 @@ -\begin{code} -#include "rtsdefs.h" - -void -StackOverflowHook (I_ stack_size) /* in bytes */ -{ - fprintf(stderr, "Stack space overflow: current size %ld bytes.\nUse `+RTS -Ksize' to increase it.\n", stack_size); -} -\end{code}