Charles Lane <[EMAIL PROTECTED]> wrote:
>
> --- vms/vms.c-orig Fri Mar 3 11:01:39 2000
> +++ vms/vms.c Wed Mar 8 10:33:58 2000
> @@ -207,6 +212,11 @@
> retsts = sys$trnlnm(&attr,tabvec[curtab],&lnmdsc,&acmode,lnmlst);
> if (retsts == SS$_IVLOGNAM) { ivlnm = 1; continue; }
> if (retsts == SS$_NOLOGNAM) continue;
> + /* PPFs have a prefix */
> + if (eqvlen >= 4 && eqv[0] == 0x1b && eqv[1] == 0x00) {
> + memcpy(eqv,eqv+4,eqvlen-4);
> + eqvlen -= 4;
> + }
> break;
> }
> }
Could we restrict this to the PPFs only (just match against SYS$INPUT,
SYS$OUTPUT, and SYS$ERROR)? I agree that the RMS info isn't much use
in these cases, but I'd hate to indiscriminately lop off the front
end of what might be an equivalence string full of binary data.
Regards,
Charles Bailey [EMAIL PROTECTED]
