03/03: read-print: Remove unused procedure.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit b21d05d232ec0aba5abec20e83cc52c1d5163cc3
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Wed Aug 10 16:40:06 2022 +0200

    read-print: Remove unused procedure.
    
    * guix/read-print.scm (combine-vertical-space): Remove.
---
 guix/read-print.scm | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/guix/read-print.scm b/guix/read-print.scm
index 08e219e204..63ff9ca5bd 100644
--- a/guix/read-print.scm
+++ b/guix/read-print.scm
@@ -82,11 +82,6 @@
 (define vertical-space        (record-type-constructor <vertical-space>))
 (define vertical-space-height (record-accessor <vertical-space> 'height))
 
-(define (combine-vertical-space x y)
-  "Return vertical space as high as the combination of X and Y."
-  (vertical-space (+ (vertical-space-height x)
-                     (vertical-space-height y))))
-
 (define canonicalize-vertical-space
   (let ((unit (vertical-space 1)))
     (lambda (space)