1
1
mirror of https://github.com/kanaka/mal.git synced 2024-08-17 09:40:21 +03:00

factor: allow keyword argument for keyword core function

This commit is contained in:
Nicolas Boulenguez 2021-09-05 18:08:35 +02:00 committed by Joel Martin
parent c76f5a4be9
commit 7c5d341849

View File

@ -49,7 +49,7 @@ CONSTANT: ns H{
{ "symbol" [ first <malsymbol> ] }
{ "symbol?" [ first malsymbol? ] }
{ "string?" [ first string? ] }
{ "keyword" [ first <malkeyword> ] }
{ "keyword" [ first dup string? [ <malkeyword> ] when ] }
{ "keyword?" [ first malkeyword? ] }
{ "number?" [ first number? ] }
{ "fn?" [ first { [ callable? ] [ { [ malfn? ] [ macro?>> not ] } 1&& ] } 1|| ] }