diff --git a/Code/ML/Cluster/Murtagh/hc.c b/Code/ML/Cluster/Murtagh/hc.c
index 955b8b965..12d323c38 100644
--- a/Code/ML/Cluster/Murtagh/hc.c
+++ b/Code/ML/Cluster/Murtagh/hc.c
@@ -35,6 +35,8 @@ doublereal *disnn;
 logical *flag__;
 doublereal *diss;
 {
+  (void)n;
+  (void)len;
     /* Initialized data */
 
     static doublereal inf = 1e20;