projects / ghc-hetmet.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
[project @ 1996-01-08 20:28:12 by partain]
[ghc-hetmet.git] / ghc / runtime / hooks / ErrorHdr.lc
1 \begin{code}
2 #include "rtsdefs.h"
3
4 void
5 ErrorHdrHook (where)
6   FILE *where;
7 {
8     fprintf(where, "\nFail: ");
9 }
10 \end{code}
Glasgow Haskell Compiler with heterogeneous metaprogramming (generalized arrows and modal types)