chickadee » define-structure » setp-

({name}-{field}-setp! obj proc)procedure
(setp-{name}-{field}! obj proc)procedure

Like set- but calls proc witht he current value and updates it to what proc returns.