~ruther/guix-local

0de71c233cb1d4fdea1d41bfe8a39be778502d81 — Ludovic Courtès 12 years ago 7e873a6
gnu: cross-base: Make the cross tools native inputs.

* gnu/packages/cross-base.scm (cross-gcc): Change `inputs' to
  `native-inputs', and set `inputs' to the empty list.
  (cross-libc): Likewise.
1 files changed, 10 insertions(+), 7 deletions(-)

M gnu/packages/cross-base.scm
M gnu/packages/cross-base.scm => gnu/packages/cross-base.scm +10 -7
@@ 175,7 175,8 @@ GCC that does not target a libc; otherwise, target that libc."
            ;; <http://lists.fedoraproject.org/pipermail/arm/2010-August/000663.html>
            ;; for instance.
            #f))))
    (inputs

    (native-inputs
     `(("patch/cross-env-vars"
        ,(search-patch "gcc-cross-environment-variables.patch"))



@@ 193,6 194,8 @@ GCC that does not target a libc; otherwise, target that libc."
                 ,@inputs)
               inputs))))

    (inputs '())

    ;; Only search target inputs, not host inputs.
    (search-paths
     (list (search-path-specification


@@ 225,9 228,9 @@ XBINUTILS and the cross tool chain."
              (and (zero? (system* "make" "defconfig"))
                   (zero? (system* "make" "mrproper" "headers_check"))))
            ,phases))))
      (inputs `(("cross-gcc" ,xgcc)
                ("cross-binutils" ,xbinutils)
                ,@(package-inputs linux-libre-headers)))))
      (native-inputs `(("cross-gcc" ,xgcc)
                       ("cross-binutils" ,xbinutils)
                       ,@(package-native-inputs linux-libre-headers)))))

  (package (inherit glibc)
    (name (string-append "glibc-cross-" target))


@@ 248,9 251,9 @@ XBINUTILS and the cross tool chain."
              #t))
          ,phases))))
    (propagated-inputs `(("cross-linux-headers" ,xlinux-headers)))
    (inputs `(("cross-gcc" ,xgcc)
              ("cross-binutils" ,xbinutils)
              ,@(package-inputs glibc)))))
    (native-inputs `(("cross-gcc" ,xgcc)
                     ("cross-binutils" ,xbinutils)
                     ,@(package-native-inputs glibc)))))


;;;