mirror/CMake
1
0
Fork 0
mirror of https://github.com/Kitware/CMake.git synced 2026-01-03 20:29:56 -06:00
Code Issues Packages Projects Releases Wiki Activity

Merge topic 'cmList-SUBLIST-regression'

Browse Source 
1cfaed0684 list(): restore SUBLIST behavior

Acked-by: Kitware Robot <kwrobot@kitware.com>
Tested-by: buildbot <buildbot@kitware.com>
Merge-request: !8569
This commit is contained in:
Brad King
2023-06-20 13:25:28 +00:00
committed by Kitware Robot
parent ea1cd8ee7d 1cfaed0684
commit 8bfef726fa
2 changed files with 52 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Source/cmList.h
View File

@@ -322,7 +322,7 @@ public:
// extract sublist in range [first, last)
cmList sublist(const_iterator first, const_iterator last) const
{
return cmList{ first, last };
return cmList{ first, last, ExpandElements::No, EmptyElements::Yes };
}
// Extract sublist in range [first, last)
// Throw std::out_of_range if pos is invalid

51
Tests/RunCMake/list/SUBLIST.cmake
View File

@@ -44,3 +44,54 @@ list(SUBLIST mylist 1 -1 result)
if (NOT result STREQUAL "bravo;charlie;delta")
message (FATAL_ERROR "SUBLIST is \"${result}\", expected is \"bravo;charlie;delta\"")
endif()
set(mylist ";;")
unset(result)
list(SUBLIST mylist 0 0 result)
if (NOT result STREQUAL "")
message (FATAL_ERROR "SUBLIST is \"${result}\", expected is \"\"")
endif()
unset(result)
list(SUBLIST mylist 0 1 result)
if (NOT result STREQUAL "")
message (FATAL_ERROR "SUBLIST is \"${result}\", expected is \"\"")
endif()
unset(result)
list(SUBLIST mylist 0 2 result)
if (NOT result STREQUAL ";")
message (FATAL_ERROR "SUBLIST is \"${result}\", expected is \";\"")
endif()
unset(result)
list(SUBLIST mylist 0 3 result)
if (NOT result STREQUAL ";;")
message (FATAL_ERROR "SUBLIST is \"${result}\", expected is \";;\"")
endif()
set(mylist [[a\;b;c\;d;e]])
unset(result)
list(SUBLIST mylist 1 2 result)
if (NOT result STREQUAL "c;d;e")
message (FATAL_ERROR "SUBLIST is \"${result}\", expected is \"c;d;e\"")
endif()
set(mylist [[a\;b;c\\;d;e;f;g;h]])
unset(result)
list(SUBLIST mylist 1 -1 result)
if (NOT result STREQUAL "c\\;d;e;f;g;h")
message (FATAL_ERROR "SUBLIST is \"${result}\", expected is \"c\\;d;e;f;g;h\"")
endif()