Lines Matching refs:three
279 (equal-test '(3 . "three") #'assoc-if-not #'(lambda(x) (< x 3))
280 '((1 . "one") (2 . "two") (3 . "three")))
281 (equal-test '("two" . 2) #'assoc #\o '(("one" . 1) ("two" . 2) ("three" . 3))
1164 (equal-test '((one . 1) (two . 2) (three . 3) (four . 19))
1165 #'pairlis '(one two) '(1 2) '((three . 3) (four . 19)))
1167 data '("one" "two" "three")
1169 (equal-test '((1 . "one") (2 . "two") (3 . "three"))
1171 (equal-test '((1 . "one") (2 . "two") (3 . "three") (4 . "four"))
1174 (equal-eval '("one" "two" "three") 'data)
1364 '(defparameter *some-list* (list* 'one 'two 'three 'four)))
1365 (equal-eval '(one two three . four) '*some-list*)
1366 (equal-test '(uno two three . four) #'rplaca *some-list* 'uno)
1367 (equal-eval '(uno two three . four) '*some-list*)
1368 (equal-test '(three iv) #'rplacd (last *some-list*) (list 'iv))
1369 (equal-eval '(uno two three iv) '*some-list*)
1589 (equal-test "three (silly) words"
1590 #'string-trim " (*)" " ( *three (silly) words* ) ")
1591 #+xedit (equal-test "three (silly) words"
1592 #'nstring-trim " (*)" " ( *three (silly) words* ) ")
1595 (equal-test "three (silly) words* ) "
1596 #'string-left-trim " (*)" " ( *three (silly) words* ) ")
1597 #+xedit (equal-test "three (silly) words* ) "
1598 #'nstring-left-trim " (*)" " ( *three (silly) words* ) ")
1599 (equal-test " ( *three (silly) words"
1600 #'string-right-trim " (*)" " ( *three (silly) words* ) ")
1601 #+xedit (equal-test " ( *three (silly) words"
1602 #'nstring-right-trim " (*)" " ( *three (silly) words* ) ")