added basic decoding

This commit is contained in:
Yehowshua Immanuel 2025-02-19 01:21:02 -05:00
parent ef58d5b07e
commit 32932f4816
7 changed files with 289 additions and 61 deletions

View file

@ -47,9 +47,6 @@ machine' machine =
in
machine { cpu = cpu', mem = mem' }
machineSignal :: HiddenClockResetEnable dom => Signal dom Machine
machineSignal = register machine (machine' <$> machineSignal)
simulationLoop :: Int -> Machine -> IO [Machine]
simulationLoop 0 state = return [state]
simulationLoop n state = do