add names test

Author: ben-schwen

inst/tests/tests.Rraw

@@ -21465,6 +21465,8 @@ test(2331.33, frev(as.IDate(1:10)), as.IDate(10:1))
 x = c(a=1L, b=2L, c=3L)
 test(2331.41, frev(x), rev(x))
 test(2331.42, setfrev(x), x)
+x = c(a=1L, b=2L, c=3L)
+test(2381.43, {frev(x); names(x)}, c("a","b","c"))
 # attributes
 x = structure(1:10, class = c("IDate", "Date"), att = 1L)
 test(2331.51, attr(frev(x), "att"), attr(rev(x), "att"))