02/11: gnu: m2-planet: Update to 1.7.0-31-g358b6cf.

[guix-commits]

janneke pushed a commit to branch wip-full-source-bootstrap
in repository guix.

commit c58519b170ecf701d62c4581bd913d62fc5deb38
Author: Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
AuthorDate: Thu Dec 31 21:05:28 2020 +0100

    gnu: m2-planet: Update to 1.7.0-31-g358b6cf.
    
    * guix/git/mes.scm (m2-planet)[source]: Update to 1.7.0-31-g358b6cf.
    [arguments]: Add CC to make-flags.  Update sha256sum patching.
---
 gnu/packages/mes.scm | 66 ++++++++++++++++++++++++++--------------------------
 1 file changed, 33 insertions(+), 33 deletions(-)

diff --git a/gnu/packages/mes.scm b/gnu/packages/mes.scm
index 9eda057..60d1763 100644
--- a/gnu/packages/mes.scm
+++ b/gnu/packages/mes.scm
@@ -328,36 +328,36 @@ get_machine.")
     (license gpl3+)))
 
 (define-public m2-planet
-  (let ((commit "b87ddb0051b168ea45f8d49a610dcd069263336a")
-        (revision "2"))
-    (package
-      (name "m2-planet")
-      (version (string-append "1.4.0-" revision "." (string-take commit 7)))
-      (source (origin
-                (method git-fetch)
-                (uri (git-reference
-                      (url "https://github.com/oriansj/m2-planet";)
-                      (commit commit)))
-                (file-name (git-file-name name version))
-                (sha256
-                 (base32
-                  "0yyc0fcbbxi9jqa1n76x0rwspdrwmc8g09jlmsw9c35nflrhmz8q"))))
-      (native-inputs
-       `(("mescc-tools" ,mescc-tools)))
-      (build-system gnu-build-system)
-      (arguments
-       `(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs 
"out")))
-         #:tests? #f
-         #:phases (modify-phases %standard-phases
-                    (delete 'bootstrap)
-                    (delete 'configure))))
-      (synopsis "The PLAtform NEutral Transpiler")
-      (description
-       "M2-Planet, the PLAtform NEutral Transpiler, when combined with
-mescc-tools, compiles a subset of the C language into working binaries with
-introspective steps in between.  It is self-hosting and for bootstrapping it
-also has an implementation in the M1 macro assembly language.  M2-Planet is
-built as Phase-5 of the full source bootstrapping process and is capable of
-building GNU Mes.")
-      (home-page "https://github.com/oriansj/m2-planet";)
-      (license gpl3+))))
+  (package
+    (name "m2-planet")
+    (version "1.7.0-31-g358b6cf")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "https://lilypond.org/janneke/guix/20210101/";
+                    "m2-planet-" version ".tar.gz"))
+              (sha256
+               (base32
+                "1l20drk9pgxxqbbz635p7cb26s6cw70qlgrzmf46p2vfs3pyalks"))))
+    (native-inputs
+     `(("mescc-tools" ,mescc-tools)))
+    (build-system gnu-build-system)
+    (arguments
+     `(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out"))
+                          (string-append "CC=" ,(cc-for-target)))
+       #:tests? #f
+       #:phases (modify-phases %standard-phases
+                  (delete 'bootstrap)
+                  (delete 'configure)
+                  (add-after 'unpack 'patch-prefix
+                    (lambda _
+                      (substitute* "sha256.sh"
+                        (("\\$\\(which sha256sum\\)") (which "sha256sum")))
+                      #t)))))
+    (synopsis "The PLAtform NEutral Transpiler")
+    (description
+     "M2-Planet, The PLAtform NEutral Transpiler, when combined with
+mescc-tools compiles a subset of the C language into working binaries
+with introspective steps inbetween.")
+    (home-page "https://github.com/oriansj/m2-planet";)
+    (license gpl3+)))