[Info-vax] VSI OpenVMS Alpha 8.4-2L2

Jan-Erik Soderholm jan-erik.soderholm at telia.com
Mon Jul 24 14:04:15 EDT 2017


Den 2017-07-24 kl. 19:34, skrev Robert A. Brooks:
> On 7/24/2017 7:00 AM, Jan-Erik Soderholm wrote:
>> One test with f$getdvi is 5% slower. 
> 
> What item code(s)?
> 
> 

The test loop:

$! Test 3
$ turns = 10000
$ a2 = f$time()
$t3:
$ res = f$getdvi("TT:","TT_EIGHTBIT")
$ res = f$getdvi("TT:","TT_EIGHTBIT")
$ res = f$getdvi("TT:","TT_EIGHTBIT")
$ res = f$getdvi("TT:","TT_EIGHTBIT")
$ res = f$getdvi("TT:","TT_EIGHTBIT")
$ res = f$getdvi("TT:","TT_EIGHTBIT")
$ res = f$getdvi("TT:","TT_EIGHTBIT")
$ res = f$getdvi("TT:","TT_EIGHTBIT")
$ res = f$getdvi("TT:","TT_EIGHTBIT")
$ res = f$getdvi("TT:","TT_EIGHTBIT")
$ turns = turns - 1
$ if turns .gt. 0 then goto t3
$ b2 = f$time()
$ write sys$output "T3 time: ''F$DELTA_TIME(a2,b2)

5.60 sec on 8.2 and 6.35 sec on 8.4-2L2.

I picked that one for no particular reason... :-)




More information about the Info-vax mailing list