bug#57093: 'guix style --whole-file' hangs indefinitely if parenthesis is unmatched

[Mohammed AMAR-BENSABER]

Hi,

guix style --whole-file package.scm hangs indefinitely if parenthesis is 
unmatched. Relevant commit a15542d26df42dabdb5e2f76d150ae200230c3b0.

Here is an example package definition with missing a parenthesis. 

(define-public vim-asyncrun
  (package
    (name "vim-asyncrun")
    (version "2.8.6")
    (source (origin
              (method git-fetch)
              (uri (git-reference
                     (url "https://github.com/skywind3000/asyncrun.vim";)
                     (commit version)))
              (file-name (git-file-name name version))
              (sha256
               (base32
                "11zcw0sll6qg6ha0rr6n1cw5v73azvf7ycwn9lgiwa5cj7rrqjf4"))))
    (build-system copy-build-system)
    (arguments
     '(#:install-plan
       '(("plugin" "share/vim/vimfiles/")
         ("doc/" "share/vim/vimfiles/doc" #:include ("asyncrun.txt")))))
    (home-page "https://github.com/skywind3000/asyncrun.vim";)
    (synopsis "Run Async Shell Commands in Vim")
    (description "This plugin takes the advantage of new APIs in Vim 8 (and
NeoVim) to enable you to run shell commands in background and read output in 
the
quickfix window in realtime.")
    (license license:expat))

-- 
Mohammed 'Renken' AMAR-BENSABER

signature.asc
Description: This is a digitally signed message part.