HP2000/Access - (hpemu clarification)

From: Mike Gemeny <MGemeny_at_pgcps.org>
Date: Thu Jan 29 22:43:43 2004

Jay asked about benchmarks for SIMH running HP2000 Access,
 
Here's a quick chain test for doing 255 (+-) chains with timing for my
SIMH configuration as described (about 23 sec.) I would hope that real hardware
would out perform it. If not I'll have to think about what could be wrong with
the simulator and come up with another test. Let me know what you get, Jay, next
time you have her up.
 
Thanks again,
Mike.
 
list
CHATST
 
10 COM A$[255]
20 IF LEN(A$)=255 THEN 70
30 IF LEN(A$)#0 THEN 50
40 PRINT TIM(0),TIM(4)
50 A$[LEN(A$)+1]="A"
60 CHAIN X,"chatst"
70 PRINT TIM(0),TIM(4)
80 END
run

CHATST
 
 39 22
 39 45
 
DONE
cat
 NAME LENGTH RECORD NAME LENGTH RECORD NAME LENGTH RECORD
BTEST 1 CATT AL 5 63 CHATST C 1
DT 1 FPTS9 2 HI 1
KLFW 1 PR0 AL PR0 64 ROS00 AL 7 63
SIGNIN 1 SUM 1 WORLD 1
Received on Thu Jan 29 2004 - 22:43:43 GMT