this repo has no description
hauleth.dev
1defmodule EslHn.Test.Data do
2 @moduledoc """
3 Additional `StreamData` generators used during testing
4 """
5
6 use ExUnitProperties
7
8 alias EslHn.Hn.Story
9
10 def story do
11 gen all(
12 title <- string(:utf8, min_length: 1),
13 score <- positive_integer()
14 ) do
15 %Story{
16 id: System.unique_integer([:positive]),
17 title: title,
18 score: score,
19 url: "https://example.com/#{URI.encode(title)}"
20 }
21 end
22 end
23end