nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

progress: 'progress-reporter-report!' takes any number of arguments. 

* guix/progress.scm (progress-reporter-report!): Accept an arbitrary
number of arguments and pass them to REPORT.
This commit is contained in:
Ludovic Courtès 2018-09-25 10:22:59 +02:00
parent 2e3a6250f8
commit cfe19684ea
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
guix/progress.scm
View File

@ -70,11 +70,11 @@ stopped."
(($ <progress-reporter> start report stop) (($ <progress-reporter> start report stop)
(start)))) (start))))
(define (progress-reporter-report! reporter) (define (progress-reporter-report! reporter . args)
"Low-level procedure to lead REPORTER to emit a report." "Low-level procedure to lead REPORTER to emit a report."
(match reporter (match reporter
(($ <progress-reporter> start report stop) (($ <progress-reporter> start report stop)
(report)))) (apply report args))))
(define (stop-progress-reporter! reporter) (define (stop-progress-reporter! reporter)
"Low-level procedure to stop REPORTER." "Low-level procedure to stop REPORTER."