about summary refs log blame commit diff
path: root/tvix/eval/src/tests/tvix_tests/eval-okay-listtoattrs.nix
blob: 89888fd561788947769bf57b7ccce9d5d7d2462a (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15














                                                                                                         
with builtins;
let
  fold = op: nul: list:
    if list == []
    then nul
    else op (head list) (fold op nul (tail list));
  concat =
    fold (x: y: x + y) "";
  asi = name: value : { inherit name value; };
  list = [ ( asi "a" "A" ) ( asi "b" "B" ) ];
  a = builtins.listToAttrs list;
  b = builtins.listToAttrs ( list ++ list );
  r = builtins.listToAttrs [ (asi "result" [ a b ]) ( asi "throw" (throw "this should not be thrown")) ];
  x = builtins.listToAttrs [ (asi "foo" "bar") (asi "foo" "bla") ];
in concat (map (x: x.a) r.result) + x.foo