tests pass!

golden/read/meta-expression/read

@@ -7,6 +7,5 @@
             , sourceColumn = Pos 1
             }
         )
-    } :< SimpleF
-    ( SimpleMeta "aHaskellVariable + abc * 2" )
+    } :< MetaF "aHaskellVariable + abc * 2"
 ]

golden/read/meta-splice-expression/read

@@ -7,6 +7,5 @@
             , sourceColumn = Pos 1
             }
         )
-    } :< SimpleF
-    ( SimpleMetaSplice "takeWhile (\x -> even x) aHaskellList" )
+    } :< MetaSpliceF "takeWhile (\x -> even x) aHaskellList"
 ]

golden/read/meta-splice-variable/read

@@ -7,6 +7,5 @@
             , sourceColumn = Pos 1
             }
         )
-    } :< SimpleF
-    ( SimpleMetaSplice "aHaskellList" )
+    } :< MetaSpliceF "aHaskellList"
 ]

golden/read/meta-variable/read

@@ -7,6 +7,5 @@
             , sourceColumn = Pos 1
             }
         )
-    } :< SimpleF
-    ( SimpleMeta "aHaskellVariable" )
+    } :< MetaF "aHaskellVariable"
 ]