b599d581ee
* Fix stdlib warnings * Mark unused includes when used from non-included files * Do not mark indirectly included files as unused * Show unused include warning only for files that are never used * Remove unused include from Option.aes * Consider functions passed as args as used * Return warnings as a sorted list * Fix failing tests * Fix dialyzer warning * Fix warning in Func.aes
17 lines
503 B
Plaintext
17 lines
503 B
Plaintext
namespace ListInternal =
|
|
|
|
// -- Flatmap ----------------------------------------------------------------
|
|
|
|
function flat_map(f : 'a => list('b), lst : list('a)) : list('b) =
|
|
switch(lst)
|
|
[] => []
|
|
x :: xs => f(x) ++ flat_map(f, xs)
|
|
|
|
// -- From..to ---------------------------------------------------------------
|
|
|
|
function from_to(a : int, b : int) : list(int) = from_to_(a, b, [])
|
|
|
|
private function from_to_(a, b, acc) =
|
|
if (a > b) acc else from_to_(a, b - 1, b :: acc)
|
|
|