Included basic version of default defun.
Moved code related to SUBCLASSP out of basic-dispatch.lisp.