| /dports/games/aisleriot/aisleriot-3.22.19/games/ |
| H A D | poker.scm | 99 (cadddr (cdr some-list)))
104 (cadddr ORDERED-LIST))
137 (= (cadddr ORDERED-LIST)
151 (cadddr ORDERED-LIST))
153 (cadddr ORDERED-LIST)
169 (cadddr ORDERED-LIST)))
172 (= (cadddr ORDERED-LIST)
176 (= (cadddr ORDERED-LIST)
186 (cadddr ORDERED-LIST))
187 (= (cadddr ORDERED-LIST)
|
| /dports/lang/mit-scheme/mit-scheme-9.2/src/star-parser/ |
| H A D | shared.scm | 453 ,(loop (cadddr expression)
555 (cadddr expression)
651 (loop (cadddr expression)
989 (cadddr expression)))
993 ,(cadddr expression))))
1004 ,(cadddr (cadddr expression)))))
1014 (cadddr expression)))))
1021 ,(cadddr expression)))))
1038 ,(cadddr expression*)))))
1045 (cadddr expression)))
[all …]
|
| /dports/lang/gambit-c/gambit-4.9.3/tests/unit-tests/04-list/ |
| H A D | circular_list.scm | 10 (check-equal? (cadddr lst1) 1)
15 (check-equal? (cadddr lst2) 2)
20 (check-equal? (cadddr lst3) 1)
|
| /dports/lang/mit-scheme/mit-scheme-9.2/src/compiler/machines/bobcat/ |
| H A D | instr4.scm | 40 (((? ea ,(cadddr form)) (& (? offset)) (& (? width)) (D (? reg)))
52 (((? ea ,(cadddr form)) (& (? offset))
66 (((? ea ,(cadddr form)) (D (? r-offset))
80 (((? ea ,(cadddr form)) (D (? r-offset))
107 (((? ea ,(cadddr form)) (& (? offset)) (& (? width)))
118 (((? ea ,(cadddr form)) (& (? offset)) (D (? r-width)))
129 (((? ea ,(cadddr form)) (D (? r-offset)) (& (? width)))
140 (((? ea ,(cadddr form)) (D (? r-offset)) (D (? r-width)))
|
| H A D | instr3.scm | 58 (WORD ,@(cadddr form)
62 (WORD ,@(cadddr form)
66 (WORD ,@(cadddr form)
71 (WORD ,@(cadddr form)
78 (WORD ,@(cadddr form)
83 (WORD ,@(cadddr form)
92 (WORD ,@(cadddr form)
95 (WORD ,@(cadddr form)
99 (WORD ,@(cadddr form)
108 (WORD ,@(cadddr form)
[all …]
|
| /dports/cad/magic/magic-8.3.245/lisp/scm/ |
| H A D | box.scm | 63 (nury (+ dy (cadddr x))))
78 (max (cadddr b1) (cadddr b2))
|
| /dports/textproc/uim-gtk/sigscheme-beb8fbd/test/ |
| H A D | test-srfi38.scm | 43 (if (not (symbol-bound? 'cadddr))
44 (define cadddr
79 (set-cdr! (cadddr convolution) (cdr convolution))
|
| /dports/textproc/uim-gtk/uim-d1ac9d9/sigscheme/test/ |
| H A D | test-srfi38.scm | 43 (if (not (symbol-bound? 'cadddr))
44 (define cadddr
79 (set-cdr! (cadddr convolution) (cdr convolution))
|
| /dports/textproc/uim-m17nlib/uim-d1ac9d9/sigscheme/test/ |
| H A D | test-srfi38.scm | 43 (if (not (symbol-bound? 'cadddr))
44 (define cadddr
79 (set-cdr! (cadddr convolution) (cdr convolution))
|
| /dports/textproc/uim-qt5/uim-d1ac9d9/sigscheme/test/ |
| H A D | test-srfi38.scm | 43 (if (not (symbol-bound? 'cadddr))
44 (define cadddr
79 (set-cdr! (cadddr convolution) (cdr convolution))
|
| /dports/textproc/uim-m17nlib/sigscheme-beb8fbd/test/ |
| H A D | test-srfi38.scm | 43 (if (not (symbol-bound? 'cadddr))
44 (define cadddr
79 (set-cdr! (cadddr convolution) (cdr convolution))
|
| /dports/textproc/uim-qt5/sigscheme-beb8fbd/test/ |
| H A D | test-srfi38.scm | 43 (if (not (symbol-bound? 'cadddr))
44 (define cadddr
79 (set-cdr! (cadddr convolution) (cdr convolution))
|
| /dports/textproc/uim-gtk3/uim-d1ac9d9/sigscheme/test/ |
| H A D | test-srfi38.scm | 43 (if (not (symbol-bound? 'cadddr))
44 (define cadddr
79 (set-cdr! (cadddr convolution) (cdr convolution))
|
| /dports/textproc/uim-gtk3/sigscheme-beb8fbd/test/ |
| H A D | test-srfi38.scm | 43 (if (not (symbol-bound? 'cadddr))
44 (define cadddr
79 (set-cdr! (cadddr convolution) (cdr convolution))
|
| /dports/japanese/uim-anthy/sigscheme-beb8fbd/test/ |
| H A D | test-srfi38.scm | 43 (if (not (symbol-bound? 'cadddr))
44 (define cadddr
79 (set-cdr! (cadddr convolution) (cdr convolution))
|
| /dports/japanese/uim-anthy/uim-d1ac9d9/sigscheme/test/ |
| H A D | test-srfi38.scm | 43 (if (not (symbol-bound? 'cadddr))
44 (define cadddr
79 (set-cdr! (cadddr convolution) (cdr convolution))
|
| /dports/lang/mit-scheme/mit-scheme-9.2/src/edwin/ |
| H A D | clsmac.scm | 45 (variables (cadddr form)))
70 (finish (cadr form) (caddr form) (cadddr form)))
95 (free-names (cadddr form))
|
| /dports/lang/mit-scheme/mit-scheme-9.2/src/compiler/machines/sparc/ |
| H A D | instr2a.scm | 42 ,(cadddr form)
50 ,(cadddr form)
63 ,(cadddr form)
|
| H A D | instr3.scm | 42 (9 ,(cadddr form))
70 (9 ,(cadddr form))
90 (9 ,(cadddr form))
|
| /dports/lang/kawa/kawa-3.1.1/testsuite/larceny-tests/tests/scheme/ |
| H A D | cxr.sld | 26 ;;; cadddr
73 (test (cadddr '(- 0 1 2)) 2)
|
| /dports/math/maxima/maxima-5.43.2/src/ |
| H A D | sumcon.lisp | 84 (numberp (sub* (cadddr sum) (cadddr try-this-one))))
97 (h1 (cadddr sum1))
98 (h2 (cadddr sum2))
|
| /dports/math/reduce/Reduce-svn5758-src/packages/rataprx/ |
| H A D | cfutil.red | 16 or not eqcar(cadddr x,'list) then 'failed
27 coeflist := cadddr x;
30 return list('list, origex, conv, cadddr x);
79 if eqcar(u, 'contfrac) then cadddr u
89 cons('list, reversip cf!:convlist1(cdr cadddr u))
134 coeflist := cdr cadddr u;
161 coeflist := cdr cadddr u;
182 coeflist := cdr cadddr u;
209 coeflist := cdr cadddr u;
243 coeflist := cdr cadddr u;
[all …]
|
| /dports/math/maxima/maxima-5.43.2/share/draw/ |
| H A D | picture.lisp | 120 (= (cadddr redlevel) (cadddr greenlevel) (cadddr bluelevel)) ))
124 height (cadddr redlevel))
145 (height (cadddr pic))
|
| /dports/lang/guile2/guile-2.2.7/module/srfi/ |
| H A D | srfi-17.scm | 51 caddar cadddr cdaaar cdaadr cdadar cdaddr cddaar cddadr
138 (define cadddr unknown
139 (getter-with-setter (@ (guile) cadddr)
|
| /dports/lang/guile1/guile-1.8.8/srfi/ |
| H A D | srfi-17.scm | 51 caddar cadddr cdaaar cdaadr cdadar cdaddr cddaar cddadr
138 (define cadddr unknown
139 (getter-with-setter (@ (guile) cadddr)
|