diff options
Diffstat (limited to 'gen/order.erl')
| -rw-r--r-- | gen/order.erl | 56 |
1 files changed, 28 insertions, 28 deletions
diff --git a/gen/order.erl b/gen/order.erl index 69f0eb8..e970ee7 100644 --- a/gen/order.erl +++ b/gen/order.erl @@ -18,8 +18,8 @@ reverse(Order) -> -ifdef(TEST). reverse_test() -> - _ = (fun(Capture1) -> expect:equal(Capture1, gt) end)(reverse(lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, eq) end)(reverse(eq)), + (fun(Capture1) -> expect:equal(Capture1, gt) end)(reverse(lt)), + (fun(Capture1) -> expect:equal(Capture1, eq) end)(reverse(eq)), (fun(Capture1) -> expect:equal(Capture1, lt) end)(reverse(gt)). -endif. @@ -37,8 +37,8 @@ to_int(Order) -> -ifdef(TEST). to_int_test() -> - _ = (fun(Capture1) -> expect:equal(Capture1, -1) end)(to_int(lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, 0) end)(to_int(eq)), + (fun(Capture1) -> expect:equal(Capture1, -1) end)(to_int(lt)), + (fun(Capture1) -> expect:equal(Capture1, 0) end)(to_int(eq)), (fun(Capture1) -> expect:equal(Capture1, 1) end)(to_int(gt)). -endif. @@ -65,14 +65,14 @@ compare(A, B) -> -ifdef(TEST). compare_test() -> - _ = (fun(Capture1) -> expect:equal(Capture1, eq) end)(compare(lt, lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, lt) end)(compare(lt, eq)), - _ = (fun(Capture1) -> expect:equal(Capture1, lt) end)(compare(lt, gt)), - _ = (fun(Capture1) -> expect:equal(Capture1, gt) end)(compare(eq, lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, eq) end)(compare(eq, eq)), - _ = (fun(Capture1) -> expect:equal(Capture1, lt) end)(compare(eq, gt)), - _ = (fun(Capture1) -> expect:equal(Capture1, gt) end)(compare(gt, lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, gt) end)(compare(gt, eq)), + (fun(Capture1) -> expect:equal(Capture1, eq) end)(compare(lt, lt)), + (fun(Capture1) -> expect:equal(Capture1, lt) end)(compare(lt, eq)), + (fun(Capture1) -> expect:equal(Capture1, lt) end)(compare(lt, gt)), + (fun(Capture1) -> expect:equal(Capture1, gt) end)(compare(eq, lt)), + (fun(Capture1) -> expect:equal(Capture1, eq) end)(compare(eq, eq)), + (fun(Capture1) -> expect:equal(Capture1, lt) end)(compare(eq, gt)), + (fun(Capture1) -> expect:equal(Capture1, gt) end)(compare(gt, lt)), + (fun(Capture1) -> expect:equal(Capture1, gt) end)(compare(gt, eq)), (fun(Capture1) -> expect:equal(Capture1, eq) end)(compare(gt, gt)). -endif. @@ -90,14 +90,14 @@ max(A, B) -> -ifdef(TEST). max_test() -> - _ = (fun(Capture1) -> expect:equal(Capture1, lt) end)(max(lt, lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, eq) end)(max(lt, eq)), - _ = (fun(Capture1) -> expect:equal(Capture1, gt) end)(max(lt, gt)), - _ = (fun(Capture1) -> expect:equal(Capture1, eq) end)(max(eq, lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, eq) end)(max(eq, eq)), - _ = (fun(Capture1) -> expect:equal(Capture1, gt) end)(max(eq, gt)), - _ = (fun(Capture1) -> expect:equal(Capture1, gt) end)(max(gt, lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, gt) end)(max(gt, eq)), + (fun(Capture1) -> expect:equal(Capture1, lt) end)(max(lt, lt)), + (fun(Capture1) -> expect:equal(Capture1, eq) end)(max(lt, eq)), + (fun(Capture1) -> expect:equal(Capture1, gt) end)(max(lt, gt)), + (fun(Capture1) -> expect:equal(Capture1, eq) end)(max(eq, lt)), + (fun(Capture1) -> expect:equal(Capture1, eq) end)(max(eq, eq)), + (fun(Capture1) -> expect:equal(Capture1, gt) end)(max(eq, gt)), + (fun(Capture1) -> expect:equal(Capture1, gt) end)(max(gt, lt)), + (fun(Capture1) -> expect:equal(Capture1, gt) end)(max(gt, eq)), (fun(Capture1) -> expect:equal(Capture1, gt) end)(max(gt, gt)). -endif. @@ -115,13 +115,13 @@ min(A, B) -> -ifdef(TEST). min_test() -> - _ = (fun(Capture1) -> expect:equal(Capture1, lt) end)(min(lt, lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, lt) end)(min(lt, eq)), - _ = (fun(Capture1) -> expect:equal(Capture1, lt) end)(min(lt, gt)), - _ = (fun(Capture1) -> expect:equal(Capture1, lt) end)(min(eq, lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, eq) end)(min(eq, eq)), - _ = (fun(Capture1) -> expect:equal(Capture1, eq) end)(min(eq, gt)), - _ = (fun(Capture1) -> expect:equal(Capture1, lt) end)(min(gt, lt)), - _ = (fun(Capture1) -> expect:equal(Capture1, eq) end)(min(gt, eq)), + (fun(Capture1) -> expect:equal(Capture1, lt) end)(min(lt, lt)), + (fun(Capture1) -> expect:equal(Capture1, lt) end)(min(lt, eq)), + (fun(Capture1) -> expect:equal(Capture1, lt) end)(min(lt, gt)), + (fun(Capture1) -> expect:equal(Capture1, lt) end)(min(eq, lt)), + (fun(Capture1) -> expect:equal(Capture1, eq) end)(min(eq, eq)), + (fun(Capture1) -> expect:equal(Capture1, eq) end)(min(eq, gt)), + (fun(Capture1) -> expect:equal(Capture1, lt) end)(min(gt, lt)), + (fun(Capture1) -> expect:equal(Capture1, eq) end)(min(gt, eq)), (fun(Capture1) -> expect:equal(Capture1, gt) end)(min(gt, gt)). -endif. |