diff --git a/hy/core/bootstrap.hy b/hy/core/bootstrap.hy index 675df9c..e061ef0 100644 --- a/hy/core/bootstrap.hy +++ b/hy/core/bootstrap.hy @@ -41,6 +41,7 @@ (if ~@(cut args 2)))))) (defmacro deftag [tag-name lambda-list &rest body] + (import hy.models) (if (and (not (isinstance tag-name hy.models.HySymbol)) (not (isinstance tag-name hy.models.HyString))) (raise (hy.errors.HyTypeError diff --git a/tests/native_tests/quote.hy b/tests/native_tests/quote.hy index 09aafc5..3b31350 100644 --- a/tests/native_tests/quote.hy +++ b/tests/native_tests/quote.hy @@ -2,7 +2,7 @@ ;; This file is part of Hy, which is free software licensed under the Expat ;; license. See the LICENSE. -(import [hy [HyExpression HySymbol HyString HyBytes]]) +(import [hy [HyExpression HySymbol HyString HyBytes HyDict]]) (defn test-quote [] @@ -43,7 +43,7 @@ (assert (= (get q 1) (quote bar))) (assert (= (get q 2) (quote baz))) (assert (= (get q 3) (quote quux))) - (assert (= (type q) hy.HyDict))) + (assert (= (type q) HyDict))) (defn test-quote-expr-in-dict []