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

Add stack-size

Browse Source 
Adds a function that returns the size of the specified stack in a given state.
This commit is contained in:
Nic McPhee 2020-11-10 16:14:23 -06:00
parent db085080b3
commit 89f0f3568a
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/propeller/push/state.cljc
View File

@ -35,6 +35,11 @@
[state stack] [state stack]
(empty? (get state stack))) (empty? (get state stack)))
;; Returns the stack size
(defn stack-size
[state stack]
(count (get state stack)))
;; Returns the top item on the stack ;; Returns the top item on the stack
(defn peek-stack (defn peek-stack
[state stack] [state stack]