You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
35 lines
1.1 KiB
35 lines
1.1 KiB
3 years ago
|
%% Generated with 'testgen v0.2.0'
|
||
|
|
%% Revision 1 of the exercises generator was used
|
||
|
|
%% https://github.com/exercism/problem-specifications/raw/42dd0cea20498fd544b152c4e2c0a419bb7e266a/exercises/hello-world/canonical-data.json
|
||
|
|
%% This file is automatically generated from the exercises canonical data.
|
||
|
|
|
||
|
|
-module(hello_world_tests).
|
||
|
|
|
||
|
|
-include_lib("erl_exercism/include/exercism.hrl").
|
||
|
|
-include_lib("eunit/include/eunit.hrl").
|
||
|
|
|
||
|
|
|
||
|
|
-define(assertStringEqual(Expect, Expr),
|
||
|
|
begin ((fun () ->
|
||
|
|
__X = (Expect),
|
||
|
|
__Y = (Expr),
|
||
|
|
case string:equal(__X, __Y) of
|
||
|
|
true -> ok;
|
||
|
|
false -> erlang:error({assertStringEqual,
|
||
|
|
[{module, ?MODULE},
|
||
|
|
{line, ?LINE},
|
||
|
|
{expression, (??Expr)},
|
||
|
|
{expected, unicode:characters_to_list(__X)},
|
||
|
|
{value, unicode:characters_to_list(__Y)}]})
|
||
|
|
end
|
||
|
|
end)())
|
||
|
|
end).
|
||
|
|
|
||
|
|
-define(_assertStringEqual(Expect, Expr), ?_test(?assertStringEqual(Expect, Expr))).
|
||
|
|
|
||
|
|
|
||
|
|
'1_say_hi_test_'() ->
|
||
|
|
{"Say Hi!",
|
||
|
|
?_assertStringEqual("Hello, World!",
|
||
|
|
hello_world:hello())}.
|