scratch parser test

testparse.nim

import os, streams, parsexml, strutils

if paramCount() < 1:
    quit("Usage: parse filename[.xml]")

var filename = addfileExt(paramStr(1), "xml")
var s = newFileStream(filename, fmRead)
if s == nil: quit("Cannot open the file" & filename)
var x: XmlParser
open(x, s, filename)

next(x)
block mainLoop:
    while true:
        case x.kind
        of xmlEof: break
        of xmlElementOpen, xmlElementStart:
            echo "name: ", x.elementName
        else: discard
        next(x)