rowan.a.tl/HushGP
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

one basic char instruction

Browse Source
This commit is contained in:
Rowan Torbitzky-Lane 2025-01-25 00:16:08 -06:00
parent 4ad47b5308
commit c17e0df4da
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/Instructions/CharInstructions.hs Normal file
View File

@ -0,0 +1,10 @@
module Instructions.CharInstructions where
import State
import Instructions.GenericInstructions
instructionCharConcat :: State -> State
instructionCharConcat state@(State {_char = c1 : c2 : cs, _string = ss}) = state{_char = cs, _string = [c1, c2] : ss}
instructionCharConcat state = state