diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2022-02-06 23:42:10 +0100 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2022-02-07 14:02:26 +0100 |
commit | ecea1a642ff5ff9455179fdf0963d9445d993fc8 (patch) | |
tree | 1faa7ff898a0677a486f0c0816cb4e703699061f | |
parent | 3817ea91b7d93b57c62463d1c7274c5ce4a9369b (diff) |
gnu: Add nhc98.
* gnu/packages/haskell.scm (nhc98): New variable.
-rw-r--r-- | gnu/packages/haskell.scm | 104 |
1 files changed, 104 insertions, 0 deletions
diff --git a/gnu/packages/haskell.scm b/gnu/packages/haskell.scm index 020011d955..647b078dfd 100644 --- a/gnu/packages/haskell.scm +++ b/gnu/packages/haskell.scm @@ -50,6 +50,7 @@ #:use-module (gnu packages elf) #:use-module (gnu packages file) #:use-module (gnu packages gawk) + #:use-module (gnu packages gcc) #:use-module (gnu packages ghostscript) #:use-module (gnu packages libffi) #:use-module (gnu packages linux) @@ -62,6 +63,7 @@ #:use-module (guix build-system gnu) #:use-module (guix download) #:use-module (guix git-download) + #:use-module (guix gexp) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) #:use-module (guix utils) @@ -107,6 +109,108 @@ top of CLISP.") (license license:bsd-4)))) +;; This package contains lots of generated .hc files containing C code to +;; bootstrap the compiler without a Haskell compiler. The included .hc files +;; cover not just the compiler sources but also all Haskell libraries. +(define-public nhc98 + (package + (name "nhc98") + (version "1.22") + (source + (origin + (method url-fetch) + (uri (string-append "https://www.haskell.org/nhc98/nhc98src-" + version ".tar.gz")) + (sha256 + (base32 + "0fkgxgsd2iqxvwcgnad1702kradwlbcal6rxdrgb22vd6dnc3i8l")))) + (build-system gnu-build-system) + (supported-systems '("i686-linux" "x86_64-linux")) + (arguments + (list + #:tests? #false ;there is no test target + #:system "i686-linux" + #:implicit-inputs? #false + #:parallel-build? #false ;not supported + #:strip-binaries? #false ;doesn't work + #:make-flags '(list "all-gcc") + #:phases + #~(modify-phases %standard-phases + (replace 'configure + (lambda _ + (setenv "SHELL" (which "sh")) + (setenv "CPATH" (string-append + (getcwd) "/src/runtime/Kernel:" + (or (getenv "C_INCLUDE_PATH") ""))) + (substitute* "configure" + (("echo '#!/bin/sh'") + (string-append "echo '#!" (which "sh") "'"))) + (with-fluids ((%default-port-encoding #f)) + (substitute* '("script/greencard.inst" + "script/harch.inst" + "script/hi.inst" + "script/hmake-config.inst" + ;; TODO: can't fix this with substitute* + ;"script/hmake.inst" + "script/hood.inst" + "script/hsc2hs.inst" + "script/nhc98-pkg.inst" + "script/nhc98.inst") + (("^MACHINE=.*") "MACHINE=ix86-Linux\n"))) + (invoke "sh" "configure" + (string-append "--prefix=" #$output) + ;; Remove -m32 from compiler/linker invocation + "--ccoption=" + "--ldoption="))) + (replace 'install + (lambda _ + (invoke "sh" "configure" + (string-append "--prefix=" #$output) + ;; Remove -m32 from compiler/linker invocation + "--ccoption=" + "--ldoption=" + "--install")))))) + (native-inputs + `(("findutils" ,findutils) + ("tar" ,tar) + ("bzip2" ,bzip2) + ("gzip" ,gzip) + ("xz" ,xz) + ("diffutils" ,diffutils) + ("file" ,file) + ("gawk" ,gawk) + + ("make" ,gnu-make) + ("sed" ,sed) + ("grep" ,grep) + ("coreutils" ,coreutils) + ("bash" ,bash-minimal) + + ("libc" ,glibc-2.2.5) + ("gcc-wrapper" + ,(module-ref (resolve-interface + '(gnu packages commencement)) + 'gcc-2.95-wrapper)) + ("gcc" + ,(module-ref (resolve-interface + '(gnu packages commencement)) + 'gcc-mesboot0)) + ("binutils" + ,(module-ref (resolve-interface + '(gnu packages commencement)) + 'binutils-mesboot)) + ("kernel-headers" ,linux-libre-headers))) + (home-page "https://www.haskell.org/nhc98") + (synopsis "Nearly a Haskell Compiler") + (description + "nhc98 is a small, standards-compliant compiler for Haskell 98, the lazy +functional programming language. It aims to produce small executables that +run in small amounts of memory. It produces medium-fast code, and compilation +is itself quite fast.") + (license + (license:non-copyleft + "https://www.haskell.org/nhc98/copyright.html")))) + (define-public ghc-4 (package (name "ghc") |