1
1
mirror of https://github.com/kanaka/mal.git synced 2024-11-09 18:06:35 +03:00

haskell: allow macro argument for apply core function

This commit is contained in:
Nicolas Boulenguez 2022-02-18 15:02:44 +01:00 committed by Joel Martin
parent e942621048
commit 4aa2c7edf7

View File

@ -270,6 +270,7 @@ concatLast _ = throwStr "last argument of apply must be a sequence"
apply :: Fn
apply (MalFunction _ f : xs) = f =<< concatLast xs
apply (MalMacro f : xs) = f =<< concatLast xs
apply _ = throwStr "Illegal call to apply"
do_map :: Fn