From 6af1b3f9b55e95bfee051d73bdbb2257875d97bc Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Mon, 30 Oct 2023 00:16:53 +0100 Subject: Add tests for module introspection. --- module/hnh/module-introspection/all-modules.scm | 3 --- 1 file changed, 3 deletions(-) (limited to 'module/hnh/module-introspection/all-modules.scm') diff --git a/module/hnh/module-introspection/all-modules.scm b/module/hnh/module-introspection/all-modules.scm index 753d5019..5b4b37d2 100644 --- a/module/hnh/module-introspection/all-modules.scm +++ b/module/hnh/module-introspection/all-modules.scm @@ -17,9 +17,6 @@ (ftw dir (lambda args (set! files (cons args files)) #t)) files) -;; (define (fs-find proc dir) -;; (filter proc (fs-find-base dir))) - (define (string-ends-with? string tail) (and (>= (string-length string) (string-length tail)) -- cgit v1.2.3