From 408d8e9fc896193fbcff1afd12aa04ab6d513798 Mon Sep 17 00:00:00 2001
From: Florian Dold <florian@dold.me>
Date: Tue, 24 Aug 2021 14:25:46 +0200
Subject: towards handling frozen refreshes

---
 packages/taler-util/src/fnutils.ts       | 38 ++++++++++++++++++++++++++++++++
 packages/taler-util/src/index.browser.ts |  3 ++-
 2 files changed, 40 insertions(+), 1 deletion(-)
 create mode 100644 packages/taler-util/src/fnutils.ts

(limited to 'packages/taler-util')

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
diff --git a/packages/taler-util/src/index.browser.ts b/packages/taler-util/src/index.browser.ts
index a4b5cc8db..1c379bd93 100644
--- a/packages/taler-util/src/index.browser.ts
+++ b/packages/taler-util/src/index.browser.ts
@@ -18,4 +18,5 @@ export * from "./transactionsTypes.js";
 export * from "./walletTypes.js";
 export * from "./i18n.js";
 export * from "./logging.js";
-export * from "./url.js";
\ No newline at end of file
+export * from "./url.js";
+export { fnutil } from "./fnutils.js";
\ No newline at end of file
-- 
cgit v1.2.3