felix/slime
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

define-typed working;; parsing keywords in lambdalists correctly next

Browse Source
This commit is contained in:
FelixBrendel
2019-07-06 00:35:55 +02:00
parent e0aaf351c5
commit 5716e83598
8 changed files with 44 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files
bin/alist.slime
+6 -4
View File
@@ -113,9 +113,10 @@
(define (alist-set! alist key value)
(mutate alist (pair (pair (pair key value)
(car alist))
())))
(mutate alist (set-type (pair (pair (pair key value)
(car alist))
())
:alist)))
(define (alist-set-overwrite! alist key value)
@@ -141,7 +142,8 @@
(plist-get-intern props prop)))
(define (plist-set! plist prop value)
(mutate plist (pair (pair prop (pair value (first plist))) ())))
(mutate plist (set-type (pair (pair prop (pair value (first plist))) ())
:plist)))
(define (plist-set-overwrite! plist prop value)
(let ((props (first plist)))