Searched refs:tmpdsc (Results 1 – 1 of 1) sorted by relevance
| /openbsd-src/gnu/usr.bin/perl/vms/ |
| H A D | vms.c | 890 tmpdsc = {6,DSC$K_DTYPE_T,DSC$K_CLASS_S,0}; in Perl_vmstrnenv() local
955 else if ((tmpdsc.dsc$a_pointer = tabvec[curtab]->dsc$a_pointer) && in Perl_vmstrnenv()
956 !str$case_blind_compare(&tmpdsc,&clisym)) { in Perl_vmstrnenv()
1285 struct dsc$descriptor_s tmpdsc = {6,DSC$K_DTYPE_T,DSC$K_CLASS_S,0}; in prime_env_iter() local
1325 if (!have_sym && (tmpdsc.dsc$a_pointer = env_tables[i]->dsc$a_pointer) && in prime_env_iter()
1326 !str$case_blind_compare(&tmpdsc,&clisym)) have_sym = 1; in prime_env_iter()
1356 else if ((tmpdsc.dsc$a_pointer = env_tables[i]->dsc$a_pointer) && in prime_env_iter()
1357 !str$case_blind_compare(&tmpdsc,&clisym)) { in prime_env_iter()
1361 (tmpdsc.dsc$a_pointer = env_tables[i]->dsc$a_pointer + 6) && in prime_env_iter()
1362 !str$case_blind_compare(&tmpdsc,&local)) my_strlcpy(cmd+12, "Local *", sizeof(cmd)-12); in prime_env_iter()
[all …]
|