107 lines
4.4 KiB
Haskell
107 lines
4.4 KiB
Haskell
module Instructions.VectorStringInstructions where
|
|
|
|
import State
|
|
import Instructions.GenericInstructions
|
|
|
|
instructionVectorStringConcat :: State -> State
|
|
instructionVectorStringConcat state = instructionConcat state vectorString
|
|
|
|
instructionVectorStringConj :: State -> State
|
|
instructionVectorStringConj state = instructionConj state string vectorString
|
|
|
|
instructionVectorStringTakeN :: State -> State
|
|
instructionVectorStringTakeN state = instructionTakeN state vectorString
|
|
|
|
instructionVectorStringSubVector :: State -> State
|
|
instructionVectorStringSubVector state = instructionSubVector state vectorString
|
|
|
|
instructionVectorStringFirst :: State -> State
|
|
instructionVectorStringFirst state = instructionVectorFirst state string vectorString
|
|
|
|
instructionVectorStringLast :: State -> State
|
|
instructionVectorStringLast state = instructionVectorLast state string vectorString
|
|
|
|
instructionVectorStringNth :: State -> State
|
|
instructionVectorStringNth state = instructionVectorNth state string vectorString
|
|
|
|
instructionVectorStringRest :: State -> State
|
|
instructionVectorStringRest state = instructionRest state vectorString
|
|
|
|
instructionVectorStringButLast :: State -> State
|
|
instructionVectorStringButLast state = instructionButLast state vectorString
|
|
|
|
instructionVectorStringLength :: State -> State
|
|
instructionVectorStringLength state = instructionLength state vectorString
|
|
|
|
instructionVectorStringReverse :: State -> State
|
|
instructionVectorStringReverse state = instructionReverse state vectorString
|
|
|
|
instructionVectorStringPushAll :: State -> State
|
|
instructionVectorStringPushAll state = instructionPushAll state string vectorString
|
|
|
|
instructionVectorStringMakeEmpty :: State -> State
|
|
instructionVectorStringMakeEmpty state = instructionVectorMakeEmpty state vectorString
|
|
|
|
instructionVectorStringIsEmpty :: State -> State
|
|
instructionVectorStringIsEmpty state = instructionVectorIsEmpty state vectorString
|
|
|
|
instructionVectorStringIndexOf :: State -> State
|
|
instructionVectorStringIndexOf state = instructionVectorIndexOf state string vectorString
|
|
|
|
instructionVectorStringOccurrencesOf :: State -> State
|
|
instructionVectorStringOccurrencesOf state = instructionVectorOccurrencesOf state string vectorString
|
|
|
|
instructionVectorStringSetNth :: State -> State
|
|
instructionVectorStringSetNth state = instructionVectorSetNth state string vectorString
|
|
|
|
instructionVectorStringReplace :: State -> State
|
|
instructionVectorStringReplace state = instructionVectorReplace state string vectorString
|
|
|
|
instructionVectorStringReplaceFirst :: State -> State
|
|
instructionVectorStringReplaceFirst state = instructionVectorReplaceFirst state string vectorString
|
|
|
|
instructionVectorStringRemove :: State -> State
|
|
instructionVectorStringRemove state = instructionVectorRemove state string vectorString
|
|
|
|
instructionVectorStringIterate :: State -> State
|
|
instructionVectorStringIterate state = instructionVectorIterate state string vectorString GeneVectorString instructionVectorStringIterate
|
|
|
|
instructionVectorStringPop :: State -> State
|
|
instructionVectorStringPop state = instructionPop state vectorString
|
|
|
|
instructionVectorStringDup :: State -> State
|
|
instructionVectorStringDup state = instructionDup state vectorString
|
|
|
|
instructionVectorStringDupN :: State -> State
|
|
instructionVectorStringDupN state = instructionDupN state vectorString
|
|
|
|
instructionVectorStringSwap :: State -> State
|
|
instructionVectorStringSwap state = instructionSwap state vectorString
|
|
|
|
instructionVectorStringRot :: State -> State
|
|
instructionVectorStringRot state = instructionRot state vectorString
|
|
|
|
instructionVectorStringFlush :: State -> State
|
|
instructionVectorStringFlush state = instructionFlush state vectorString
|
|
|
|
instructionVectorStringEq :: State -> State
|
|
instructionVectorStringEq state = instructionEq state vectorString
|
|
|
|
instructionVectorStringStackDepth :: State -> State
|
|
instructionVectorStringStackDepth state = instructionStackDepth state vectorString
|
|
|
|
instructionVectorStringYank :: State -> State
|
|
instructionVectorStringYank state = instructionYank state vectorString
|
|
|
|
instructionVectorStringYankDup :: State -> State
|
|
instructionVectorStringYankDup state = instructionYankDup state vectorString
|
|
|
|
instructionVectorStringStackIsEmpty :: State -> State
|
|
instructionVectorStringStackIsEmpty state = instructionIsEmpty state vectorString
|
|
|
|
instructionVectorStringShove :: State -> State
|
|
instructionVectorStringShove state = instructionShove state vectorString
|
|
|
|
instructionVectorStringShoveDup :: State -> State
|
|
instructionVectorStringShoveDup state = instructionShoveDup state vectorString
|