Improved test data #184

Merged
savau merged 26 commits from fill_avn_a into master 2021-09-30 14:14:44 +02:00
Showing only changes of commit e6c41250e8 - Show all commits

View File

@ -247,11 +247,11 @@ data MassInputException = MassInputInvalidShape
instance Exception MassInputException
data MassInput handler liveliness cellData cellResult = forall i. PathPiece i => MassInput
{ miAdd :: BoxCoord liveliness -- ^ Position (dimensions after @dimIx@ are zero)
-> Natural -- ^ Zero-based dimension index @dimIx@
-> liveliness -- ^ Previous liveliness
-> (Text -> Text) -- ^ Nudge deterministic field ids
-> FieldView UniWorX -- ^ Submit button
{ miAdd :: BoxCoord liveliness -- Position (dimensions after @dimIx@ are zero)
-> Natural -- Zero-based dimension index @dimIx@
-> liveliness -- Previous liveliness
-> (Text -> Text) -- Nudge deterministic field ids
-> FieldView UniWorX -- Submit button
-> Maybe (Markup -> MForm handler (FormResult (Map (BoxCoord liveliness) cellData -> FormResult (Map (BoxCoord liveliness) cellData)), Widget)) -- ^ Construct a Cell-Addition Widget
, miCell :: BoxCoord liveliness -- Position
-> cellData -- @cellData@ from @miAdd@