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

Use resolve and var-get instead of eval

Browse Source
This commit is contained in:
Lee Spector 2020-06-07 16:43:34 -04:00
parent bef1c112ff
commit 601f53f6b1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/propeller/interpreter.clj
View File

@ -7,7 +7,7 @@
(let [popped-state (pop-stack state :exec) (let [popped-state (pop-stack state :exec)
first-raw (first (:exec state)) first-raw (first (:exec state))
first-instruction (if (symbol? first-raw) first-instruction (if (symbol? first-raw)
(eval first-raw) (var-get (resolve first-raw))
first-raw)] first-raw)]
(cond (cond
(fn? first-instruction) (fn? first-instruction)