bug#34319: guix-core failed to build: return used outside of 'with-monad'

[Mark H Weaver]

Hydra is currently unable to produce new evaluations of 'master', due to
a build failure in the 'guix-core' derivation, specifically:

  /gnu/store/50lyirc9g8z8qv9r860hp00d5qm5xijd-guix-core.drv

See below for the tail of the failed build log.

      Mark
       

In ice-9/psyntax.scm:
  1679:45 19 (parse _ _ _ _ _ _ _)
In ice-9/boot-9.scm:
   222:17 18 (map1 (((("l-10a3c941d34314a1-465b" macro . #<procedure 95f660 at 
ice-9/eval.scm:333:13 (a)>) ("placeholder" placeholder) 
("l-10a3c941d34314a1-4657" lexical . #) ("l-10a?" . #) ?) . #)))
In ice-9/psyntax.scm:
  2338:44 17 (expand-let _ _ _ ((line . 497) (column . 6) (filename . 
"./guix/monads.scm")) _ #<procedure build-let (src ids vars val-exps body-exp)> 
_ _ _)
  1679:45 16 (parse _ _ _ _ _ _ _)
In ice-9/boot-9.scm:
   222:17 15 (map1 (((("placeholder" placeholder) ("l-10a3c941d34314a1-4673" 
lexical . tail-10a3c941d34314a1-4674) ("l-10a3c941d34314a1-465b" macro . 
#<procedure 95f660 at ice-9/eval.scm:3?>) ?) ?)))
In ice-9/psyntax.scm:
  1484:23 14 (_ _ _)
In ice-9/boot-9.scm:
   222:29 13 (map1 (#<syntax (mproc head)> #<syntax (lambda (result) (if result 
(return result) (loop tail)))>))
   222:17 12 (map1 (#<syntax (lambda (result) (if result (return result) (loop 
tail)))>))
In ice-9/psyntax.scm:
  1789:11 11 (lp ((if result (return result) (loop tail))) ())
  1679:45 10 (parse _ _ _ _ _ _ _)
In ice-9/boot-9.scm:
   222:17  9 (map1 (((("placeholder" placeholder) ("l-10a3c941d34314a1-4693" 
lexical . result-10a3c941d34314a1-4692) ("placeholder" placeholder) 
("l-10a3c941d34314a1-4673" lexical . #) # # ?) . #)))
In ice-9/psyntax.scm:
  1407:23  8 (_ _ (return result) (loop tail))
  1348:32  7 (syntax-type (return result) (("placeholder" placeholder) 
("l-10a3c941d34314a1-4693" lexical . result-10a3c941d34314a1-4692) 
("placeholder" placeholder) ("l-10a3c941d34314a1-?" . #) ?) ?)
  1559:32  6 (expand-macro #<procedure 3d93ec0 at ice-9/eval.scm:333:13 (a)> _ 
_ _ _ _ _)
In ice-9/boot-9.scm:
   752:25  5 (dispatch-exception _ _ _)
   751:25  4 (dispatch-exception 1 syntax-error (return "return used outside of 
'with-monad'" ((line . 504) (column . 20) (filename . "./guix/monads.scm")) 
(return result) #f))
In guix/build/compile.scm:
    122:6  3 (_ _ . _)
In ice-9/boot-9.scm:
    829:9  2 (catch #t #<procedure 3d511a0 at guix/build/compile.scm:122:6 ()> 
#<procedure 7ffff3d0b888 at guix/build/compile.scm:122:6 args> _)
In guix/build/compile.scm:
   125:21  1 (_)
In unknown file:
           0 (make-stack #t)
guix/build/compile.scm:125:21: Syntax error:
./guix/monads.scm:505:20: return: return used outside of 'with-monad' in form 
(return result)
builder for `/gnu/store/50lyirc9g8z8qv9r860hp00d5qm5xijd-guix-core.drv' failed 
with exit code 1