make gu_exn_is_raised non inlined. this is useful to make it callable from Haskell

This commit is contained in:
kr.angelov committed 2013-11-01 16:38:16 +00:00
1 parent d454165f24
commit 8073f9abf5
2 files changed
+7 -4

No files matched your search

+5
View File
@@ -15,6 +15,11 @@ gu_new_exn(GuExn* parent, GuKind* catch, GuPool* pool)
return exn; return exn;
} }
bool
gu_exn_is_raised(GuExn* err) {
return err && (err->state == GU_EXN_RAISED);
}
void void
gu_exn_block(GuExn* err) gu_exn_block(GuExn* err)
{ {
+2 -4
View File
@@ -75,10 +75,8 @@ gu_new_exn(GuExn* parent, GuKind* catch_kind, GuPool* pool);
static inline bool bool
gu_exn_is_raised(GuExn* err) { gu_exn_is_raised(GuExn* err);
return err && (err->state == GU_EXN_RAISED);
}
static inline void static inline void
gu_exn_clear(GuExn* err) { gu_exn_clear(GuExn* err) {