ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 07:26:13 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

read-print: Remove unused procedure.

Browse source 
* guix/read-print.scm (combine-vertical-space): Remove.
This commit is contained in:
Ludovic Courtès 2022-08-10 16:40:06 +02:00
parent ebda12e1d2
commit b21d05d232
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 0 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
guix/read-print.scm
View file

@ -82,11 +82,6 @@ (define vertical-space? (record-predicate <vertical-space>))
(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)