For sparse signs...

src/sparse/hs_sparse.cpp

@@ -17,6 +17,9 @@
 #define XCONST const
 #include "hs.h"
 //pthread_mutex_t mutex_dfpool = PTHREAD_MUTEX_INITIALIZER;
+#ifdef DEBUG
+  #include <cassert>
+#endif
 
 #define USE_ADJOINT_CODE
 void report_derivatives(const dvar_vector& x);
@@ -1720,7 +1723,10 @@ ivector cs_amd (XCONST hs_smatrix &A)  /* Implements only order == 1: Chol*/
                     {
                         d += dext ;            /* sum up the set differences */
                         Ci [pn++] = e ;            /* keep e in Ei */
-                        h += e ;            /* compute the hash of node i */
+#ifdef DEBUG
+                        assert(e >= 0);
+#endif
+                        h += static_cast<unsigned int>(e);            /* compute the hash of node i */
                     }
                     else
                     {
@@ -1738,7 +1744,10 @@ ivector cs_amd (XCONST hs_smatrix &A)  /* Implements only order == 1: Chol*/
                 if ((nvj = nv [j]) <= 0) continue ; /* node j dead or in Lk */
                 d += nvj ;                    /* degree(i) += |j| */
                 Ci [pn++] = j ;                  /* place j in node list of i */
-                h += j ;                    /* compute hash for node i */
+#ifdef DEBUG
+                assert(j >= 0);
+#endif
+                h += static_cast<unsigned int>(j);                    /* compute hash for node i */
             }
             if (d == 0)                         /* check for mass elimination */
             {
@@ -1757,7 +1766,10 @@ ivector cs_amd (XCONST hs_smatrix &A)  /* Implements only order == 1: Chol*/
                 Ci [p3] = Ci [p1] ;            /* move 1st el. to end of Ei */
                 Ci [p1] = k ;                /* add k as 1st element in of Ei */
                 len [i] = pn - p1 + 1 ;     /* new len of adj. list of node i */
-                h %= n ;                    /* finalize hash of i */
+#ifdef DEBUG
+                assert(n >= 0);
+#endif
+                h %= static_cast<unsigned int>(n);                    /* finalize hash of i */
                 next [i] = hhead [h] ;            /* place i in hash bucket */
                 hhead [h] = i ;
                 last [i] = h ;                   /* save hash of i in last[i] */