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

the start to implementing plushy interpretation

Browse Source
This commit is contained in:
Rowan Torbitzky-Lane 2025-02-05 23:46:37 -06:00
parent add949ed05
commit 194c025486
1 changed files with 30 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
src/Instructions.hs
View File

@ -28,6 +28,34 @@ import Instructions.VectorFloatInstructions
import Instructions.VectorIntInstructions
import Instructions.VectorLogicalInstructions
import Instructions.VectorStringInstructions
import State
-- Will eventually add a list of all instrucitons in this file
-- Use template haskell for this?
intInstructions :: [Gene]
intInstructions = [
StateFunc (instructionIntFromFloat, "instructionIntFromFloat"),
StateFunc (instructionIntFromBool, "instructionIntFromBool"),
StateFunc (instructionIntAdd, "instructionIntAdd"),
StateFunc (instructionIntSub, "instructionIntSub"),
StateFunc (instructionIntMul, "instructionIntMul"),
StateFunc (instructionIntDiv, "instructionIntDiv"),
StateFunc (instructionIntMod, "instructionIntMod"),
StateFunc (instructionIntMin, "instructionIntMin"),
StateFunc (instructionIntMax, "instructionIntMax"),
StateFunc (instructionIntInc, "instructionIntInc"),
StateFunc (instructionIntDec, "instructionIntDec"),
StateFunc (instructionIntLT, "instructionIntLT"),
StateFunc (instructionIntGT, "instructionIntGT"),
StateFunc (instructionIntLTE, "instructionIntLTE"),
StateFunc (instructionIntGTE, "instructionIntGTE"),
StateFunc (instructionIntDup, "instructionIntDup"),
StateFunc (instructionIntPop, "instructionIntPop"),
StateFunc (instructionIntDupN, "instructionIntDupN"),
StateFunc (instructionIntSwap, "instructionIntSwap"),
StateFunc (instructionIntRot, "instructionIntRot"),
StateFunc (instructionIntFlush, "instructionIntFlush"),
StateFunc (instructionIntEq, "instructionIntEq"),
StateFunc (instructionIntYank, "instructionIntYank"),
StateFunc (instructionIntYankDup, "instructionIntYankDup"),
StateFunc (instructionIntShove, "instructionIntShove"),
StateFunc (instructionIntIsEmpty, "instructionIntIsEmpty")
]