impl: add `Applicative` instance on `Generator`

[webc.git] / tests / Goldens / Generator / Site003 / expected.txt

Gen {genSlugs = [Slug {unSlug = "root"},Slug {unSlug = "foo"},Slug {unSlug = "index.html"}], genValue = Left ()}
Gen {genSlugs = [Slug {unSlug = "root"},Slug {unSlug = "bar"},Slug {unSlug = "index.html"}], genValue = Right ()}