msyds/rlp
1
0
Fork 0
Code Issues 4 Pull Requests Actions Packages Projects Releases 2 Wiki Activity

TIM -> TI

Browse Source
This commit is contained in:
crumbtoo
2023-11-30 14:08:19 -07:00
parent e01f0d67a9
commit 089afa0ea1
5 changed files with 10 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/GM.hs
View File

@@ -109,7 +109,7 @@ doAdmin :: GmState -> GmState
doAdmin st = st & gmStats . stsReductions %~ succ
-- the state is considered final if there is no more code to execute. very
-- simple compared to TIM
-- simple compared to TI
isFinal :: GmState -> Bool
isFinal st = null $ st ^. gmCode