summaryrefslogtreecommitdiff
blob: 40f9a4fc85fafa0d9e01ebe3a8f30d0850e36c90 (plain)
1
2
3
4
5
(lambda (list)
(flet ((enable (x)
(pushnew x list))
(disable (x)
(setf list (remove x list))))