aboutsummaryrefslogtreecommitdiff
path: root/src/common.hff
diff options
context:
space:
mode:
authorlemon <lsof@mailbox.org>2022-08-08 19:31:35 +0200
committerlemon <lsof@mailbox.org>2022-08-08 19:31:35 +0200
commitdddbdcbeb41777c1e98e37281dddd6f3c89a1280 (patch)
tree6c172f13a3d7d92bc31b8a045d81b7fa7caad007 /src/common.hff
parentfc55daf22dd890860ac9c1a0a29900977a700df2 (diff)
ok
Diffstat (limited to 'src/common.hff')
-rw-r--r--src/common.hff12
1 files changed, 12 insertions, 0 deletions
diff --git a/src/common.hff b/src/common.hff
new file mode 100644
index 0000000..71e3be0
--- /dev/null
+++ b/src/common.hff
@@ -0,0 +1,12 @@
+import "libc.hff";
+
+defmacro assert {
+(ex,s) [ (do
+ if not (ex) {
+ fprintf(stderr, "%s:%d: assertion failed: ", #FILE, #LINE);
+ fprintf(stderr, "`%s'", (s));
+ fprintf(stderr, "\n");
+ abort();
+ }
+) ]
+}