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

lint: Speed up the formatting linter.

Browse source 
By using go-to-location which caches the number of bytes to seek by to get to
specific lines in a file.

* guix/lint.scm (report-formatting-issues): Use go-to-location.

Change-Id: I34e4d3acfbb1e14e026d2e7f712ba8d22b56c147
Signed-off-by: Christopher Baines <mail@cbaines.net>
This commit is contained in:
Christopher Baines 2023-10-28 15:16:08 +01:00
parent 1eb3133355
commit aa98a97607
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
guix/lint.scm
View file

@ -1857,7 +1857,8 @@ (define &failure (list 'failure))
(call-with-input-file file
(lambda (port)
(let loop ((line-number 1)
(go-to-location port starting-line 0)
(let loop ((line-number starting-line)
(last-line #f)
(warnings '()))
(let ((line (read-line port)))