Skip to content

Commit

Permalink
protect eval-and-compile/eval-when-compile in let
Browse files Browse the repository at this point in the history
  • Loading branch information
gilch committed Oct 31, 2017
1 parent 82b4518 commit a4dd344
Showing 1 changed file with 5 additions and 1 deletion.
6 changes: 5 additions & 1 deletion hy/contrib/walk.hy
Original file line number Diff line number Diff line change
Expand Up @@ -247,7 +247,11 @@ Arguments without a header are under None.
(defn handle-call [self]
(setv head (first self.form))
(if (in head '[fn fn*]) (self.handle-fn)
(in head '[import require quote]) (self.handle-base)
(in head '[import
require
quote
eval-and-compile
eval-when-compile]) (self.handle-base)
(= head 'except) (self.handle-except)
(= head ".") (self.handle-dot)
(= head 'defclass) (self.handle-defclass)
Expand Down

0 comments on commit a4dd344

Please sign in to comment.