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

mal impl: (style) replace (list) with ()

This commit is contained in:
Nicolas Boulenguez 2021-07-30 17:47:02 +02:00 committed by Joel Martin
parent 85153c6f68
commit e4109e6795
4 changed files with 4 additions and 4 deletions

View File

@ -17,7 +17,7 @@
(list 'cons (QUASIQUOTE elt) acc))))
(def! qq-foldr (fn* [xs]
(if (empty? xs)
(list)
()
(qq-loop (first xs) (qq-foldr (rest xs))))))
(def! QUASIQUOTE (fn* [ast]
(cond

View File

@ -17,7 +17,7 @@
(list 'cons (QUASIQUOTE elt) acc))))
(def! qq-foldr (fn* [xs]
(if (empty? xs)
(list)
()
(qq-loop (first xs) (qq-foldr (rest xs))))))
(def! QUASIQUOTE (fn* [ast]
(cond

View File

@ -17,7 +17,7 @@
(list 'cons (QUASIQUOTE elt) acc))))
(def! qq-foldr (fn* [xs]
(if (empty? xs)
(list)
()
(qq-loop (first xs) (qq-foldr (rest xs))))))
(def! QUASIQUOTE (fn* [ast]
(cond

View File

@ -17,7 +17,7 @@
(list 'cons (QUASIQUOTE elt) acc))))
(def! qq-foldr (fn* [xs]
(if (empty? xs)
(list)
()
(qq-loop (first xs) (qq-foldr (rest xs))))))
(def! QUASIQUOTE (fn* [ast]
(cond