From df30b6da377095ea62ac34ee52360178088f797f Mon Sep 17 00:00:00 2001
From: Christopher Lam <christopher.lck@gmail.com>
Date: Sun, 24 Jan 2021 21:56:34 +0800
Subject: [PATCH] [utilities.scm] deprecate unused functions

these functions were never used.
---
 bindings/guile/utilities.scm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/bindings/guile/utilities.scm b/bindings/guile/utilities.scm
index ad0852a4aa..4b1e3c2794 100644
--- a/bindings/guile/utilities.scm
+++ b/bindings/guile/utilities.scm
@@ -72,11 +72,13 @@
 ;; converting into vectors, and vice versa.
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (define (traverse-list->vec lst)
+  (issue-deprecation-warning "traverse-list->vec unused.")
   (cond
    ((list? lst) (list->vector (map traverse-list->vec lst)))
    (else lst)))
 
 (define (traverse-vec->list vec)
+  (issue-deprecation-warning "traverse-vec->list unused.")
   (cond
    ((vector? vec) (map traverse-vec->list (vector->list vec)))
    (else vec)))