mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
gnu: build: Improve comments.
* gnu/build/file-systems.scm (iso9660-superblock-volume-name): Add clarifying comment.
This commit is contained in:
parent
1c797d4bfb
commit
cdc701ea48
1 changed files with 1 additions and 0 deletions
|
@ -283,6 +283,7 @@ (define (digits->string bytes)
|
|||
(define (iso9660-superblock-volume-name sblock)
|
||||
"Return the volume name of SBLOCK as a string. The volume name is an ASCII
|
||||
string. Trailing spaces are trimmed."
|
||||
;; Note: Valid characters are of the set "[0-9][A-Z]_" (ECMA-119 Appendix A)
|
||||
(string-trim-right (latin1->string (sub-bytevector sblock 40 32)
|
||||
(lambda (c) #f)) #\space))
|
||||
|
||||
|
|
Loading…
Reference in a new issue