commit 341ac85644e93f145277be93db2a732ae3409249 · pyrox.dev/nixpkgs

+20

lib/attrsets.nix

···

       78
        
           listToAttrs (concatMap (name: let v = set.${name}; in if pred name v then [(nameValuePair name v)] else []) (attrNames set));

     

       79
        
       

     

       80
        
       

     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       0
        
       
     

       81
        
         /* foldAttrs: apply fold functions to values grouped by key. Eg accumulate values as list:

     

       82
        
            foldAttrs (n: a: [n] ++ a) [] [{ a = 2; } { a = 3; }]

     

       83
        
            => { a = [ 2 3 ]; }

···

       78
        
           listToAttrs (concatMap (name: let v = set.${name}; in if pred name v then [(nameValuePair name v)] else []) (attrNames set));

     

       79
        
       

     

       80
        
       

     

       81
       +
         /* Filter an attribute set recursivelly by removing all attributes for

     

       82
       +
            which the given predicate return false.

     

       83
       +
       

     

       84
       +
            Example:

     

       85
       +
              filterAttrsRecursive (n: v: v != null) { foo = { bar = null; }; }

     

       86
       +
              => { foo = {}; }

     

       87
       +
         */

     

       88
       +
         filterAttrsRecursive = pred: set:

     

       89
       +
           listToAttrs (

     

       90
       +
             concatMap (name:

     

       91
       +
               let v = set.${name}; in

     

       92
       +
               if pred name v then [

     

       93
       +
                 (nameValuePair name (

     

       94
       +
                   if isAttrs v then filterAttrsRecursive pred v

     

       95
       +
                   else v

     

       96
       +
                 ))

     

       97
       +
               ] else []

     

       98
       +
             ) (attrNames set)

     

       99
       +
           );

     

       100
       +
       

     

       101
        
         /* foldAttrs: apply fold functions to values grouped by key. Eg accumulate values as list:

     

       102
        
            foldAttrs (n: a: [n] ++ a) [] [{ a = 2; } { a = 3; }]

     

       103
        
            => { a = [ 2 3 ]; }