Lines Matching refs:stfptr
577 static integer stfptr = -1; in daffa_0_() local
2066 stfptr = 1; in daffa_0_()
2134 if (stfptr == -1) { in daffa_0_()
2203 "stpool", i__1, "daffa_", (ftnlen)1401)] = stfptr; in daffa_0_()
2204 stfptr = p; in daffa_0_()
2222 p = stfptr; in daffa_0_()
2227 stfptr = stpool[(i__1 = p - 1) < 5000 && 0 <= i__1 ? i__1 : s_rnge( in daffa_0_()
2968 stfptr = 1; in daffa_0_()
3036 if (stfptr == -1) { in daffa_0_()
3105 "stpool", i__1, "daffa_", (ftnlen)2318)] = stfptr; in daffa_0_()
3106 stfptr = p; in daffa_0_()
3124 p = stfptr; in daffa_0_()
3129 stfptr = stpool[(i__1 = p - 1) < 5000 && 0 <= i__1 ? i__1 : s_rnge( in daffa_0_()