diff options
Diffstat (limited to 'cad/calculix/files/patch-ccx_1.0+src+profil.f')
-rw-r--r-- | cad/calculix/files/patch-ccx_1.0+src+profil.f | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/cad/calculix/files/patch-ccx_1.0+src+profil.f b/cad/calculix/files/patch-ccx_1.0+src+profil.f new file mode 100644 index 000000000000..67f9efaf6eff --- /dev/null +++ b/cad/calculix/files/patch-ccx_1.0+src+profil.f @@ -0,0 +1,10 @@ +--- ccx_1.0/src/profil.f.orig Sun Jun 22 00:32:56 2003 ++++ ccx_1.0/src/profil.f Sun Jun 22 00:38:14 2003 +@@ -31,6 +31,7 @@ + do 20 i=1,n + jstrt=xadj(i) + jstop=xadj(i+1)-1 ++ if(jstrt.gt.jstop) cycle + oldmin=adj(jstrt) + newmin=nnn(adj(jstrt)) + ! |