Lines Matching refs:xrpnt
723 real *xrpnt = (real *) xr, xr_value=0;
740 for (i = (&xr[SBLIMIT][0] - xrpnt) >> 1; i > 0; i--) {
741 *xrpnt++ = 0.0;
742 *xrpnt++ = 0.0;
745 xrpnt = (real *) xr;
817 xrpnt = ((real *) xr) + (*m++);
859 if (xrpnt <= xr_endptr)
860 *xrpnt = xr_value;
863 xrpnt += step;
884 if (xrpnt <= xr_endptr)
885 *xrpnt = xr_value;
888 xrpnt += step;
910 xrpnt = ((real *) xr) + (*m++);
939 if (xrpnt <= xr_endptr)
940 *xrpnt = xr_value;
943 xrpnt += step;
949 xrpnt = ((real *) xr) + *m++;
957 if (xrpnt <= xr_endptr)
958 *xrpnt = 0.0;
961 xrpnt += step;
962 if (xrpnt <= xr_endptr)
963 *xrpnt = 0.0;
966 xrpnt += step;
1042 if (xrpnt <= xr_endptr)
1043 *xrpnt++ = xr_value;
1067 if (xrpnt <= xr_endptr)
1068 *xrpnt++ = xr_value;
1116 if (xrpnt <= xr_endptr)
1117 *xrpnt++ = xr_value;
1126 while (xrpnt <= xr_endptr)
1127 *xrpnt++ = 0.0;