minor refactoring in enumerations.lisp