                        (xcut/xcut-aje-pe ?xcut ?shadowh ?shadow)))))
 
 
-;; Shadows
 
 
 ;;todo:

    (equals ?handle 
            (AsmRelationshipProvider/getHandle  (-> ?aspect .getWorld .getModel) ?advice))))


;; Intertype declarations

;Only returned one ITD of XCutTest
;(defn

  (damp.ekeko/ekeko* [?aspect ?pointcut] (aspect-pointcutdefinition ?aspect ?pointcut))
  
  (damp.ekeko/ekeko* [?advice] (advice ?advice))
  
  (damp.ekeko/ekeko* [?advice ?location] (advice-sourcelocation ?advice ?location))

  (damp.ekeko/ekeko* [?advice ?pointcut]  (advice-pointcut ?advice ?pointcut))
  
