Function Class-Name->Class-Id

Part of:

package cl-perec
( class-name->class-id )