Subject: bug#34203: closed (Re: scmutils fails to build)

From: [email-masked] (GNU bug Tracking System)
Date: Mon, 29 Apr 2019 15:23:02 +0000

Your bug report

#34203: scmutils fails to build

which was filed against the guix package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
34203: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=34203
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: scmutils fails to build
From: Ricardo Wurmus <[email-masked]>
To: [email-masked]
Date: Mon, 29 Apr 2019 17:22:09 +0200
List-Id: <debbugs-submit.debbugs.gnu.org>

> scmutils fails to build with the current MIT Scheme.

I have removed the scmutils package with commit 4267481a4e.

-- 
Ricardo

Subject: scmutils fails to build
From: Ricardo Wurmus <[email-masked]>
To: [email-masked]
Date: Fri, 25 Jan 2019 23:15:02 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

scmutils fails to build with the current MIT Scheme.  I first thought it
might just be minor problems, so I applied some patches in build phases:

--8<---------------cut here---------------start------------->8---
diff --git a/gnu/packages/scheme.scm b/gnu/packages/scheme.scm
index bcaccb452..bb2a9f9fb 100644
--- a/gnu/packages/scheme.scm
+++ b/gnu/packages/scheme.scm
@@ -680,8 +680,25 @@ threads.")
                                  "(disk-save \"edwin-mechanics.com\")'"
                                  "| mit-scheme")))
                  (with-directory-excursion "scmutils/scmutils"
-                   (and (zero? (system "mit-scheme < compile.scm"))
-                        (zero? (system make-img))))
+                   ;; Case seems to be important.
+                   (substitute* "kernel/utils.scm"
+                     (("#F") "#f"))
+                   (substitute* "display/exdisplay.scm"
+                     (("SPACE") "space"))
+                   (substitute* "enclose/jinx-utils.scm"
+                     (("Space") "space"))
+                   ;; These files only contain comments, so don't compile them
+                   ;; or else we get an error.
+                   (substitute* "mechanics/compile.scm"
+                     (("\"Lagrangian-evolution\"") "")
+                     (("\"Hamiltonian-evolution\"") "")
+                     (("\"generating-functions\"") ""))
+                   (substitute* "compile.scm"
+                     (("\\(cf \"./patch\"\\)") "(display \"skipping\")"))
+
+                   (invoke "mit-scheme" "--load" "compile.scm")
+                   (unless (zero? (system make-img))
+                     (error "could not build scmutils")))
                  #t)))
            (add-before 'install 'fix-directory-names
              ;; Correct directory names in the startup script.
--8<---------------cut here---------------end--------------->8---

Unfortunately, this is not enough as some procedure bindings have
disappeared, such as “guarantee-procedure-arity”.

The compilation results in a lot of warnings; I’m not sure if they are
harmless.  There is no more recent release of scmutils.  There is a port
to Guile 2.0, but it is not obvious how to compile it:

    https://www.cs.rochester.edu/~gildea/guile-scmutils/

--
Ricardo