diff --git a/ChangeLog b/ChangeLog
index fcf686dfc..bba3a21f0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2017-04-07  Werner Lemberg  <wl@gnu.org>
+
+	[ftfuzzer] Fix clang warnings.
+
+	* src/tools/ftfuzzer/ftfuzzer.cc (LLVMFuzzerTestOneInput): Add
+	casts.
+
 2017-04-06  Sascha Brawer  <sascha@google.com>
 	    Werner Lemberg  <wl@gnu.org
 
diff --git a/src/tools/ftfuzzer/ftfuzzer.cc b/src/tools/ftfuzzer/ftfuzzer.cc
index 55a08e416..4da0c2bf2 100644
--- a/src/tools/ftfuzzer/ftfuzzer.cc
+++ b/src/tools/ftfuzzer/ftfuzzer.cc
@@ -276,7 +276,7 @@
                            ? num_faces
                            : 20;
 
-    Random  faces_pool( max_face_cnt, num_faces );
+    Random  faces_pool( (int)max_face_cnt, (int)num_faces );
 
     for ( long  face_cnt = 0;
           face_cnt < max_face_cnt;
@@ -301,7 +301,7 @@
                                  ? num_instances
                                  : 20;
 
-      Random  instances_pool( max_instance_cnt, num_instances );
+      Random  instances_pool( (int)max_instance_cnt, (int)num_instances );
 
       for ( long  instance_cnt = 0;
             instance_cnt <= max_instance_cnt;