Searched refs:vmstime (Results 1 - 3 of 3) sorted by relevance

/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/
H A Dvmsish.t106 $vmstime, @vmslocal, @vmsgmtime, $vmsmtime,
132 $vmstime = time;
133 @vmslocal = localtime($vmstime);
134 @vmsgmtime = gmtime($vmstime);
138 @utclocal = localtime($vmstime);
139 @utcgmtime = gmtime($vmstime);
148 ok(abs($utctime - $vmstime + $offset) <= 10,"(time) UTC: $utctime VMS: $vmstime");
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/Devel/DProf/
H A DDProf.xs210 uint64 vmstime;
211 _ckvmssts(sys$gettim(&vmstime));
212 vmstime /= 100000;
213 retval = vmstime & 0x7fffffff;
218 long int vmstime[2],remainder,divisor = 100000;
219 _ckvmssts(sys$gettim((unsigned long int *)vmstime));
220 vmstime[1] &= 0x7fff; /* prevent overflow in EDIV */
221 _ckvmssts(lib$ediv(&divisor,vmstime,(long int *)&retval,&remainder));
/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/POSIX/
H A DPOSIX.xs118 uint64 vmstime;
119 _ckvmssts(sys$gettim(&vmstime));
120 vmstime /= 100000;
121 retval = vmstime & 0x7fffffff;
126 long int vmstime[2],remainder,divisor = 100000;
127 _ckvmssts(sys$gettim((unsigned long int *)vmstime));
128 vmstime[1] &= 0x7fff; /* prevent overflow in EDIV */
129 _ckvmssts(lib$ediv(&divisor,vmstime,(long int *)&retval,&remainder));

Completed in 112 milliseconds