diff options
Diffstat (limited to 'numpy/linalg/lapack_lite/f2c.c')
| -rw-r--r-- | numpy/linalg/lapack_lite/f2c.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/numpy/linalg/lapack_lite/f2c.c b/numpy/linalg/lapack_lite/f2c.c index f1d3fdfbe..869fce5d3 100644 --- a/numpy/linalg/lapack_lite/f2c.c +++ b/numpy/linalg/lapack_lite/f2c.c @@ -377,10 +377,11 @@ p->i = p1.i; #endif /* NO_OVERWRITE */ - int #ifdef KR_headers +int s_cat(lp, rpp, rnp, np, ll) char *lp, *rpp[]; ftnlen rnp[], *np, ll; #else +int s_cat(char *lp, char *rpp[], ftnlen rnp[], ftnlen *np, ftnlen ll) #endif { @@ -429,7 +430,8 @@ s_cat(char *lp, char *rpp[], ftnlen rnp[], ftnlen *np, ftnlen ll) free(lp1); } #endif - } + return 0; +} /* compare two strings */ |