| Safe Haskell | None |
|---|---|
| Language | Haskell2010 |
Data.Origami.Internal.Build
Contents
Description
Builds fold declarations for a FoldFamily.
Documentation
Arguments
| :: [Name] | names of the root datatypes |
| -> [Name] | names of the n-ary functor classes to be used |
| -> [Name] | names of datatypes declared to be atomic |
| -> Q [Dec] |
Discovers the fold family and builds declarations from it to be spliced into a source file.
The fold family includes the root datatypes and the datatypes of all of their components, recursively. Datatypes declared as atomic will not be included, nor their components.
In general, the framework does not currently handle parameterized
datatypes, but applications of datatypes in Traversable,
Bitraversable, or Tritraversable are treated as "transparent"
and traversed through.
The framework generates:
- a type-parameterized
Foldrecord datatype. Each type parameterxxxcorresponds to a non-atomic datatypeXxxin the fold family. Each fieldmkYyyof theFoldcorresponds to a constructorYyyused by some datatype in the fold family. - an
idFoldrecord. Folding overidFoldis equivalent to applyingid: it does nothing.idFoldis useful as a base record to build your own folds upon. - an
errFoldfunction to create aFoldrecord, with undefined fields that give a useful error message when accessed. ThemkXxxfield oferrFold "example"is defined to containerror "example.mkXxx". - a
monadicFoldfunction that lifts aFold a b cinto aFold (m a) (m b) (m c). It applies the base fold monadically in a bottom-up, left-to-right way. - for each datatype
Xxx, afoldXxxfunction that applies aFoldto anXxxvalue, returning a value of typexxx.
The names Fold, idFold, errFold, and monadicFold are fixed.
They are intended to be imported qualified.
You are not expected to understand the structure of the generated code from this generic description. Generate code for your specific case and look at its Haddock documentation.
Since the discovery process can automatically collect a very large number of datatypes, and since the user doesn't usually see the spliced code, we require the user to declare what she expects so that there are no surprises. For that reason, any functor classes expected to be appear in the result must be declared, as are datatypes the user wants to treat as atomic.
There are a few other restrictions not mentioned here: if you hit any of them, the framework should output a helpful, intelligible error message when generating the declarations and before trying to splice and compile the declarations. You should see no errors from the compiler trying to compile bad generated code. If you do, that's a bug; please let us know. If the error messages are opaque, that's a bug too.
buildFoldsDryRun :: [Name] -> [Name] -> [Name] -> Q [Dec] Source
Prints onto standard output the result of running buildFolds
but doesn't splice the fold declarations.
for testing
Errors possible while building a FoldFamily
buildFoldFamilyMaybe :: [Name] -> [Name] -> [Name] -> Q Exp Source
Builds a FoldFamily or returns an error. Spliced result is of
type Either BuildErr FoldFamily.