Such a small benchmark
Andy Stoffel
squeak-dev at lists.squeakfoundation.org
Wed Oct 16 18:27:26 UTC 2002
> 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%
More information about the Squeak-dev
mailing list
|