anchor.diff:             ;; Utilities
              "INVOKE" "RESOLVE" "REBIND" "PATHNAME-URL"
              ;; Development tools
  -           "RELOAD"
  +           #+clorb-dev "RELOAD"
              ;; Useful internals
              "LOAD-IR" "*RUNNING-ORB*" "ROOT-POA"
              "*HOST*" "*PORT*" )
  
positive.code:   (:export "*NAMING-IOR-FILE*" "*NAMING-BASE-PATH*" "*NAMING-POA*"
             "SETUP-PNS" "SETUP-NAMING-POA"))
  
  (defpackage "CLORB.IDLCOMP"
    (:use "COMMON-LISP" "NET.CDDR.CLORB" "NET.CDDR.CLORB.INTERNALS"))
  
negative.code:            ;; sysdep
             shell-to-string-or-stream external-namestring))
  
  (defpackage "NET.CDDR.CLORB"
    (:nicknames "CLORB")
    (:use "COMMON-LISP" "NET.CDDR.CLORB.INTERNALS"
          #+:use-my-idlparser "NET.CDDR.REDPAS"
          #+clorb-dev "NET.CDDR.CLORB.SYSTEM"
          #+clorb-dev "NET.CDDR.LUNA"
          #+cmu "MOP" #-(or sbcl cmu mcl) "CLOS")
    #+cmu
    (:shadowing-import-from "MOP"
                "CLASS-NAME" "BUILT-IN-CLASS" "CLASS-OF" "FIND-CLASS")
  