Move string-blank? to (dump utils).

* dump.scm (string-blank?): Move to ...
* dump/utils.scm (string-blank?): ... here.

1 files changed, 0 insertions, 4 deletions

diff --git a/dump.scm b/dump.scm
index a763671..8e2057e 100755
--- a/dump.scm
+++ b/dump.scm
@@ -128,10 +128,6 @@ characters with an underscore and prefixing with gn:PREFIX."
              (drop char-list 1)
              char-list)))))
 
-(define (string-blank? str)
-  "Return non-#f if STR consists only of whitespace characters."
-  (string-every char-set:whitespace str))
-
 (define (scm->triples alist id)
   (for-each (match-lambda
               ((predicate . object)