Current section

Files

Jump to
glacier src glacier@should.erl
Raw

src/glacier@should.erl

-module(glacier@should).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).
-export([equal/2, not_equal/2, be_ok/1, be_error/1, be_some/1, be_none/1, be_true/1, be_false/1, fail/0]).
-if(?OTP_RELEASE >= 27).
-define(MODULEDOC(Str), -moduledoc(Str)).
-define(DOC(Str), -doc(Str)).
-else.
-define(MODULEDOC(Str), -compile([])).
-define(DOC(Str), -compile([])).
-endif.
?MODULEDOC(
" A proxy module into gleeunit/should\n"
"\n"
" If you are consistently using glacier (which wraps gleeunit) instead of\n"
" gleeunit you may replace all `import gleeunit/should` with\n"
" `import glacier/should`.\n"
).
-file("src/glacier/should.gleam", 10).
-spec equal(GPP, GPP) -> nil.
equal(A, B) ->
gleeunit_ffi:should_equal(A, B).
-file("src/glacier/should.gleam", 14).
-spec not_equal(GPQ, GPQ) -> nil.
not_equal(A, B) ->
gleeunit_ffi:should_not_equal(A, B).
-file("src/glacier/should.gleam", 18).
-spec be_ok({ok, GPR} | {error, any()}) -> GPR.
be_ok(Result) ->
gleeunit_ffi:should_be_ok(Result).
-file("src/glacier/should.gleam", 22).
-spec be_error({ok, any()} | {error, GPW}) -> GPW.
be_error(Result) ->
gleeunit_ffi:should_be_error(Result).
-file("src/glacier/should.gleam", 26).
-spec be_some(gleam@option:option(GPZ)) -> GPZ.
be_some(A) ->
gleeunit@should:be_some(A).
-file("src/glacier/should.gleam", 30).
-spec be_none(gleam@option:option(any())) -> nil.
be_none(A) ->
gleeunit@should:be_none(A).
-file("src/glacier/should.gleam", 34).
-spec be_true(boolean()) -> nil.
be_true(Actual) ->
gleeunit@should:be_true(Actual).
-file("src/glacier/should.gleam", 38).
-spec be_false(boolean()) -> nil.
be_false(Actual) ->
gleeunit@should:be_false(Actual).
-file("src/glacier/should.gleam", 42).
-spec fail() -> nil.
fail() ->
gleeunit@should:fail().