From 8073f9abf5d76e4051132b4d1b514b305585efd4 Mon Sep 17 00:00:00 2001 From: "kr.angelov" Date: Fri, 1 Nov 2013 16:38:16 +0000 Subject: make gu_exn_is_raised non inlined. this is useful to make it callable from Haskell --- src/runtime/c/gu/exn.h | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'src/runtime/c/gu/exn.h') diff --git a/src/runtime/c/gu/exn.h b/src/runtime/c/gu/exn.h index c043c4b8a..3fefae738 100644 --- a/src/runtime/c/gu/exn.h +++ b/src/runtime/c/gu/exn.h @@ -75,10 +75,8 @@ gu_new_exn(GuExn* parent, GuKind* catch_kind, GuPool* pool); -static inline bool -gu_exn_is_raised(GuExn* err) { - return err && (err->state == GU_EXN_RAISED); -} +bool +gu_exn_is_raised(GuExn* err); static inline void gu_exn_clear(GuExn* err) { -- cgit v1.2.3