1234567891011121314151617181920212223242526 |
- import
- os, parsecfg, strutils, streams
- var f = newFileStream(paramStr(1), fmRead)
- if f != nil:
- var p: CfgParser
- open(p, f, paramStr(1))
- while true:
- var e = next(p)
- case e.kind
- of cfgEof:
- echo("EOF!")
- break
- of cfgSectionStart: ## a ``[section]`` has been parsed
- echo("new section: " & e.section)
- of cfgKeyValuePair:
- echo("key-value-pair: " & e.key & ": " & e.value)
- of cfgOption:
- echo("command: " & e.key & ": " & e.value)
- of cfgError:
- echo(e.msg)
- close(p)
- else:
- echo("cannot open: " & paramStr(1))
|