towards handling frozen refreshes

1 files changed, 38 insertions, 0 deletions

diff --git a/packages/taler-util/src/fnutils.ts b/packages/taler-util/src/fnutils.ts
new file mode 100644
index 000000000..85fac6680
--- /dev/null
+++ b/packages/taler-util/src/fnutils.ts
@@ -0,0 +1,38 @@
+/*
+ This file is part of GNU Taler
+ (C) 2021 Taler Systems S.A.
+
+ GNU Taler is free software; you can redistribute it and/or modify it under the
+ terms of the GNU General Public License as published by the Free Software
+ Foundation; either version 3, or (at your option) any later version.
+
+ GNU Taler is distributed in the hope that it will be useful, but WITHOUT ANY
+ WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+ A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License along with
+ GNU Taler; see the file COPYING.  If not, see <http://www.gnu.org/licenses/>
+ */
+
+/**
+ * Functional programming utilities.
+ */
+export namespace fnutil {
+  export function all<T>(arr: T[], f: (x: T) => boolean): boolean {
+    for (const x of arr) {
+      if (!f(x)) {
+        return false;
+      }
+    }
+    return true;
+  }
+
+  export function any<T>(arr: T[], f: (x: T) => boolean): boolean {
+    for (const x of arr) {
+      if (f(x)) {
+        return true;
+      }
+    }
+    return false;
+  }
+}
\ No newline at end of file