Re: 01/01: hydra: Work around import problem.

[Danny Milosavljevic]

Hi Ludo,

On Mon, 29 Jan 2018 14:53:03 +0100
address@hidden (Ludovic Courtès) wrote:

> address@hidden (Danny Milosavljevic) skribis:
> 
> > commit ebd6a6445fa7d3db64795840a607815abbd56880
> > Author: Danny Milosavljevic <address@hidden>
> > Date:   Mon Jan 29 13:23:07 2018 +0100
> >
> >     hydra: Work around import problem.
> >     
> >     * build-aux/hydra/gnu-system.scm: qemu-jobs: Work around import problem.
> >     
> >     Follow-up to 1fe805b290f26db477bcd49be91af54f6c5d061f.
> > ---
> >  build-aux/hydra/gnu-system.scm | 2 +-
> >  1 file changed, 1 insertion(+), 1 deletion(-)
> >
> > diff --git a/build-aux/hydra/gnu-system.scm b/build-aux/hydra/gnu-system.scm
> > index 46f09d1..0886d5f 100644
> > --- a/build-aux/hydra/gnu-system.scm
> > +++ b/build-aux/hydra/gnu-system.scm
> > @@ -166,7 +166,7 @@ system.")
> >    (define (adjust-bootloader os)
> >      (if (member system %u-boot-systems)
> >        (operating-system (inherit os)
> > -        (bootloader (bootloader-configuration
> > +        (bootloader ((@ (gnu bootloader) bootloader-configuration)
> >                       (bootloader u-boot-bootloader)
> >                       (target "/dev/null"))))  
> 
> What was the problem exactly?  It’s best to add:
> 
>   (use-modules (gnu bootloader))
> 
> than to use address@hidden
> 
> Ludo’.

Previously, I had added (gnu bootloader) to the existing (use-modules) form
in the file.  That got me this:

evaluating for 'i686-linux' (heap size: 743.0 MiB)...
evaluating for 'armhf-linux' (heap size: 759.0 MiB)...
Backtrace:
In ice-9/boot-9.scm:
    713:2 19 (call-with-prompt _ _ #<procedure default-prompt-handle?>)
In ice-9/eval.scm:
    619:8 18 (_ #(#(#<directory (guile-user) 14c80a0>)))
In ice-9/command-line.scm:
   181:18 17 (_ #<input: string 1bb57e0>)
In unknown file:
          16 (eval (apply (module-ref (resolve-interface (?)) #) #) #)
In /usr/local/bin/hydra-eval-guile-jobs:
   242:18 15 (eval-guile-jobs . _)
In ice-9/boot-9.scm:
    152:2 14 (with-fluid* _ _ _)
In srfi/srfi-1.scm:
   679:15 13 (append-map _ _ . _)
   592:29 12 (map1 _)
   592:29 11 (map1 _)
   592:17 10 (map1 ("armhf-linux"))
In ice-9/eval.scm:
   173:47  9 (_ #(#(#(#(#<module (#{ g859}#) 1748320> #<?> ?) ?) ?) ?))
    159:9  8 (_ #(#(#(#<module (#{ g859}#) 1748320>) #<build-d?> ?) ?))
   196:43  7 (_ #(#(#(#<module (#{ g859}#) 1748320>) #<build-d?> ?) ?))
In guix/store.scm:
  1443:24  6 (run-with-store _ _ #:guile-for-build _ #:system _ # _)
In ice-9/eval.scm:
   191:27  5 (_ #(#(#<module (#{ g859}#) 1748320> #<procedure 6?>) ?))
    163:9  4 (_ #(#(#<module (#{ g859}#) 1748320> #<variable 1?> ?) ?))
   293:34  3 (_ #(#(#<module (#{ g859}#) 1748320> "armhf-linux") #))
   182:19  2 (proc #(#(#<module (#{ g859}#) 1748320> "armhf-lin?") #))
   142:16  1 (compile-top-call _ (7 . bootloader-configuration) (# #))
In unknown file:
           0 (%resolve-variable (7 . bootloader-configuration) #<mod?>)

ERROR: In procedure %resolve-variable:
ERROR: bootloader-configuration: unbound variable

Some deprecated features have been used.  Set the environment
variable GUILE_WARN_DEPRECATED to "detailed" and rerun the
program to get more information.  Set it to "no" to suppress
this message.