compiler/benchmarks/PPCBenchmark.st
changeset 504 0fb1f0799fc1
parent 503 ff58cd9f1f3c
child 516 3b81c9e53352
equal deleted inserted replaced
503:ff58cd9f1f3c 504:0fb1f0799fc1
   710 "
   710 "
   711 
   711 
   712     "Created: / 16-05-2015 / 09:44:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   712     "Created: / 16-05-2015 / 09:44:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   713 !
   713 !
   714 
   714 
   715 teardownSmalltalkNoopParserCompiled
       
   716     parser class removeFromSystem.
       
   717 "       
       
   718     size := input inject: 0 into: [:r :e | r + e size  ].
       
   719     Transcript crShow: 'Compiled Grammar time: ', time asString.
       
   720     Transcript crShow: 'Time per character: ', (time / size * 1000.0) asString, ' microseconds'.
       
   721 "
       
   722 
       
   723     "Created: / 16-05-2015 / 09:44:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
   724 !
       
   725 
       
   726 teardownSmalltalkNoopParserTokenized
       
   727     parser class removeFromSystem.
       
   728 "       
       
   729     size := input inject: 0 into: [:r :e | r + e size  ].
       
   730     Transcript crShow: 'Compiled Grammar time: ', time asString.
       
   731     Transcript crShow: 'Time per character: ', (time / size * 1000.0) asString, ' microseconds'.
       
   732 "
       
   733 
       
   734     "Created: / 16-05-2015 / 09:44:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
       
   735 !
       
   736 
       
   737 teardownSmalltalkParserCompiled
   715 teardownSmalltalkParserCompiled
   738     parser class removeFromSystem.
   716     parser class removeFromSystem.
   739 "	
   717 "	
   740     size := input inject: 0 into: [:r :e | r + e size  ].
   718     size := input inject: 0 into: [:r :e | r + e size  ].
   741     Transcript crShow: 'Compiled Grammar time: ', time asString.
   719     Transcript crShow: 'Compiled Grammar time: ', time asString.