Sha256: e78ce2509ddcf5038b4f79a2fbaaa691f2a5174539cbdacb64e9560c96525c93
Contents?: true
Size: 250 Bytes
Versions: 395
Compression:
Stored size: 250 Bytes
Contents
(ns bank-account)
(defn open-account []
(ref 0))
(defn close-account [account]
(dosync
(ref-set account nil)))
(defn get-balance [account]
(dosync
@account))
(defn update-balance [account amt]
(dosync
(alter account + amt)))
Version data entries
395 entries across 395 versions & 1 rubygems