[ #278 ] XML: missing import of XPrint class in Test program

BNFC · Dec 16, 2019 · 41560dd · 41560dd
1 parent 6167286
commit 41560dd
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/source/src/BNFC/Backend/Haskell.hs b/source/src/BNFC/Backend/Haskell.hs
@@ -347,7 +347,7 @@ testfile opts cf = unlines $ concat $
       , [ "import " , absFileM      opts , " ()"                                 ]
       ]
     , [ [ "import " , layoutFileM   opts , " ( resolveLayout )" ] | lay     ]
-    , [ [ "import " , xmlFileM      opts , " ( printXML )"      ] | use_xml ]
+    , [ [ "import " , xmlFileM      opts , " ( XPrint, printXML )"      ] | use_xml ]
     ]
   , [ "import qualified Data.Map ( Map, lookup, toList )" | use_glr ]
   , [ "import Data.Maybe ( fromJust )"                    | use_glr ]