CMake/Tests/CMakeTests/ListTest.cmake.in
Alexander Neundorf 2f23ecdb8a ENH: change LIST(CONTAINS ...) TO LIST(FIND ...), which returns the index
and which is more useful, because then you can also access the item behind
the one you were looking, useful for writing macros with optional keywords
with parameters

Alex
2007-08-15 10:26:50 -04:00

85 lines
2.6 KiB
CMake

MACRO(TEST command expected)
IF("x${result}" STREQUAL "x${expected}")
#MESSAGE("TEST \"${command}\" success: \"${result}\" expected: \"${expected}\"")
ELSE("x${result}" STREQUAL "x${expected}")
MESSAGE(SEND_ERROR "${CMAKE_CURRENT_LIST_LINE}: TEST \"${command}\" failed: \"${result}\" expected: \"${expected}\"")
ENDIF("x${result}" STREQUAL "x${expected}")
ENDMACRO(TEST command expected)
SET(mylist andy bill ken brad)
LIST(LENGTH mylist result)
TEST("LENGTH mylist result" "4")
LIST(LENGTH "mylist" result)
TEST("LENGTH \"mylist\" result" "4")
LIST(LENGTH "nonexiting_list1" result)
TEST("LENGTH \"nonexiting_list1\" result" "0")
LIST(GET mylist 3 2 1 0 result)
TEST("GET mylist 3 2 1 0 result" "brad;ken;bill;andy")
LIST(GET mylist 0 item0)
LIST(GET mylist 1 item1)
LIST(GET mylist 2 item2)
LIST(GET mylist 3 item3)
SET(result "${item3}" "${item0}" "${item1}" "${item2}")
TEST("GET individual 3 2 1 0 result" "brad;andy;bill;ken")
LIST(GET mylist -1 -2 -3 -4 result)
TEST("GET mylist -1 -2 -3 -4 result" "brad;ken;bill;andy")
LIST(GET mylist -1 2 -3 0 result)
TEST("GET mylist -1 2 -3 0 ${result}" "brad;ken;bill;andy")
LIST(GET "nonexiting_list2" 1 result)
TEST("GET \"nonexiting_list2\" 1 result" "NOTFOUND")
SET(result andy)
LIST(APPEND result brad)
TEST("APPEND result brad" "andy;brad")
LIST(APPEND "nonexiting_list3" brad)
SET(result "${nonexiting_list3}")
TEST("APPEND \"nonexiting_list3\" brad" "brad")
LIST(INSERT "nonexiting_list4" 0 andy bill brad ken)
SET(result "${nonexiting_list4}")
TEST("APPEND \"nonexiting_list4\" andy bill brad ken" "andy;bill;brad;ken")
SET(result andy brad)
LIST(INSERT result -1 bill ken)
TEST("INSERT result -1 bill ken" "andy;bill;ken;brad")
SET(result andy bill brad ken bob)
LIST(REMOVE_ITEM result bob)
TEST("REMOVE_ITEM result bob" "andy;bill;brad;ken")
SET(result andy bill bob brad ken peter)
LIST(REMOVE_ITEM result peter bob)
TEST("REMOVE_ITEM result peter bob" "andy;bill;brad;ken")
SET(result bob andy bill bob brad ken bob)
LIST(REMOVE_ITEM result bob)
TEST("REMOVE_ITEM result bob" "andy;bill;brad;ken")
SET(result andy bill bob brad ken peter)
LIST(REMOVE_AT result 2 -1)
TEST("REMOVE_AT result 2 -1" "andy;bill;brad;ken")
# ken is at index 2, nobody is not in the list so -1 should be returned
SET(mylist andy bill ken brad)
LIST(FIND mylist ken result)
TEST("FIND mylist ken result" "2")
LIST(FIND mylist nobody result)
TEST("FIND mylist nobody result" "-1")
SET(result ken bill andy brad)
LIST(SORT result)
TEST("SORT result" "andy;bill;brad;ken")
SET(result andy bill brad ken)
LIST(REVERSE result)
TEST("REVERSE result" "ken;brad;bill;andy")