bug#32779: Cuirass: Crash and unable to restart when an input is unreachable

[ludo@gnu.org (Ludovic Courtès)]

Hello,

Clément Lassieur <clement@lassieur.org> skribis:

> 2018-09-20T01:23:31 fatal: uncaught exception 'git-error' in 'build' fiber!
> 2018-09-20T01:23:31 exception arguments: (#<<git-error> code: -1 message: "failed to resolve address for github.com: Name or service not known" class: 12>)
> In ice-9/boot-9.scm:
>     829:9  9 (catch #t #<procedure 2d2c260 at ice-9/eval.scm:330:13?> ?)
>     705:2  8 (call-with-prompt ("break") #<procedure 2cf9a20 at ice?> ?)
>     705:2  7 (call-with-prompt ("continue") #<procedure 2cf96a0 at ?> ?)
> In ice-9/eval.scm:
>     619:8  6 (_ #(#(#<directory (guile-user) 23ba140> #<variable?> ?)))
> In srfi/srfi-1.scm:
>     640:9  5 (for-each #<procedure process (spec)> (((# . "gu?") ?) ?))
> In ice-9/boot-9.scm:
>    751:25  4 (dispatch-exception 0 git-error (#<<git-error> code: -?>))
> In cuirass/utils.scm:
>     181:8  3 (_ _ #<<git-error> code: -1 message: "failed to resolve?>)
> In ice-9/boot-9.scm:
>     829:9  2 (catch #t #<procedure 2c2d240 at cuirass/utils.scm:181?> ?)
> In cuirass/utils.scm:
>    182:22  1 (_)
> In unknown file:
>            0 (make-stack #t)
> ERROR: In procedure make-stack:
> Throw to key `git-error' with args `(#<<git-error> code: -1 message: "failed to resolve address for github.com: Name or service not known" class: 12>)'.

Fixed in 27f14634102a73d4252d86b912f67e9ad464be1e.  Now it’ll log the
error and keep going.

Ludo’.