From 3dbdc3e893bd4203707b1f0a6c30683a74c7e88c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Thu, 2 Apr 2020 23:14:02 +0200 Subject: Remove ensure? for configs, built in instead. --- module/util/config.scm | 9 --------- 1 file changed, 9 deletions(-) (limited to 'module/util') diff --git a/module/util/config.scm b/module/util/config.scm index fbf2bebe..68758ad0 100644 --- a/module/util/config.scm +++ b/module/util/config.scm @@ -15,15 +15,6 @@ :use-module (util) ) -(define-public (ensure pred?) - (lambda (v) - (unless (pred? v) - (error (format #f "Value [~s] doesn't satisfy condition ~a" - v (or (procedure-name pred?) "")))) - v)) - - - (define-once config-values (make-hash-table)) (define-record-type -- cgit v1.2.3