/dports/lang/kawa/kawa-3.1.1/testsuite/larceny-tests/tests/scheme/ |
H A D | cxr.sld | 22 ;;; caaddr 76 (test (caaddr '(- 0 (1) 2)) 1)
|
/dports/lang/guile2/guile-2.2.7/module/srfi/ |
H A D | srfi-17.scm | 50 cdadr cddar cdddr caaaar caaadr caadar caaddr cadaar cadadr 126 (define caaddr unknown 127 (getter-with-setter (@ (guile) caaddr)
|
/dports/lang/guile1/guile-1.8.8/srfi/ |
H A D | srfi-17.scm | 50 cdadr cddar cdddr caaaar caaadr caadar caaddr cadaar cadadr 126 (define caaddr unknown 127 (getter-with-setter (@ (guile) caaddr)
|
/dports/lang/guile/guile-3.0.7/module/srfi/ |
H A D | srfi-17.scm | 50 cdadr cddar cdddr caaaar caaadr caadar caaddr cadaar cadadr 126 (define caaddr unknown 127 (getter-with-setter (@ (guile) caaddr)
|
/dports/cad/geda/geda-gaf-1.8.2/gnetlist/scheme/ |
H A D | gnet-cascade.scm | 74 (caaddr sourcenet) 125 (cascade:follow-cascade port(caaddr outnet))
|
/dports/lang/owl-lisp/owl-079f58f45039805517b9b880feec050e151c52b3/scheme/ |
H A D | cxr.scm | 18 caaddr 45 (define (caaddr x) (car (car (cdr (cdr x)))))
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/srfi/ |
H A D | 101.sld | 28 (rename ra:caaddr caaddr)
|
/dports/lang/guile2/guile-2.2.7/test-suite/tests/ |
H A D | pairs.test | 93 (pass-if "caaddr" 94 (= (caaddr x) 4))
|
/dports/lang/guile/guile-3.0.7/test-suite/tests/ |
H A D | pairs.test | 93 (pass-if "caaddr" 94 (= (caaddr x) 4))
|
/dports/lang/kawa/kawa-3.1.1/kawa/lib/scheme/ |
H A D | cxr-exports | 2 caaaar caaar caaddr cadaar cadar cadddr cdaaar cdaar cdaddr cddaar
|
/dports/lang/guile/guile-3.0.7/module/scheme/ |
H A D | cxr.scm | 23 caaddr
|
/dports/lang/sagittarius-scheme/sagittarius-0.9.8/sitelib/scheme/ |
H A D | cxr.scm | 6 caaddr caadr
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/scheme/ |
H A D | cxr.sld | 6 caaaar caaadr caadar caaddr cadaar cadadr caddar cadddr
|
/dports/math/reduce/Reduce-svn5758-src/psl/dist/nonkernel/ |
H A D | carcdr.sl | 59 caaadr caadr cadr caadar cadar cdar caaddr caddr cddr 84 (de caaddr (u) 87 (t (nonpairerror u 'caaddr)))) 239 caaadr caadr cadr caadar cadar cdar caaddr caddr cddr
|
/dports/math/maxima/maxima-5.43.2/src/ |
H A D | pois2.lisp | 38 (= (caaddr p) poishift)
|
/dports/textproc/uim-qt5/uim-d1ac9d9/sigscheme/test/ |
H A D | test-pair.scm | 301 (assert-equal? "caaddr" 12 (caaddr tree)) 336 (assert-equal? "caaddr empty list" '() (caaddr '())) 368 (assert-error "caaddr empty list" (lambda () (caaddr '()))) 400 (assert-error "caaddr insufficient list" (lambda () (caaddr '(0 . 1)))) 432 (assert-error "caaddr invalid object" (lambda () (caaddr #t)))
|
/dports/textproc/uim-gtk/sigscheme-beb8fbd/test/ |
H A D | test-pair.scm | 301 (assert-equal? "caaddr" 12 (caaddr tree)) 336 (assert-equal? "caaddr empty list" '() (caaddr '())) 368 (assert-error "caaddr empty list" (lambda () (caaddr '()))) 400 (assert-error "caaddr insufficient list" (lambda () (caaddr '(0 . 1)))) 432 (assert-error "caaddr invalid object" (lambda () (caaddr #t)))
|
/dports/textproc/uim-gtk/uim-d1ac9d9/sigscheme/test/ |
H A D | test-pair.scm | 301 (assert-equal? "caaddr" 12 (caaddr tree)) 336 (assert-equal? "caaddr empty list" '() (caaddr '())) 368 (assert-error "caaddr empty list" (lambda () (caaddr '()))) 400 (assert-error "caaddr insufficient list" (lambda () (caaddr '(0 . 1)))) 432 (assert-error "caaddr invalid object" (lambda () (caaddr #t)))
|
/dports/textproc/uim-m17nlib/uim-d1ac9d9/sigscheme/test/ |
H A D | test-pair.scm | 301 (assert-equal? "caaddr" 12 (caaddr tree)) 336 (assert-equal? "caaddr empty list" '() (caaddr '())) 368 (assert-error "caaddr empty list" (lambda () (caaddr '()))) 400 (assert-error "caaddr insufficient list" (lambda () (caaddr '(0 . 1)))) 432 (assert-error "caaddr invalid object" (lambda () (caaddr #t)))
|
/dports/textproc/uim-qt5/sigscheme-beb8fbd/test/ |
H A D | test-pair.scm | 301 (assert-equal? "caaddr" 12 (caaddr tree)) 336 (assert-equal? "caaddr empty list" '() (caaddr '())) 368 (assert-error "caaddr empty list" (lambda () (caaddr '()))) 400 (assert-error "caaddr insufficient list" (lambda () (caaddr '(0 . 1)))) 432 (assert-error "caaddr invalid object" (lambda () (caaddr #t)))
|
/dports/textproc/uim-m17nlib/sigscheme-beb8fbd/test/ |
H A D | test-pair.scm | 301 (assert-equal? "caaddr" 12 (caaddr tree)) 336 (assert-equal? "caaddr empty list" '() (caaddr '())) 368 (assert-error "caaddr empty list" (lambda () (caaddr '()))) 400 (assert-error "caaddr insufficient list" (lambda () (caaddr '(0 . 1)))) 432 (assert-error "caaddr invalid object" (lambda () (caaddr #t)))
|
/dports/textproc/uim-gtk3/sigscheme-beb8fbd/test/ |
H A D | test-pair.scm | 301 (assert-equal? "caaddr" 12 (caaddr tree)) 336 (assert-equal? "caaddr empty list" '() (caaddr '())) 368 (assert-error "caaddr empty list" (lambda () (caaddr '()))) 400 (assert-error "caaddr insufficient list" (lambda () (caaddr '(0 . 1)))) 432 (assert-error "caaddr invalid object" (lambda () (caaddr #t)))
|
/dports/textproc/uim-gtk3/uim-d1ac9d9/sigscheme/test/ |
H A D | test-pair.scm | 301 (assert-equal? "caaddr" 12 (caaddr tree)) 336 (assert-equal? "caaddr empty list" '() (caaddr '())) 368 (assert-error "caaddr empty list" (lambda () (caaddr '()))) 400 (assert-error "caaddr insufficient list" (lambda () (caaddr '(0 . 1)))) 432 (assert-error "caaddr invalid object" (lambda () (caaddr #t)))
|
/dports/japanese/uim-anthy/sigscheme-beb8fbd/test/ |
H A D | test-pair.scm | 301 (assert-equal? "caaddr" 12 (caaddr tree)) 336 (assert-equal? "caaddr empty list" '() (caaddr '())) 368 (assert-error "caaddr empty list" (lambda () (caaddr '()))) 400 (assert-error "caaddr insufficient list" (lambda () (caaddr '(0 . 1)))) 432 (assert-error "caaddr invalid object" (lambda () (caaddr #t)))
|
/dports/japanese/uim-anthy/uim-d1ac9d9/sigscheme/test/ |
H A D | test-pair.scm | 301 (assert-equal? "caaddr" 12 (caaddr tree)) 336 (assert-equal? "caaddr empty list" '() (caaddr '())) 368 (assert-error "caaddr empty list" (lambda () (caaddr '()))) 400 (assert-error "caaddr insufficient list" (lambda () (caaddr '(0 . 1)))) 432 (assert-error "caaddr invalid object" (lambda () (caaddr #t)))
|