~ruther/guix-local: gnu: scsh: Fix build with gcc-14.

98902924efc8b63e782267a8225bf7e8d77a1eb6 — Andreas Enge 1 year, 2 months ago 0587006

gnu: scsh: Fix build with gcc-14.

* gnu/packages/shells.scm (scsh)[arguments]<#:phases>{fix-includes}:
New phase.

Change-Id: I98d6d09e73ef4e99cc4a67cf5ec6d6ea56e82338

patch browse .tar.gz .zip

1 files changed, 10 insertions(+), 1 deletions(-)

M gnu/packages/shells.scm

M gnu/packages/shells.scm => gnu/packages/shells.scm +10 -1

@@ 684,7 684,16 @@ use of experts and novices alike.")
                                              #$(package-version scheme48)
                                              "/rx")))
                   (delete-file-recursively "rx")
-                  (symlink rxpath "rx")))))))
+                  (symlink rxpath "rx"))))
+            (add-after 'replace-rx 'fix-includes
+              (lambda _
+                (with-directory-excursion "c"
+                  (substitute* "syscalls.c"
+                    (("#include <stdlib.h>" all)
+                     (string-append all "\n#include <time.h>")))
+                  (substitute* "tty.c"
+                    (("#include <termios.h>" all)
+                     (string-append all "\n#include <pty.h>")))))))))
       (inputs
        (list scheme48 scheme48-rx))
       (native-inputs