GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-09 04:59:31 -06:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
kr.angelov
2013-11-01 16:38:16 +00:00
parent fcb5b173f7
commit 330e33a386
2 changed files with 7 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/runtime/c/gu/exn.c
View File

@@ -15,6 +15,11 @@ gu_new_exn(GuExn* parent, GuKind* catch, GuPool* pool)
return exn;
}
bool
gu_exn_is_raised(GuExn* err) {
return err && (err->state == GU_EXN_RAISED);
}
void
gu_exn_block(GuExn* err)
{

6
src/runtime/c/gu/exn.h
View File

@@ -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) {