Potato.Flow.Llama

Documentation

data OwlPFCmd

Constructors

OwlPFCNewElts [(REltId, OwlSpot, OwlItem)]

OwlPFCDeleteElts [(REltId, OwlSpot, OwlItem)]

OwlPFCNewTree (MiniOwlTree, OwlSpot)

OwlPFCDeleteTree (MiniOwlTree, OwlSpot)

OwlPFCManipulate ControllersWithId

OwlPFCMove (OwlSpot, SuperOwlParliament)

OwlPFCResizeCanvas DeltaLBox

Instances

Generic OwlPFCmd

Defined in Potato.Flow.Llama

Associated Types

type Rep OwlPFCmd :: Type -> Type

Methods

from :: OwlPFCmd -> Rep OwlPFCmd x

to :: Rep OwlPFCmd x -> OwlPFCmd

Show OwlPFCmd

Defined in Potato.Flow.Llama

Methods

showsPrec :: Int -> OwlPFCmd -> ShowS

show :: OwlPFCmd -> String

showList :: [OwlPFCmd] -> ShowS

NFData OwlPFCmd

Defined in Potato.Flow.Llama

Methods

rnf :: OwlPFCmd -> ()

type Rep OwlPFCmd

Defined in Potato.Flow.Llama

type Rep OwlPFCmd = D1 ('MetaData "OwlPFCmd" "Potato.Flow.Llama" "tinytools-0.1.0.0-DrleRpyeSqeBtRJXQdRmv7" 'False) ((C1 ('MetaCons "OwlPFCNewElts" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [(REltId, OwlSpot, OwlItem)])) :+: (C1 ('MetaCons "OwlPFCDeleteElts" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [(REltId, OwlSpot, OwlItem)])) :+: C1 ('MetaCons "OwlPFCNewTree" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (MiniOwlTree, OwlSpot))))) :+: ((C1 ('MetaCons "OwlPFCDeleteTree" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (MiniOwlTree, OwlSpot))) :+: C1 ('MetaCons "OwlPFCManipulate" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ControllersWithId))) :+: (C1 ('MetaCons "OwlPFCMove" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (OwlSpot, SuperOwlParliament))) :+: C1 ('MetaCons "OwlPFCResizeCanvas" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 DeltaLBox)))))

doCmdState :: OwlPFCmd -> OwlPFState -> (OwlPFState, SuperOwlChanges)

undoCmdState :: OwlPFCmd -> OwlPFState -> (OwlPFState, SuperOwlChanges)

data SLlama

Constructors

SLlama_Set [(REltId, SElt)]

SLlama_Rename (REltId, Text)

SLlama_Compose [SLlama]

SLlama_OwlPFCmd OwlPFCmd Bool

Instances

Generic SLlama

Defined in Potato.Flow.Llama

Associated Types

type Rep SLlama :: Type -> Type

Methods

from :: SLlama -> Rep SLlama x

to :: Rep SLlama x -> SLlama

Show SLlama

Defined in Potato.Flow.Llama

Methods

showsPrec :: Int -> SLlama -> ShowS

show :: SLlama -> String

showList :: [SLlama] -> ShowS

NFData SLlama

Defined in Potato.Flow.Llama

Methods

rnf :: SLlama -> ()

type Rep SLlama

Defined in Potato.Flow.Llama

type Rep SLlama = D1 ('MetaData "SLlama" "Potato.Flow.Llama" "tinytools-0.1.0.0-DrleRpyeSqeBtRJXQdRmv7" 'False) ((C1 ('MetaCons "SLlama_Set" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [(REltId, SElt)])) :+: C1 ('MetaCons "SLlama_Rename" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (REltId, Text)))) :+: (C1 ('MetaCons "SLlama_Compose" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [SLlama])) :+: C1 ('MetaCons "SLlama_OwlPFCmd" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 OwlPFCmd) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool))))

data ApplyLlamaError

Constructors

ApplyLlamaError_Generic Text

Instances

Show ApplyLlamaError

Defined in Potato.Flow.Llama

Methods

showsPrec :: Int -> ApplyLlamaError -> ShowS

show :: ApplyLlamaError -> String

showList :: [ApplyLlamaError] -> ShowS

data Llama

Constructors

Llama

Fields

• _llama_apply :: OwlPFState -> Either ApplyLlamaError (OwlPFState, SuperOwlChanges, Llama)
• _llama_serialize :: SLlama
• _llama_describe :: Text

Instances

Generic Llama

Defined in Potato.Flow.Llama

Associated Types

type Rep Llama :: Type -> Type

Methods

from :: Llama -> Rep Llama x

to :: Rep Llama x -> Llama

Show Llama

Defined in Potato.Flow.Llama

Methods

showsPrec :: Int -> Llama -> ShowS

show :: Llama -> String

showList :: [Llama] -> ShowS

NFData Llama

Defined in Potato.Flow.Llama

Methods

rnf :: Llama -> ()

type Rep Llama

Defined in Potato.Flow.Llama

type Rep Llama = D1 ('MetaData "Llama" "Potato.Flow.Llama" "tinytools-0.1.0.0-DrleRpyeSqeBtRJXQdRmv7" 'False) (C1 ('MetaCons "Llama" 'PrefixI 'True) (S1 ('MetaSel ('Just "_llama_apply") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (OwlPFState -> Either ApplyLlamaError (OwlPFState, SuperOwlChanges, Llama))) :*: (S1 ('MetaSel ('Just "_llama_serialize") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SLlama) :*: S1 ('MetaSel ('Just "_llama_describe") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))))

data LlamaStack

Constructors

LlamaStack

Fields

• _llamaStack_done :: [Llama]
• _llamaStack_undone :: [Llama]
• _llamaStack_lastSaved :: Maybe Int

Instances

Generic LlamaStack

Defined in Potato.Flow.Llama

Associated Types

type Rep LlamaStack :: Type -> Type

Methods

from :: LlamaStack -> Rep LlamaStack x

to :: Rep LlamaStack x -> LlamaStack

Show LlamaStack

Defined in Potato.Flow.Llama

Methods

showsPrec :: Int -> LlamaStack -> ShowS

show :: LlamaStack -> String

showList :: [LlamaStack] -> ShowS

NFData LlamaStack

Defined in Potato.Flow.Llama

Methods

rnf :: LlamaStack -> ()

type Rep LlamaStack

Defined in Potato.Flow.Llama

type Rep LlamaStack = D1 ('MetaData "LlamaStack" "Potato.Flow.Llama" "tinytools-0.1.0.0-DrleRpyeSqeBtRJXQdRmv7" 'False) (C1 ('MetaCons "LlamaStack" 'PrefixI 'True) (S1 ('MetaSel ('Just "_llamaStack_done") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Llama]) :*: (S1 ('MetaSel ('Just "_llamaStack_undone") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Llama]) :*: S1 ('MetaSel ('Just "_llamaStack_lastSaved") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int)))))

emptyLlamaStack :: LlamaStack

llamaStack_hasUnsavedChanges :: LlamaStack -> Bool

makeRenameLlama :: (REltId, Text) -> Llama

makeSetLlama :: (REltId, SElt) -> Llama

makePFCLlama' :: Bool -> OwlPFCmd -> Llama

makePFCLlama :: OwlPFCmd -> Llama

makeCompositionLlama :: [Llama] -> Llama

sLlama_deserialize :: OwlPFState -> SLlama -> Llama