[MLton-commit] r5013
Vesa Karvonen
vesak at mlton.org
Sat Dec 30 18:43:51 PST 2006
Simplified.
----------------------------------------------------------------------
U mltonlib/trunk/org/mlton/vesak/libc/unstable/detail/define.h
----------------------------------------------------------------------
Modified: mltonlib/trunk/org/mlton/vesak/libc/unstable/detail/define.h
===================================================================
--- mltonlib/trunk/org/mlton/vesak/libc/unstable/detail/define.h 2006-12-31 02:01:21 UTC (rev 5012)
+++ mltonlib/trunk/org/mlton/vesak/libc/unstable/detail/define.h 2006-12-31 02:43:51 UTC (rev 5013)
@@ -4,12 +4,12 @@
* See the LICENSE file or http://mlton.org/License for details.
*/
-#define STATIC_ASSERT(c) \
-extern void static_assert(int static_assert[(c) ? 1 : -1])
+#define STATIC_ASSERT(c) \
+extern int static_assert[(c) ? 1 : -1]
#define ASSERT_EXISTS(name, type) \
-extern int exists_##name(type* assert_exists); \
-extern void exists_aux_##name(int assert_exists[sizeof(exists_##name(&name))]);
+extern type* assert_exists_##name; \
+extern int assert_exists[1+0*sizeof(assert_exists_##name = &name)];
#define CONSTANT(name, type) \
STATIC_ASSERT(sizeof(type) == sizeof(name)); \
More information about the MLton-commit
mailing list