mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-21 06:39:16 +02:00
6 lines
175 B
Scheme
6 lines
175 B
Scheme
(define-library (scheme cxr)
|
|
(export caaaaar)
|
|
(begin
|
|
;; Non-standard, this is just a placeholder
|
|
(define (caaaaar lis)
|
|
(car (car (car (car (car lis))))))))
|