home

Funktionale Programmierung: Testausgabe des XML-Baum

Prof. Dr. Uwe Schmidt FH Wedel

Testausgabe des XML-Baum

treeXML

module Main
where
 
import Text.XML.HXT.Arrow
import System.Environment
 
main :: IO ()
main
    = do
      [src, dst] <- getArgs
      runX ( readDocument
               [ (a_validate, v_0) ] src
             >>>
             writeDocument
               [ (a_show_tree, v_1)
               , (a_remove_whitespace, v_1)
               ] dst
           )
      return ()

Ein Testlauf

ghc -e ":main simple.xml -" treeXML.hs

Letzte Änderung: 27.03.2015

© Prof. Dr. Uwe Schmidt

Prof. Dr. Uwe Schmidt FH Wedel