fiddlerwoaroof/data-lens
1
0
Fork 0
mirror of https://github.com/fiddlerwoaroof/data-lens.git synced 2025-11-08 10:16:32 +00:00
Code Issues Releases Wiki Activity

feat: generalize transform-elt to sequences

Browse Source
This commit is contained in:
Edward Langley
2023-07-15 10:17:02 -07:00
parent ea7e56385c
commit b7f020d352
2 changed files with 19 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lens.lisp
View File

@ -225,9 +225,10 @@
(defun transform-elt (elt fun)
(lambda (it)
(append (subseq it 0 elt)
(list (funcall fun (nth elt it)))
(subseq it (1+ elt)))))
(concatenate (type-of it)
(subseq it 0 elt)
(list (funcall fun (elt it elt)))
(subseq it (1+ elt)))))
(defun key-transform (fun key-get key-set)
(lambda (it)