Password-protected account

Modify the make-account procedure so that it creates password-protected accounts. That is, make-account should take a symbol as an additional argument, as in

(define acc (make-account 100 'secret-password))

The resulting account object should process a request only if it is accompanied by the password with which the account was created, and should otherwise return a complaint:

((acc 'secret-password 'withdraw) 40)
((acc 'some-other-password 'deposit) 50)
"Incorrect password"

There are no comments yet.

Authentication required

You must log in to post a comment.