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

Don't pre-expand programs passed to interpreter

Browse Source
This commit is contained in:
Lee Spector 2021-07-26 15:40:33 -04:00
parent 2572c706a8
commit 461da8c939
2 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
.gitignore vendored
View File

@ -21,6 +21,8 @@ notes
/.idea/ /.idea/
/results /results
/temp /temp
*~
q
# Don't commit the data directory that we'll # Don't commit the data directory that we'll
# use to hold the data from # use to hold the data from

2
src/propeller/push/interpreter.cljc
View File

@ -42,7 +42,7 @@
the returned state will include the key :history with a value that is a the returned state will include the key :history with a value that is a
vector containing all states prior to the final state." vector containing all states prior to the final state."
[program start-state step-limit] [program start-state step-limit]
(loop [state (assoc start-state :exec program :step 1) (loop [state (assoc start-state :exec (list program) :step 1)
history []] history []]
(if (or (empty? (:exec state)) (if (or (empty? (:exec state))
(> (:step state) step-limit)) (> (:step state) step-limit))