IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

[utilities.scm] deprecate unused functions

Browse Source 
these functions were never used.
This commit is contained in:
Christopher Lam 2021-01-24 21:56:34 +08:00
parent 0389905f78
commit df30b6da37
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
bindings/guile/utilities.scm
View File

@ -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)))