Com/Simatime/buildGhcjs.nix


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


nixpkgs:

{  name  # the main module namespace
,  nick  # a short name for the output
,  deps  # passed to ghcjs
}:

with nixpkgs;

let
  nsToPath = ns: builtins.toString (builtins.replaceStrings ["."] ["/"] ns);

  path = nsToPath name;

  depsToPackageSet = packageSet: deps:
    map (s: builtins.getAttr s packageSet) deps;

  claySrc = pkgs.fetchFromGitHub {
    owner = "sebastiaanvisser";
    repo = "clay";
    rev = "cc7729b1b42a79e261091ff7835f7fc2a7ae3cee";
    sha256 = "1vd67976lvi5l4qq18zy6j44apynkl44ps04p8vwfx4gzr895dyp";
  };

  # ghcjs-8.6.0.1
  ghcjs_ = pkgs.haskell.packages.ghcjs.override (oldAttrs: {
    overrides = with pkgs.haskell.lib; self: super: {
      clay = dontCheck (self.callCabal2nix "clay" claySrc {});
      http-types = dontCheck super.http-types;
      tasty-quickcheck = dontCheck super.tasty-quickcheck;
      scientific = dontCheck super.scientific; # takes forever
      servant = dontCheck super.servant;
      comonad = dontCheck super.comonad;
      QuickCheck = dontCheck super.QuickCheck;
    };
  });

  ghcjs = ghcjs_.ghcWithPackages (hp: depsToPackageSet hp deps);

in stdenv.mkDerivation {
  name = name;
  version = "0";
  src = ../../.; # the git root
  nativeBuildInputs = [ ghcjs ];
  strictDeps = true;
  buildPhase = ''
    #
    mkdir -p $out/{bin,static} ${path}
    #
    # compile with ghcjs
    #
    ${ghcjs}/bin/ghcjs -Werror -i. \
        --make ${path}.hs \
        -main-is ${name} \
        -o ${path}
    #
    # optimize js output
    #
    ${pkgs.closurecompiler}/bin/closure-compiler \
        ${path}.jsexe/all.js > $out/static/${nick}.js
  '';
  installPhase = "exit 0";
} // { env = ghcjs; }