on master help sign in
Add example output test for tail recursive function.
commit5ed4eeae8f1256903c38355a68cae72beb4c3187 authorLaszlo Pandy <laszlo.pandy@prezi.com> dateWed 2 Sep 2015, 15:52 (11 years ago) parent71d95c5
2 files changed+38
tests/test-files/good-expected-js/TailRecursive.elm.js+28 tests/test-files/good/TailRecursive.elm+10
tests/test-files/good-expected-js/TailRecursive.elm.jsnew file+28
@@ -0,0 +1,28 @@
1+Elm.Main = Elm.Main || {};
2+Elm.Main.make = function (_elm) {
3+ "use strict";
4+ _elm.Main = _elm.Main || {};
5+ if (_elm.Main.values)
6+ return _elm.Main.values;
7+ var _op = {},
8+ _N = Elm.Native,
9+ _U = _N.Utils.make(_elm),
10+ _L = _N.List.make(_elm),
11+ $moduleName = "Main";
12+ var any = F2(function (f,l) {
13+ _v0: while (true) {
14+ switch (l.ctor)
15+ {case "::": if (f(l._0))
16+ return true; else {
17+ var _v4 = f,_v5 = l._1;
18+ f = _v4;
19+ l = _v5;
20+ continue _v0;
21+ }}
22+ return false;
23+ }
24+ });
25+ _elm.Main.values = {_op: _op
26+ ,any: any};
27+ return _elm.Main.values;
28+};
tests/test-files/good/TailRecursive.elmnew file+10
@@ -0,0 +1,10 @@
1+
2+any f l =
3+ case l of
4+ x :: xs ->
5+ if f x then
6+ True
7+ else
8+ any f xs
9+ _ ->
10+ False