Lines Matching refs:a_pointer
274 name_dsc.dsc$a_pointer = (char *)logname; in simple_trnlnm()
690 path_desc.dsc$a_pointer = (char *)path; /* cast ok */ in vms_split_path()
848 lnmdsc.dsc$a_pointer = (char *) lnm; /* Cast ok for read only parameter */ in my_maxidx()
915 lnmdsc.dsc$a_pointer = uplnm; in Perl_vmstrnenv()
955 else if ((tmpdsc.dsc$a_pointer = tabvec[curtab]->dsc$a_pointer) && in Perl_vmstrnenv()
981 strncpy(eqv,eqvdsc.dsc$a_pointer,eqvlen); in Perl_vmstrnenv()
1325 if (!have_sym && (tmpdsc.dsc$a_pointer = env_tables[i]->dsc$a_pointer) && in prime_env_iter()
1356 else if ((tmpdsc.dsc$a_pointer = env_tables[i]->dsc$a_pointer) && in prime_env_iter()
1361 (tmpdsc.dsc$a_pointer = env_tables[i]->dsc$a_pointer + 6) && in prime_env_iter()
1369 cmddsc.dsc$w_length = my_strlcat(cmd, env_tables[i]->dsc$a_pointer, sizeof(cmd)); in prime_env_iter()
1534 else if ((tmpdsc.dsc$a_pointer = tabvec[curtab]->dsc$a_pointer) && in Perl_vmssetenv()
1538 (tmpdsc.dsc$a_pointer = tabvec[curtab]->dsc$a_pointer + 6) && in Perl_vmssetenv()
1561 eqvdsc.dsc$a_pointer = (char *) eqv; /* cast ok to readonly parameter */ in Perl_vmssetenv()
1563 if ((tmpdsc.dsc$a_pointer = tabvec[0]->dsc$a_pointer) && in Perl_vmssetenv()
1567 (tmpdsc.dsc$a_pointer = tabvec[0]->dsc$a_pointer + 6) && in Perl_vmssetenv()
1593 for (j = 0, c = eqvdsc.dsc$a_pointer; j < nseg; j++, ile++, c += LNM$C_NAMLENGTH) { in Perl_vmssetenv()
1683 d_name.dsc$a_pointer = (char *)name; /* Cast OK for read only parameter */ in Perl_vmssetuserlnm()
1720 const char * dsc$a_pointer; in Perl_my_crypt()
1730 usrdsc.dsc$a_pointer = usrname; in Perl_my_crypt()
1747 txtdsc.dsc$a_pointer = textpasswd; in Perl_my_crypt()
1838 fildsc.dsc$a_pointer = vmsname; in mp_do_kill_file()
2897 namdsc->dsc$a_pointer[namdsc->dsc$w_length] = '\0'; in create_mbx()
3555 d_dev.dsc$a_pointer = out; in pipe_mbxtofd_setup()
4084 customization_dsc.dsc$a_pointer = customization;
4089 device_name_dsc.dsc$a_pointer = device_name;
4271 vmspipedsc.dsc$a_pointer = tfilebuf;
4479 p = vmscmd->dsc$a_pointer;
5061 rslt = int_rmsexpand_tovms(vms_src_dsc->dsc$a_pointer,
5076 fildsc.dsc$a_pointer = vmsname;
5385 old_file_dsc.dsc$a_pointer = src_st.st_devnam;
5390 new_file_dsc.dsc$a_pointer = vms_dst;
7589 specdsc.dsc$a_pointer = vmspath;
7592 dvidsc.dsc$a_pointer = &mynam.naml$t_dvi[1];
9325 mbxnam.dsc$a_pointer = mbxname;
9326 mbxnam.dsc$w_length = strlen(mbxnam.dsc$a_pointer);
9328 mbxdevnam.dsc$a_pointer = mbxname;
9332 mbxdevnam.dsc$a_pointer[mbxdevnam.dsc$w_length] = '\0';
9451 resultspec.dsc$a_pointer = NULL;
9455 filespec.dsc$a_pointer = int_tovmsspec(item, vmsspec, 0, NULL);
9456 if (!isunix || !filespec.dsc$a_pointer)
9457 filespec.dsc$a_pointer = item;
9458 filespec.dsc$w_length = strlen(filespec.dsc$a_pointer);
9478 my_strlcpy(string, resultspec.dsc$a_pointer, resultspec.dsc$w_length+1);
9599 value.dsc$a_pointer = command;
9600 value.dsc$w_length = strlen(value.dsc$a_pointer);
9614 pidstr.dsc$a_pointer = pidstring;
9615 pidstr.dsc$w_length = strlen(pidstr.dsc$a_pointer);
9782 tabvec[tabidx]->dsc$a_pointer = (char *)PerlMem_malloc(len + 1);
9783 if (tabvec[tabidx]->dsc$a_pointer == NULL) _ckvmssts_noperl(SS$_INSFMEM);
9784 my_strlcpy(tabvec[tabidx]->dsc$a_pointer, eqv, len + 1);
9956 wilddsc.dsc$a_pointer = tpl;
9984 resdsc.dsc$a_pointer = cp1;
10115 dd->pat.dsc$a_pointer = dd->pattern;
10186 pat.dsc$a_pointer = text;
10193 res.dsc$a_pointer = buff;
10241 res.dsc$a_pointer = buff;
10467 if (vmscmd->dsc$a_pointer) {
10468 PerlMem_free(vmscmd->dsc$a_pointer);
10558 resdsc.dsc$a_pointer = resspec;
10563 vmscmd->dsc$a_pointer = NULL;
10699 imgdsc.dsc$a_pointer = s;
10707 imgdsc.dsc$a_pointer++; imgdsc.dsc$w_length--;
10842 vmscmd->dsc$a_pointer = (char *)PerlMem_malloc(MAX_DCL_LINE_LENGTH);
10843 if (vmscmd->dsc$a_pointer == NULL) _ckvmssts_noperl(SS$_INSFMEM);
10845 my_strlcpy(vmscmd->dsc$a_pointer,"$ MCR ", MAX_DCL_LINE_LENGTH);
10847 my_strlcat(vmscmd->dsc$a_pointer, image_name, MAX_DCL_LINE_LENGTH);
10848 my_strlcat(vmscmd->dsc$a_pointer, " ", MAX_DCL_LINE_LENGTH);
10851 my_strlcpy(vmscmd->dsc$a_pointer, image_name, MAX_DCL_LINE_LENGTH);
10852 my_strlcat(vmscmd->dsc$a_pointer, " ", MAX_DCL_LINE_LENGTH);
10854 my_strlcpy(vmscmd->dsc$a_pointer, "@", MAX_DCL_LINE_LENGTH);
10860 my_strlcat(vmscmd->dsc$a_pointer, resspec, MAX_DCL_LINE_LENGTH);
10867 my_strlcat(vmscmd->dsc$a_pointer, image_argv, MAX_DCL_LINE_LENGTH);
10868 my_strlcat(vmscmd->dsc$a_pointer, " ", MAX_DCL_LINE_LENGTH);
10875 vmscmd_len = strlen(vmscmd->dsc$a_pointer);
10877 my_strlcat(vmscmd->dsc$a_pointer, rest, MAX_DCL_LINE_LENGTH);
10881 vmscmd->dsc$w_length = strlen(vmscmd->dsc$a_pointer);
10894 vmscmd->dsc$a_pointer = (char *)PerlMem_malloc(vmscmd->dsc$w_length + 1);
10895 my_strlcpy(vmscmd->dsc$a_pointer, cmd, vmscmd->dsc$w_length + 1);
10906 eqvdsc.dsc$a_pointer = equiv;
10997 vmscmd->dsc$w_length, vmscmd->dsc$a_pointer, Strerror(errno));
11372 name_desc.dsc$a_pointer= (char *) name; /* read only pointer */
11430 name_desc.dsc$a_pointer= (char *) name;
11784 dev_desc.dsc$a_pointer = (char *) dev; /* Read only parameter */
11928 namdsc.dsc$a_pointer = (char *)fname;
11971 usrprodsc.dsc$a_pointer = (char *)PerlMem_malloc(usrprodsc.dsc$w_length);
11972 if (usrprodsc.dsc$a_pointer == NULL) _ckvmssts_noperl(SS$_INSFMEM);
11973 _ckvmssts_noperl(sys$create_user_profile(&usrdsc,&usrprolst,0,usrprodsc.dsc$a_pointer,
11978 PerlMem_free(usrprodsc.dsc$a_pointer);
13005 rsdsc.dsc$a_pointer = (char *) rslt; /* cast required */
13066 wilddsc.dsc$a_pointer = tovmspath_utf8(
13068 ok = (wilddsc.dsc$a_pointer != NULL);
13076 wilddsc.dsc$a_pointer = st.st_devnam;
13081 wilddsc.dsc$a_pointer = tovmsspec_utf8(SvPVX(tmpglob),vmsspec,NULL);
13082 ok = (wilddsc.dsc$a_pointer != NULL);
13085 wilddsc.dsc$w_length = strlen(wilddsc.dsc$a_pointer);
13089 for (cp=wilddsc.dsc$a_pointer; ok && cp && *cp; cp++) {
13103 wilddsc.dsc$a_pointer, &wv_spec, &wv_len, &wr_spec, &wr_len,
13540 dvidsc.dsc$a_pointer=statbuf.st_dev;
13543 specdsc.dsc$a_pointer = outname;