     sequential?  (preserve-type form (eagerly (map midjcoexpand form)))
     :else        form))
 
+(defn parse-expects [form]
+  (translate-zipper form
+     expect? (fn [loc]
+               (zip/replace loc (parse-examples/to-lexical-map-form (zip/node loc))))))
+
 (defn expand-fact-body [forms metadata]
   (-> forms
       annotate-embedded-arrows-with-line-numbers

            [midje.data.compendium :as compendium]
            [midje.parsing.1-to-explicit-form.future-facts :as parse-future-facts]
            [midje.parsing.1-to-explicit-form.metadata :as parse-metadata]
            [midje.parsing.2-to-lexical-maps.folded-fakes :as parse-folded-fakes]
            [midje.data.fact :as fact-data]))


      parse-folded-fakes/unfold-fakes
      surround-with-background-fakes
      midjcoexpand
      parse-expects
      (multiwrap (forms-to-wrap-around :facts))))


