carp-lang/Carp
1
1
Fork 0
mirror of https://github.com/carp-lang/Carp.git synced 2024-09-11 05:25:28 +03:00
Code Issues Projects Releases Wiki Activity

macros: fix nthcdr like @scolsen suggested

Browse Source
This commit is contained in:
hellerve 2019-11-26 07:13:14 +01:00
parent 44e5a89019
commit 231b0a1d97
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
core/Macros.carp
View File

@ -87,7 +87,7 @@
(cxr (cons (- (car x) 1) (cdr x)) pair)))))
(defndynamic nthcdr [n pair]
(cxr (list n 'd) pair))
(cxr (list (+ n 1) 'd) pair))
(defndynamic nthcar [n pair]
(cxr (list 1 'a n 'd) pair))