blob: 11bf0200ed7d729026f9637dabb6c9ee0d8a9e14 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
|
--- src/gibbs.cxx.orig Fri Feb 18 11:55:30 2000
+++ src/gibbs.cxx Fri Feb 18 11:55:46 2000
@@ -470,7 +470,7 @@
integer i__1, i__2;
/* Local variables */
- static flag_;
+ static integer flag_;
static integer i, j, k, p, s, h0, i1, l0, i2;
/* extern Subroutine int gibbs1_(); */
|
