Skip to content

Instantly share code, notes, and snippets.

@dreid
Created August 27, 2011 00:13
Show Gist options
  • Save dreid/1174749 to your computer and use it in GitHub Desktop.
Save dreid/1174749 to your computer and use it in GitHub Desktop.
proper:quickcheck eunit integration using a test generator to have one line of output per property.
proper_test_() ->
Properties = lists:filter(fun({F, _}) ->
case atom_to_list(F) of
"prop_" ++ _Rest ->
true;
_ ->
false
end
end,
bstrip_props:module_info(exports)),
[{atom_to_list(P),
?_assertEqual(true,
proper:quickcheck(bstrip_props:P()))}
|| {P, _} <- Properties].
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment