Compare commits
2 commits
49298a3ca2
...
fef10b5736
Author | SHA1 | Date | |
---|---|---|---|
fef10b5736 | |||
49bacbffde |
1 changed files with 19 additions and 0 deletions
|
@ -62,6 +62,25 @@ namespace Jellyfin.Plugin.SmartPlaylist.Lisp {
|
|||
(rev-helper lst '())))
|
||||
"""
|
||||
);
|
||||
this["split"] = e.eval(
|
||||
"""
|
||||
(lambda
|
||||
(lst n)
|
||||
(if
|
||||
(or (= n 0) (null lst))
|
||||
(cons '() lst)
|
||||
(let
|
||||
(s (split (cdr lst) (- n 1)))
|
||||
(cons (cons (car lst) (car s)) (cdr s)))))
|
||||
"""
|
||||
);
|
||||
this["length"] = e.eval(
|
||||
"""
|
||||
(lambda
|
||||
(lst n)
|
||||
(if (null lst) n (length (cdr lst) (+ n 1))))
|
||||
"""
|
||||
);
|
||||
this["qsort"] = e.eval(
|
||||
"""
|
||||
(lambda
|
||||
|
|
Loading…
Add table
Reference in a new issue