From b305116d15d9b809ee0601261565cc354cde88bc Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Mon, 16 Oct 2023 19:03:02 +0200 Subject: Move `false?` to type module. --- module/vcomponent/base.scm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'module/vcomponent') diff --git a/module/vcomponent/base.scm b/module/vcomponent/base.scm index df47a5f5..2a607fc5 100644 --- a/module/vcomponent/base.scm +++ b/module/vcomponent/base.scm @@ -3,6 +3,7 @@ :use-module (srfi srfi-1) :use-module (srfi srfi-17) :use-module (srfi srfi-88) + :use-module ((hnh util type) :select (false?)) :use-module (hnh util object) :use-module (hnh util lens) :use-module (hnh util table) @@ -87,9 +88,6 @@ (serialize-vcomponent c) p)) - -(define false? not) - (define-type (vcomponent printer: print-vcomponent) (type type: symbol?) (vcomponent-children -- cgit v1.2.3