Move to gawk-3.0.0.

1 files changed, 18 insertions, 0 deletions

diff --git a/awklib/eg/lib/assert.awk b/awklib/eg/lib/assert.awk
new file mode 100644
index 00000000..914aa632
--- /dev/null
+++ b/awklib/eg/lib/assert.awk
@@ -0,0 +1,18 @@
+# assert --- assert that a condition is true. Otherwise exit.
+# Arnold Robbins, arnold@gnu.ai.mit.edu, Public Domain
+# May, 1993
+
+function assert(condition, string)
+{
+    if (! condition) {
+        printf("%s:%d: assertion failed: %s\n",
+            FILENAME, FNR, string) > "/dev/stderr"
+        _assert_exit = 1
+        exit 1
+    }
+}
+
+END {
+    if (_assert_exit)
+        exit 1
+}