anchor.diff:     #:standard-class
      )
   
  +
  +  (:export 
  +   #:validate-class
  +   )
  +  
     ;; TBD: Does the return value for the following form differ per
     ;; implementation? [A Review of C2MOP]
     ;;
     ;;   (package-shadowing-symbols (find-package '#:c2mop))
   
  +  #+LTP_PROTOTYPES
     (:export
  -   #:validate-class
      #:associative-index
      #:associative-table-index
      #:object-table-lock
  
positive.code: ;;------------------------------------------------------------------------------
  
  (defpackage #:ltp-mop-utils
    (:use  #:utils.ltp.thinkum.space
           #:c2mop
           #+LTP_PROTOTYPES #:bordeaux-threads
           #:cl
  
negative.code:    #:standard-class
     )
    #+(or SBCL CMU CCL ALLEGRO)
    ;; NB: C2MOP shadows MOP implementations.
    ;;
    ;;     Possible issue: When shadowing a MOP implementaion, an
    ;;       application may also effectively be shadowing some compiler
    ;;       optimizaitons, such as may be defined in a manner specific to
    ;;       the individual MOP implementation.
    ;;
    ;;
    ;;     This system will endeavor to un-shadow the MOP implementation.
    ;;
    (:export
     #:validate-superclass ;; PCL
     #:standard-generic-function
  