Replaced ordinary function version of ALLOCATE-INSTANCE by generic function.