mirror of
https://github.com/open-goal/jak-project.git
synced 2024-10-20 21:27:52 -04:00
12 lines
279 B
Plaintext
12 lines
279 B
Plaintext
(test-setup '((a . b) (e . f)) #f)
|
|
|
|
(let ((my-list (list (cons 'a 'b)
|
|
(cons 'c 'd)
|
|
(cons 'e 'f)
|
|
)
|
|
))
|
|
(delete-car! 'c my-list)
|
|
(format #t "~A~%" my-list)
|
|
(format #t "~A~%" (assoc 'c my-list))
|
|
)
|