Mercurial > vba-clojure

comparison clojure/com/aurellem/items.clj @ 105:2f8089eacab9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
working on some actual assembly programs
author Robert McIntyre <rlm@mit.edu>
date Tue, 13 Mar 2012 14:40:01 -0500
parents 3305490a8f62
children 3a60bb14a64a
comparison
equal deleted inserted replaced
104:d2e00ea31508 105:2f8089eacab9
194 (str 194 (str
195 (format "|%-2d| %-14s | %3d |\n" index 195 (format "|%-2d| %-14s | %3d |\n" index
196 (apply str (rest (str item-name))) 196 (apply str (rest (str item-name)))
197 quantity))) 197 quantity)))
198 (range 0 (count inv)) inv) 198 (range 0 (count inv)) inv)
199 ["+--+----------------+----------+\n"])))))) 199 ["+--+----------------+----------+\n"]))))
200 state))
200 201
201 (defn inventory-codes [inventory] 202 (defn inventory-codes [inventory]
202 (flatten 203 (flatten
203 (concat [(count inventory)] 204 (concat [(count inventory)]
204 (map (fn [[item-name quantity]] 205 (map (fn [[item-name quantity]]