volunteer needed to pickup my rust(.scm)

[ng0]

Appended / Inlined is the almost complete rust.
I'm currently not in the position to finish my work on this, but
I feel like this could be published soon.
So if anyone wants to pick up my work, be my guest.

It is not complete in syntax and style. It's also not good as it
may contain unnecessary modules and comments.
As you can find in IRC logs, you will need to create a patch from
https://github.com/rust-lang/rust/pull/32168/files , this is what
enables us and NixOS to build rust.
Description needs to be filled in.

LIke I said, I can't work on this in the next time, but it is
almost complete. I also won't be able to do the last fixes it
needs due to time shared between projects.


gnu/packages/rust.scm :

;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2016 Nils Gillmann <address@hidden>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

(define-module (gnu packages rust)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix git-download)
  #:use-module (guix utils)
  #:use-module (guix build-system gnu)
  ;; #:use-module (gnu packages gcc)
  #:use-module (gnu packages perl)
  #:use-module (gnu packages libffi)
  #:use-module (gnu packages valgrind)
  #:use-module (gnu packages version-control)
  #:use-module (gnu packages curl)
  #:use-module (gnu packages python)
  #:use-module (gnu packages llvm))

;;(list
;; (string-append
;; "https://github.com/rust-lang/rust/archive/";
;; version ".tar.gz")
;;gh "1m2d1dc243s7ym8fq2yag3fr5jvki0q9c39llfwgcpq1gc8jvcn8"))))

;; -> take/recreate patch from 
https://github.com/rust-lang/rust/pull/32168/files

;;(define-public rustc
(define-public rust
  (package
    ;;(name "rustc")
    (name "rust")
    (version "1.8.0")
    (source (origin
              (method url-fetch)
              (uri (string-append
                    ;;"https://static.rust-lang.org/dist/"; name "-"
                    ;;version "-src.tar.gz"))
                    "https://github.com/rust-lang/"; name "/archive/"
                    version ".tar.gz"))
              (file-name (string-append name "-" version ".tar.gz"))
              (sha256
               (base32
                ;;"0jblby81qlbz4csdldsv7hqrcbfwsaa79q265bgb8kcdgqa6ci5g"))))
                "1p45ik0mr818ywy5gpxi68h6md9ndmcpw7g4rx7l6frvfn5xd4sy"))))
    (build-system gnu-build-system)
    (arguments
     `(#:phases
       ;; XXX: commit a3fdde7
       ;;#:configure-flags "--disable-codegen-tests"
       (alist-replace
        'configure
        (lambda* (#:key outputs #:allow-other-keys)
          ;; This old `configure' script doesn't support
          ;; variables passed as arguments.
          (let ((out (assoc-ref outputs "out"))
                (llvm (assoc-ref %build-inputs "llvm")))
            (setenv "CONFIG_SHELL" (which "bash"))
            (zero?
             (system* "./configure"
                      "--disable-codegen-tests"
                      (string-append "--prefix=" out)
                      (string-append "--llvm-root=" llvm)))))
        %standard-phases)))
       ;; #:configure-flags
       ;; (list
       ;;  (string-append "--llvm-root="
       ;;                 (assoc-ref %build-inputs "llvm")))))
    (inputs
     `(("python-2" ,python-2)
       ("curl" ,curl)
       ("git" ,git)
       ("valgrind" ,valgrind)
       ("libffi" ,libffi)
       ("perl" ,perl)
       ("llvm" ,llvm)))
    (home-page "https://www.rust-lang.org/";)
    (synopsis
     "The Rust Programming Language")
    (description
     "LOREM IPSUM BLA")
    (license license:gpl3+)))

-- 
♥Ⓐ ng0