Testing the behavior of (quote "foo")
This commit is contained in:
parent
16194dd661
commit
997b32e18c
@ -25,3 +25,10 @@ __version__ = "0.9.5"
|
||||
|
||||
import hy.importer # NOQA
|
||||
# we import for side-effects.
|
||||
|
||||
from hy.models.expression import HyExpression # NOQA
|
||||
from hy.models.integer import HyInteger # NOQA
|
||||
from hy.models.string import HyString # NOQA
|
||||
from hy.models.symbol import HySymbol # NOQA
|
||||
from hy.models.dict import HyDict # NOQA
|
||||
from hy.models.list import HyList # NOQA
|
||||
|
@ -1,10 +1,10 @@
|
||||
;;;
|
||||
;;;
|
||||
|
||||
(import-from hy.models.expression HyExpression)
|
||||
(import-from hy.models.symbol HySymbol)
|
||||
(import-from hy HyExpression HySymbol HyString)
|
||||
|
||||
|
||||
(defn test-basic-quoting []
|
||||
(assert (= (type (quote (foo bar))) HyExpression))
|
||||
(assert (= (type (quote foo)) HySymbol)))
|
||||
(assert (= (type (quote foo)) HySymbol))
|
||||
(assert (= (type (quote "string")) HyString)))
|
||||
|
Loading…
Reference in New Issue
Block a user