Replaced ordinary functions DIRECT/EFFECTIVE-SLOT-DEFINITION-CLASS by generics in phase 1.