Merge release-4-6 into master
[alexxy/gromacs.git] / src / gromacs / mdlib / constr.c
index bce7d676bd35bafc0d6940115af7372ce5164a4e..e93cee59f3eee87be9c1ed4469ea1600d335bc01 100644 (file)
@@ -161,14 +161,6 @@ static int pcomp(const void *p1, const void *p2)
     return min1-min2;
 }
 
-static int icomp(const void *p1, const void *p2)
-{
-  atom_id *a1=(atom_id *)p1;
-  atom_id *a2=(atom_id *)p2;
-
-  return (*a1)-(*a2);
-}
-
 int n_flexible_constraints(struct gmx_constr *constr)
 {
   int nflexcon;
@@ -414,7 +406,7 @@ gmx_bool constrain(FILE *fplog,gmx_bool bLog,gmx_bool bEner,
         case econqCoord:
             csettle(constr->settled,
                     nsettle,settle->iatoms,x[0],xprime[0],
-                    invdt,v[0],vir!=NULL,rmdr,&error,&vetavar);
+                    invdt,v?v[0]:NULL,vir!=NULL,rmdr,&error,&vetavar);
             inc_nrnb(nrnb,eNR_SETTLE,nsettle);
             if (v != NULL)
             {