Searched refs:trnlnm (Results 1 – 7 of 7) sorted by relevance
| /mirbsd/src/gnu/usr.bin/perl/vms/ |
| D | myconfig.com | 90 $ if $myname.eqs."" then $$myname = f$trnlnm("ARPANET_HOST_NAME") 91 $ if $myname.eqs."" then $$myname = f$trnlnm("INTERNET_HOST_NAME") 92 $ if $myname.eqs."" then $$myname = f$trnlnm("MULTINET_HOST_NAME") 93 $ if $myname.eqs."" then $$myname = f$trnlnm("UCX$INET_HOST_NAME") 94 $ if $myname.eqs."" then $$myname = f$trnlnm("TCPWARE_DOMAINNAME") 95 $ if $myname.eqs."" then $$myname = f$trnlnm("NEWS_ADDRESS") 96 $ if $myname.eqs."" then $$myname = f$trnlnm("SYS$NODE")
|
| D | test.com | 75 $ if f$trnlnm("sys") .nes. "" then Define sys " "
|
| D | genopt.com | 19 $ if f$trnlnm(name) .eqs. "" ! If it's a logical name, assume it's OK as is
|
| D | vms.c | 162 status = sys$trnlnm(&attr, &fildevdsc, &lnmdsc, 0, itlst); in my_maxidx() 293 retsts = sys$trnlnm(&attr,tabvec[curtab],&lnmdsc,&acmode,lnmlst); in Perl_vmstrnenv() 316 retsts = sys$trnlnm(&attr,tabvec[curtab],&lnmdsc,&acmode,lnmlst); in Perl_vmstrnenv() 1745 iss = sys$trnlnm(0, &d_table, &d_log, 0, itmlst); in popen_translate()
|
| /mirbsd/src/lib/libssl/src/crypto/ |
| D | o_time.c | 112 status = sys$trnlnm(0, &tabnam, &lognam, 0, itemlist); in OPENSSL_gmtime()
|
| /mirbsd/src/gnu/usr.bin/perl/t/op/ |
| D | magic.t | 63 elsif ($Is_VMS) { ok `write sys\$output f\$trnlnm("FOO")` eq "hi there\n"; }
|
| /mirbsd/src/gnu/usr.bin/perl/ |
| D | configure.com | 6206 $ WC "perl_root='" + perl_root + "'" ! VMS specific $trnlnm() function 6878 $ pcsi_producer = f$trnlnm("PCSI_PRODUCER") 6892 $ WRITE CONFIG "$ if f$trnlnm(""HP_BUILD_PERL_BIN_KIT"",""LNM$PROCESS_TABLE"") .EQS. """""
|