Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/82ede42607140f8e8a05579a43fb4e7376a430db >--------------------------------------------------------------- commit 82ede42607140f8e8a05579a43fb4e7376a430db Author: Geoffrey Mainland <gmain...@microsoft.com> Date: Tue Oct 30 20:49:37 2012 +0000 Properly mark C-- calls to _assertFail as "never returns". >--------------------------------------------------------------- includes/Cmm.h | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/includes/Cmm.h b/includes/Cmm.h index 2b5d93b..36aae9b 100644 --- a/includes/Cmm.h +++ b/includes/Cmm.h @@ -194,7 +194,7 @@ if (predicate) { \ /*null*/; \ } else { \ - foreign "C" _assertFail(NULL, __LINE__); \ + foreign "C" _assertFail(NULL, __LINE__) never returns; \ } #else #define ASSERT(p) /* nothing */ _______________________________________________ Cvs-ghc mailing list Cvs-ghc@haskell.org http://www.haskell.org/mailman/listinfo/cvs-ghc
