}
vfprintf(stderr, s, ap);
fprintf(stderr, "\n");
- fprintf(stderr, " Please report this as a bug to glasgow-haskell-bugs@haskell.org,\n or http://www.sourceforge.net/projects/ghc/\n");
+ fprintf(stderr, " Please report this as a compiler bug. See:\n http://www.haskell.org/ghc/reportabug\n");
fflush(stderr);
}
- stg_exit(EXIT_INTERNAL_ERROR);
+ abort();
+ // stg_exit(EXIT_INTERNAL_ERROR);
}
void