This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
bump version to v5.19.3
[perl5.git] / time64.c
index 5ae5e7d..8cbfa7c 100644 (file)
--- a/time64.c
+++ b/time64.c
@@ -269,6 +269,8 @@ static int S_safe_year(Year year)
 
 
 static void S_copy_little_tm_to_big_TM(const struct tm *src, struct TM *dest) {
+    assert(src);
+    assert(dest);
 #ifdef USE_TM64
     dest->tm_sec        = src->tm_sec;
     dest->tm_min        = src->tm_min;