better GTK wrapper
This commit is contained in:
parent
4ee65a08dd
commit
d83b170e7f
1 changed files with 13 additions and 0 deletions
|
|
@ -171,8 +171,21 @@ proc main(options: string) =
|
||||||
|
|
||||||
proc reject(options: string) =
|
proc reject(options: string) =
|
||||||
## handle all the tests that the compiler should reject
|
## handle all the tests that the compiler should reject
|
||||||
|
const csvFile = "tests/reject/spec.csv"
|
||||||
|
var p: TCsvParser
|
||||||
|
|
||||||
|
var s = newFileStream(csvFile, fmRead)
|
||||||
|
if s == nil: quit("cannot open the file" & csvFile)
|
||||||
|
p.open(s, csvFile, separator=';', skipInitialSpace=true)
|
||||||
|
while readRow(p):
|
||||||
|
for val in items(x.row):
|
||||||
|
Echo "##", val, "##"
|
||||||
|
close(p)
|
||||||
|
|
||||||
|
|
||||||
proc accept(options: string) =
|
proc accept(options: string) =
|
||||||
|
nil
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue