                                           (device-vcproj-files)))]
     (sort (clojure.set/difference (set project-names)
                                   (set dll-names)
+                                  (do-not-build)
                                   helper-vcprojs))))
      
 (defn device-pages []

            (clojure.set/union (set non-windows-device-adapters)
                               (missing-vcproj)
                               (set dll-names))
            (set device-page-names)))))

(defn str-lines [sequence]
  (apply str (interpose "\n" sequence)))

        (sort
          (clojure.set/difference
            (set (map #(.getName %) directories-without-vcproj))
            (do-not-build)
            non-windows-device-adapters))))

(defn device-vcproj-files []
    (filter #(.. % getName (endsWith ".vcproj"))
            (mapcat file-seq device-adapter-parent-dirs)))

(defn dll-name [file]
  (second (re-find #"mmgr_dal_(.*?).dll" (.getName file))))
