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. ;; converting into vectors, and vice versa.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define (traverse-list->vec lst) (define (traverse-list->vec lst)
(issue-deprecation-warning "traverse-list->vec unused.")
(cond (cond
((list? lst) (list->vector (map traverse-list->vec lst))) ((list? lst) (list->vector (map traverse-list->vec lst)))
(else lst))) (else lst)))
(define (traverse-vec->list vec) (define (traverse-vec->list vec)
(issue-deprecation-warning "traverse-vec->list unused.")
(cond (cond
((vector? vec) (map traverse-vec->list (vector->list vec))) ((vector? vec) (map traverse-vec->list (vector->list vec)))
(else vec))) (else vec)))