diff options
author | inoas <mail@inoas.com> | 2022-08-10 15:14:52 +0200 |
---|---|---|
committer | Louis Pilfold <louis@lpil.uk> | 2022-08-11 09:56:08 +0100 |
commit | a974efd66ed4904ce7c9cabc38c3ec0563715b8f (patch) | |
tree | f8c9b868ae82fd532e713876f28a313063b44b39 /test/gleam_stdlib_test_ffi.erl | |
parent | 81c7284468739bc64a65527d126f54fd8dff4120 (diff) | |
download | gleam_stdlib-a974efd66ed4904ce7c9cabc38c3ec0563715b8f.tar.gz gleam_stdlib-a974efd66ed4904ce7c9cabc38c3ec0563715b8f.zip |
//erl[1,2|3] output for inspecting improper Erlang lists
Diffstat (limited to 'test/gleam_stdlib_test_ffi.erl')
-rw-r--r-- | test/gleam_stdlib_test_ffi.erl | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/test/gleam_stdlib_test_ffi.erl b/test/gleam_stdlib_test_ffi.erl index c26a879..c34cb5e 100644 --- a/test/gleam_stdlib_test_ffi.erl +++ b/test/gleam_stdlib_test_ffi.erl @@ -2,7 +2,7 @@ -export([ main/0, should_equal/2, should_not_equal/2, should_be_ok/1, - should_be_error/1, improper_list_append/2 + should_be_error/1, improper_list_append/3 ]). -include_lib("eunit/include/eunit.hrl"). @@ -26,18 +26,18 @@ filepath_to_module(Path0) -> Path5 = list_to_binary(Path4), binary_to_atom(Path5). -should_equal(Actual, Expected) -> +should_equal(Actual, Expected) -> ?assertEqual(Expected, Actual), nil. -should_not_equal(Actual, Expected) -> +should_not_equal(Actual, Expected) -> ?assertNotEqual(Expected, Actual), nil. -should_be_ok(A) -> +should_be_ok(A) -> ?assertMatch({ok, _}, A), nil. -should_be_error(A) -> +should_be_error(A) -> ?assertMatch({error, _}, A), nil. -improper_list_append(X, Y) -> - [X | Y]. +improper_list_append(X, Y, Z) -> + [X, Y | Z]. |