benchmarks/PrimitiveArguments.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Wed, 22 May 2013 21:15:02 +0100
branchbuiltin-class-support
changeset 2618 e7757e5d593c
parent 2573 59aeefc96cf4
child 2711 a00302fe5083
permissions -rw-r--r--
Initial attempt to generalized builtin class support.

"{ Package: 'stx:libjava/benchmarks' }"

JavaBenchmark subclass:#PrimitiveArguments
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'Benchmarks-Java-Micro'
!


!PrimitiveArguments methodsFor:'running'!

doSmth_i: i
   ^self

!

runBenchmarkS2J:n 
    | inst |

    inst := JAVA stx libjava benchmarks PrimitiveArguments new.
    ^ Time 
        millisecondsToRun:[
            1 to:n do:[:idx | 
                inst doSmth:idx.
            ].
        ].

    "Created: / 31-10-2012 / 23:36:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!

runBenchmarkS: n
    | inst |
    inst := self class new.

    ^ Time millisecondsToRun: [
        1 to: n do:[:idx|
            inst doSmth_i: idx.           
        ].
    ].

    "Created: / 31-10-2012 / 22:59:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !

!PrimitiveArguments class methodsFor:'documentation'!

version_CVS
    ^ '$Header: /cvs/stx/stx/libjava/benchmarks/PrimitiveArguments.st,v 1.2 2013-02-25 11:15:32 vrany Exp $'
!

version_HG

    ^ '$Changeset: <not expanded> $'
!

version_SVN
    ^ '§Id::                                                                                                                        §'
! !