mirrors/Nim
1
0
Fork 0
mirror of https://github.com/nim-lang/Nim.git synced 2025-12-31 18:32:11 +00:00
Code Issues Packages Projects Releases Wiki Activity

enabled sexp tests

Browse Source
This commit is contained in:
Simon Hafner
2015-04-22 06:11:30 +05:00
parent 518db9eb7e
commit 766b7ea61d
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
lib/pure/sexp.nim
View File

@@ -677,12 +677,12 @@ proc parseSexp*(buffer: string): SexpNode =
result = parseSexp(newStringStream(buffer))
when isMainModule:
# let testSexp = parseSexp("""(1 (98 2) nil (2) foobar "foo" 9.234)""")
# assert(testSexp[0].getNum == 1)
# assert(testSexp[1][0].getNum == 98)
# assert(testSexp[2].getElems == @[])
# assert(testSexp[4].getSymbol == "foobar")
# assert(testSexp[5].getStr == "foo")
let testSexp = parseSexp("""(1 (98 2) nil (2) foobar "foo" 9.234)""")
assert(testSexp[0].getNum == 1)
assert(testSexp[1][0].getNum == 98)
assert(testSexp[2].getElems == @[])
assert(testSexp[4].getSymbol == "foobar")
assert(testSexp[5].getStr == "foo")
let alist = parseSexp("""((1 . 2) (2 . "foo"))""")
assert(alist[0].getCons.car.getNum == 1)