Yaltik/hy
2
0
Fork 0
Code Pull Requests Releases Activity

Add tests for expr-in-dict

Browse Source
This commit is contained in:
Nicolas Dandrimont 2013-05-14 12:01:23 +02:00
parent 9e03e0e6ec
commit 3252af3129
2 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tests/lex/test_lex.py
View File

@ -192,6 +192,12 @@ def test_dicts():
HyDict(["foo", "bar", HyDict(["foo", "bar",
"bar", "baz"])])] "bar", "baz"])])]
objs = tokenize("{(foo bar) (baz quux)}")
assert objs == [HyDict([
HyExpression([HySymbol("foo"), HySymbol("bar")]),
HyExpression([HySymbol("baz"), HySymbol("quux")])
])]
def test_nospace(): def test_nospace():
""" Ensure we can tokenize without spaces if we have to """ """ Ensure we can tokenize without spaces if we have to """

6
tests/native_tests/language.hy
View File

@ -15,6 +15,12 @@
(assert (= [1 2 3 4] (+ [1 2] [3 4])))) (assert (= [1 2 3 4] (+ [1 2] [3 4]))))
(defn test-dicts []
"NATIVE: test dicts work right"
(assert (= {1 2 3 4} {3 4 1 2}))
(assert (= {1 2 3 4} {1 (+ 1 1) 3 (+ 2 2)})))
(defn test-setv-get [] (defn test-setv-get []
"NATIVE: test setv works on a get expression" "NATIVE: test setv works on a get expression"
(setv foo [0 1 2]) (setv foo [0 1 2])