added tersts

Author: venom1204

inst/tests/tests.Rraw

@@ -21669,3 +21669,10 @@ test(2375.3, print(data.table(x=c("short", "abcdefghijklmnopqrstuvwxyz"))), outp
 test(2375.4, print(data.table(x="abcdefghijklmnopqrstuvwxyz")), output="abcdefghijklmnopqrstuvwxyz", options=list(width=200, datatable.prettyprint.char=NULL))
 test(2375.5, print(data.table(id=1L, score=99.1, txt="abcdefghijklmnopqrstuvwxyz")), output="abcdefghijklmn...", options=list(width=20, datatable.prettyprint.char=NULL))
 test(2375.6, print(data.table(x=rep("ABCDEFGHIJKLMNOPQRSTUVWXYZ", 1e6)), topn=1), output="1000000: ABCDEFGHIJKLM...", options=list(width=25, datatable.prettyprint.char=NULL))
+
+# #7252 as.IDate()/as.ITime preserve names
+test(2376.1, names(as.IDate(c(a = "2019-01-01"))), "a")
+test(2376.2, names(c(a = as.IDate("2019-01-01"))), "a")
+test(2376.3, names(as.ITime(c(a = "12:00:00"))), "a")
+test(2376.4, names(as.IDate(structure(as.POSIXct("2019-01-01 12:00:00"), names = "a"))), "a")
+test(2376.5, names(as.ITime(structure(3600, names = "a"))), "a")