 
 
 ;; SourceLocation
+;; --------------
+
 
 (defn
   sourcelocation-filename-startline-endline-column-offset 

                       (xcut/xcut-aje-pe ?xcut ?shadowh ?shadow)))))


;; Shadows


;;todo:

;    (aspect ?aspect)
;    (contains (iterator-seq (.getPointcuts ?aspect)) ?pointcut)))

;; Declare declarations
;; --------------------


(defn
  aspect-declare
