| |
|---|
| | # test-tc.py - A Test Driver For The 'tconfpy' Configuration File Parser |
|---|
| | # Copyright (c) 2003-2004 TundraWare Inc. All Rights Reserved. |
|---|
| | |
|---|
| | PROGNAME = "tconfpy Test Driver" |
|---|
| | RCSID = "$Id: test-tc.py,v 1.122 2004/04/01 00:55:02 tundra Exp $" |
|---|
| | RCSID = "$Id: test-tc.py,v 1.123 2004/04/01 20:38:57 tundra Exp $" |
|---|
| | VERSION = RCSID.split()[2] |
|---|
| | |
|---|
| | # Copyright Information |
|---|
| | |
|---|
| |
|---|
| | else: |
|---|
| | |
|---|
| | retval = ParseConfig(fn, st, Debug=DEBUG, LiteralVars=LITVARS) |
|---|
| | |
|---|
| | if retval[1]: |
|---|
| | if retval.Errors: |
|---|
| | print "Errors Were Found In '%s'!" % fn |
|---|
| | else: |
|---|
| | print "No Errors Found In '%s'!" % fn |
|---|
| | |
|---|
| | print |
|---|
| | |
|---|
| | dumpreturn("SYMBOL TABLE", retval[0], isdict=True) |
|---|
| | dumpreturn("ERRORS", retval[1]) |
|---|
| | dumpreturn("WARNINGS", retval[2]) |
|---|
| | dumpreturn("DEBUG", retval[3]) |
|---|
| | dumpreturn("LITERAL LINES", retval[4]) |
|---|
| | |
|---|
| | |
|---|
| | |
|---|
| | |
|---|
| | |
|---|
| | |
|---|
| | # Format and display the results |
|---|
| | |
|---|
| | dumpreturn("SYMBOL TABLE", retval.SymTable, isdict=True) |
|---|
| | dumpreturn("ERRORS", retval.Errors) |
|---|
| | dumpreturn("WARNINGS", retval.Warnings) |
|---|
| | dumpreturn("DEBUG", retval.Debug) |
|---|
| | dumpreturn("LITERAL LINES", retval.Literals) |
|---|
| | |
|---|
| | |
|---|
| | |
|---|
| | |
|---|
| | |
|---|
| | |
tundra
authored
on 1 Apr 2004