From: Ian Piumarta On Wed, 16 Oct 2002, Viktor wrote:
Such a small benchmark: Visual C++ (see code bellow) ... 14 ms ... 31 %
2 GHz Pentium Whatever:
15254 (microseconds)
Not quite as fast, but mine is interpreted. :^p) Script appended.
Huh.... this could quickly get out of hand (not just off-topic) but I was curious so.... assuming I did it the same way... populating a large array with a value...
COMPAQ AlphaServer DS10L 466 MHz, VMS V7.2-1 (Not exactly a speed-demon as Alpha go/went)
Compaq Basic 1.4 -> 3 ms
[Unfortunately, this isn't the machine on my desk. My 8 year old 175MHz Alpha with a whopping 192MB RAM takes 20 ms to do the same thing ... if I ever get Squeak running on it it'll probably be too slow to be usable...]
How I got it:
%INCLUDE "LIB$ROUTINES" %FROM %LIBRARY "SYS$LIBRARY:BASIC$STARLET.TLB" DECLARE LONG STARTTIME%, & ! Days since base system date ENDTIME%, & END10MIL%, & ! 10 millisecond units since midnight STRT10MIL% DIM Y%(10000000%) CALL LIB$DAY(STARTTIME%,,STRT10MIL%) FOR X = 1 TO 10000000 Y%(X) = 3% NEXT X CALL LIB$DAY(ENDTIME%,,END10MIL%) PRINT "Milliseconds :"; (END10MIL% - STRT10MIL%)/ 10%