Skip to content
Permalink
1 contributor

Users who have contributed to this file

13 lines (11 sloc) 444 Bytes
;; ========================================================
;; 2.3-get-balance
;; ========================================================
(defun get-balance (userId)
"Only admin can read balance."
;; call enforce-user-auth from auth with parameter admin
(enforce-user-auth 'admin)
;; --------------------END OF CHALLENGE -------------------
(with-read accounts-table userId
{ "balance":= balance }
balance))
You can’t perform that action at this time.