Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix CAML_STATIC_ASSERT for MSVC

master
KC Sivaramakrishnan 2019-06-18 15:05:03 +05:30
parent 1aec112619
commit b22240f53c
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
runtime/caml/misc.h
View File

@ -127,8 +127,10 @@ extern caml_timing_hook caml_minor_gc_begin_hook, caml_minor_gc_end_hook;
extern caml_timing_hook caml_finalise_begin_hook, caml_finalise_end_hook;
#define CAML_STATIC_ASSERT_3(b, l) \
typedef CAMLunused_start \
char static_assertion_failure_line_##l[(b) ? 1 : -1] CAMLunused_end
CAMLunused_start \
char static_assertion_failure_line_##l[(b) ? 1 : -1] \
CAMLunused_end
#define CAML_STATIC_ASSERT_2(b, l) CAML_STATIC_ASSERT_3(b, l)
#define CAML_STATIC_ASSERT(b) CAML_STATIC_ASSERT_2(b, __LINE__)