blob: 777c00a623fcb8abe4787bbb1d7948634296e30b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
|
{ nixpkgs }:
with nixpkgs;
with nixpkgs.lib;
let
# provided by .envrc
root = builtins.getEnv "BIZ_ROOT";
# general functions to put in a lib
lines = s: strings.splitString "\n" s;
seq = ls: builtins.filter (x: x!= null) ls;
depsToPackageSet = packageSet: deps:
map (s: builtins.getAttr s packageSet) deps;
# do the build...
claySrc = pkgs.fetchFromGitHub {
owner = "sebastiaanvisser";
repo = "clay";
rev = "cc7729b1b42a79e261091ff7835f7fc2a7ae3cee";
sha256 = "1vd67976lvi5l4qq18zy6j44apynkl44ps04p8vwfx4gzr895dyp";
};
ghc865_ = pkgs.haskell.packages.ghc865.override (oldAttrs: {
overrides = with pkgs.haskell.lib; self: super: {
clay = self.callCabal2nix "clay" claySrc {};
wai-middleware-metrics = dontCheck super.wai-middleware-metrics;
};
});
# ghcjs-8.6.0.1
ghcjs_ = pkgs.haskell.packages.ghcjs.override (oldAttrs: {
overrides = with pkgs.haskell.lib; self: super: {
QuickCheck = dontCheck super.QuickCheck;
base-compat-batteries = dontCheck super.http-types;
clay = dontCheck (self.callCabal2nix "clay" claySrc {});
comonad = dontCheck super.comonad;
http-types = dontCheck super.http-types;
network-uri= dontCheck super.network-uri;
scientific = dontCheck super.scientific; # takes forever
servant = dontCheck super.servant;
tasty-quickcheck = dontCheck super.tasty-quickcheck;
time-compat = dontCheck super.time-compat;
};
});
in {
buildGhc = main:
let
relpath = builtins.replaceStrings ["${root}/"] [""] (builtins.toString main);
module = builtins.replaceStrings ["/" ".hs"] ["." ""] relpath;
content = builtins.readFile main;
exe = builtins.head (lists.flatten (seq
(map (builtins.match "^-- : exe ([[:alnum:]._-]*)$")
(lines content))));
deps = lists.flatten (seq
(map (builtins.match "^-- : dep ([[:alnum:]._-]*)$")
(lines content)));
ghc = ghc865_.ghcWithPackages (hp: depsToPackageSet hp deps);
in stdenv.mkDerivation {
name = module;
version = "0";
src = ./.;
nativeBuildInputs = [ ghc ];
strictDeps = true;
buildPhase = ''
#
mkdir -p $out/{bin,static} ${baseNameOf relpath}
#
# compile with ghc
#
${ghc}/bin/ghc -Werror -i. \
--make ${main} \
-main-is ${module} \
-o $out/bin/${exe}
'';
# the install process was handled above
installPhase = "exit 0";
} // { env = ghc; };
buildGhcjs = main:
let
relpath = builtins.replaceStrings ["${root}/"] [""] (builtins.toString main);
module = builtins.replaceStrings ["/" ".hs"] ["." ""] relpath;
content = builtins.readFile main;
exe = builtins.head (lists.flatten (seq
(map (builtins.match "^-- : exe ([[:alnum:]._-]*)$")
(lines content))));
deps = lists.flatten (seq
(map (builtins.match "^-- : dep ([[:alnum:]._-]*)$")
(lines content)));
ghcjs = ghcjs_.ghcWithPackages (hp: depsToPackageSet hp deps);
in stdenv.mkDerivation {
name = module;
version = "0";
src = ./.;
nativeBuildInputs = [ ghcjs ];
strictDeps = true;
buildPhase = ''
#
mkdir -p $out/{bin,static} ${baseNameOf relpath}
#
# compile with ghcjs
#
${ghcjs}/bin/ghcjs -Werror -i. \
--make ${main} \
-main-is ${module} \
-o ${exe}
#
# optimize js output
#
${pkgs.closurecompiler}/bin/closure-compiler \
${exe}.jsexe/all.js > $out/static/${exe}
'';
installPhase = "exit 0";
} // { env = ghcjs; };
}
|