OpenGrok
Home
Sort by:
relevance
|
last modified time
|
path
Full Search
in project(s):
src
xsrc
Definition
Symbol
File Path
History
|
|
Help
Searched
refs:list1
(Results
1 - 2
of
2
) sorted by relevancy
/xsrc/external/mit/xedit/dist/lisp/
core.c
2013
intersection
list1
list2 &key test test-not key
2022
nintersection
list1
list2 &key test test-not key
2328
intersection
list1
list2 &key test test-not key
2329
nintersection
list1
list2 &key test test-not key
2330
set-difference
list1
list2 &key test test-not key
2331
nset-difference
list1
list2 &key test test-not key
2332
set-exclusive-or
list1
list2 &key test test-not key
2333
nset-exclusive-or
list1
list2 &key test test-not key
2334
subsetp
list1
list2 &key test test-not key
2335
union
list1
list2 &key test test-not ke
2345
LispObj *
list1
, *list2, *test, *test_not, *key;
local
5340
LispObj *cmp1, *cmp2, *
list1
= NIL, *lambda;
local
5937
LispObj *
list1
, *list2, *left, *right, *result, *cons;
local
[
all
...]
/xsrc/external/mit/xedit/dist/lisp/test/
list.lsp
839
(setq
list1
(list 1 1 2 3 4 'a 'b 'c "A" "B" "C" "d")
841
(equal-test '(1 1 4 b c) #'intersection
list1
list2)
842
(equal-test '(1 1 4 b c "B") #'intersection
list1
list2 :test 'equal)
844
#'intersection
list1
list2 :test #'equalp)
845
(setq
list1
(nintersection
list1
list2))
846
(equal-eval '(1 1 4 b c) '
list1
)
847
(setq
list1
(copy-list '((1 . 2) (2 . 3) (3 . 4) (4 . 5))))
849
(equal-test '((2 . 3) (3 . 4)) #'nintersection
list1
list2 :key #'cdr)
Completed in 7 milliseconds
Indexes created Fri Jul 03 00:25:33 UTC 2026