Skip to content
Permalink
Fetching contributors…
Cannot retrieve contributors at this time
12 lines (10 sloc) 485 Bytes
;; ------------------------------------------------
;; 5.8-read-inventory-pair
;; ------------------------------------------------
;; define a function named read-inventory-pair that takes a parameter named key
(defun read-inventory-pair (key)
;; set "inventory-key" to the provided key
{"inventory-key":key,
;; set "balance" the value of the balance of loan-inventory-table at the value of the key
"balance": (at 'balance (read loan-inventory-table key))}
)
You can’t perform that action at this time.