Benchfib.js 19 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480
  1. define(["amber/boot", "require", "amber/core/Kernel-Objects"], function($boot,requirejs){"use strict";
  2. var $core=$boot.api,nil=$boot.nilAsValue,$nil=$boot.nilAsReceiver,$recv=$boot.asReceiver,$globals=$boot.globals;
  3. var $pkg = $core.addPackage("Benchfib");
  4. $pkg.transport = {"type":"amd","amdNamespace":"amber/legacy"};
  5. $core.addClass("Benchfib", $globals.Object, "Benchfib");
  6. $core.addMethod(
  7. $core.method({
  8. selector: "main",
  9. protocol: "not yet classified",
  10. //>>excludeStart("ide", pragmas.excludeIdeData);
  11. args: [],
  12. source: "main\x0a\x0a\x09| result |\x0a\x09result := 0 tinyBenchmarks.\x0a\x09console log: '0 tinyBenchmarks => ' , result",
  13. referencedClasses: [],
  14. //>>excludeEnd("ide");
  15. pragmas: [],
  16. messageSends: ["tinyBenchmarks", "log:", ","]
  17. }, function ($methodClass){ return function (){
  18. var self=this,$self=this;
  19. var result;
  20. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  21. return $core.withContext(function($ctx1) {
  22. //>>excludeEnd("ctx");
  23. result=(0)._tinyBenchmarks();
  24. $recv(console)._log_("0 tinyBenchmarks => ".__comma(result));
  25. return self;
  26. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  27. }, function($ctx1) {$ctx1.fill(self,"main",{result:result})});
  28. //>>excludeEnd("ctx");
  29. }; }),
  30. $globals.Benchfib.a$cls);
  31. $core.addMethod(
  32. $core.method({
  33. selector: "benchFib",
  34. protocol: "*Benchfib",
  35. //>>excludeStart("ide", pragmas.excludeIdeData);
  36. args: [],
  37. source: "benchFib\x0a\x09\x22Handy send-heavy benchmark\x22\x0a\x09\x22(result // seconds to run) = approx calls per second\x22\x0a\x09\x22\x09| r t |\x0a\x09\x09t := Time millisecondsToRun: [r := 26 benchFib].\x0a\x09\x09(r * 1000) // t\x22\x0a\x09\x22138000 on a Mac 8100/100\x22\x0a\x09^ self < 2\x0a\x09\x09ifTrue: [1]\x0a\x09\x09ifFalse: [(self-1) benchFib + (self-2) benchFib + 1]",
  38. referencedClasses: [],
  39. //>>excludeEnd("ide");
  40. pragmas: [],
  41. messageSends: ["ifTrue:ifFalse:", "<", "+", "benchFib", "-"]
  42. }, function ($methodClass){ return function (){
  43. var self=this,$self=this;
  44. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  45. return $core.withContext(function($ctx1) {
  46. //>>excludeEnd("ctx");
  47. if($core.assert($self.__lt((2)))){
  48. return (1);
  49. } else {
  50. return [$recv($recv([$recv([$self.__minus((1))
  51. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  52. ,$ctx1.sendIdx["-"]=1
  53. //>>excludeEnd("ctx");
  54. ][0])._benchFib()
  55. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  56. ,$ctx1.sendIdx["benchFib"]=1
  57. //>>excludeEnd("ctx");
  58. ][0]).__plus($recv($self.__minus((2)))._benchFib())).__plus((1))
  59. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  60. ,$ctx1.sendIdx["+"]=1
  61. //>>excludeEnd("ctx");
  62. ][0];
  63. }
  64. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  65. }, function($ctx1) {$ctx1.fill(self,"benchFib",{})});
  66. //>>excludeEnd("ctx");
  67. }; }),
  68. $globals.Number);
  69. $core.addMethod(
  70. $core.method({
  71. selector: "benchmark",
  72. protocol: "*Benchfib",
  73. //>>excludeStart("ide", pragmas.excludeIdeData);
  74. args: [],
  75. source: "benchmark\x0a\x09\x22Handy bytecode-heavy benchmark\x22\x0a\x09\x22(500000 // time to run) = approx bytecodes per second\x22\x0a\x09\x225000000 // (Time millisecondsToRun: [10 benchmark]) * 1000\x22\x0a\x09\x223059000 on a Mac 8100/100\x22\x0a\x09| size flags prime k count |\x0a\x09size := 8190.\x0a\x091 to: self do:\x0a\x09\x09[:iter |\x0a\x09\x09count := 0.\x0a\x09\x09flags := Array new.\x0a\x09\x09size timesRepeat: [ flags add: true].\x0a\x09\x091 to: size do:\x0a\x09\x09\x09[:i | (flags at: i) ifTrue:\x0a\x09\x09\x09\x09[prime := i+1.\x0a\x09\x09\x09\x09k := i + prime.\x0a\x09\x09\x09\x09[k <= size] whileTrue:\x0a\x09\x09\x09\x09\x09[flags at: k put: false.\x0a\x09\x09\x09\x09\x09k := k + prime].\x0a\x09\x09\x09\x09count := count + 1]]].\x0a\x09^ count",
  76. referencedClasses: ["Array"],
  77. //>>excludeEnd("ide");
  78. pragmas: [],
  79. messageSends: ["to:do:", "new", "timesRepeat:", "add:", "ifTrue:", "at:", "+", "whileTrue:", "<=", "at:put:"]
  80. }, function ($methodClass){ return function (){
  81. var self=this,$self=this;
  82. var size,flags,prime,k,count;
  83. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  84. return $core.withContext(function($ctx1) {
  85. //>>excludeEnd("ctx");
  86. size=(8190);
  87. [(1)._to_do_(self,(function(iter){
  88. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  89. return $core.withContext(function($ctx2) {
  90. //>>excludeEnd("ctx");
  91. count=(0);
  92. flags=$recv($globals.Array)._new();
  93. $recv(size)._timesRepeat_((function(){
  94. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  95. return $core.withContext(function($ctx3) {
  96. //>>excludeEnd("ctx");
  97. return $recv(flags)._add_(true);
  98. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  99. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,2)});
  100. //>>excludeEnd("ctx");
  101. }));
  102. return (1)._to_do_(size,(function(i){
  103. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  104. return $core.withContext(function($ctx3) {
  105. //>>excludeEnd("ctx");
  106. if($core.assert($recv(flags)._at_(i))){
  107. prime=[$recv(i).__plus((1))
  108. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  109. ,$ctx3.sendIdx["+"]=1
  110. //>>excludeEnd("ctx");
  111. ][0];
  112. k=[$recv(i).__plus(prime)
  113. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  114. ,$ctx3.sendIdx["+"]=2
  115. //>>excludeEnd("ctx");
  116. ][0];
  117. $recv((function(){
  118. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  119. return $core.withContext(function($ctx4) {
  120. //>>excludeEnd("ctx");
  121. return $recv(k).__lt_eq(size);
  122. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  123. }, function($ctx4) {$ctx4.fillBlock({},$ctx3,5)});
  124. //>>excludeEnd("ctx");
  125. }))._whileTrue_((function(){
  126. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  127. return $core.withContext(function($ctx4) {
  128. //>>excludeEnd("ctx");
  129. $recv(flags)._at_put_(k,false);
  130. k=[$recv(k).__plus(prime)
  131. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  132. ,$ctx4.sendIdx["+"]=3
  133. //>>excludeEnd("ctx");
  134. ][0];
  135. return k;
  136. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  137. }, function($ctx4) {$ctx4.fillBlock({},$ctx3,6)});
  138. //>>excludeEnd("ctx");
  139. }));
  140. count=$recv(count).__plus((1));
  141. return count;
  142. }
  143. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  144. }, function($ctx3) {$ctx3.fillBlock({i:i},$ctx2,3)});
  145. //>>excludeEnd("ctx");
  146. }));
  147. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  148. }, function($ctx2) {$ctx2.fillBlock({iter:iter},$ctx1,1)});
  149. //>>excludeEnd("ctx");
  150. }))
  151. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  152. ,$ctx1.sendIdx["to:do:"]=1
  153. //>>excludeEnd("ctx");
  154. ][0];
  155. return count;
  156. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  157. }, function($ctx1) {$ctx1.fill(self,"benchmark",{size:size,flags:flags,prime:prime,k:k,count:count})});
  158. //>>excludeEnd("ctx");
  159. }; }),
  160. $globals.Number);
  161. $core.addMethod(
  162. $core.method({
  163. selector: "jsbenchFib",
  164. protocol: "*Benchfib",
  165. //>>excludeStart("ide", pragmas.excludeIdeData);
  166. args: [],
  167. source: "jsbenchFib\x0a\x0a\x09<inlineJS: 'if (this < 2) {\x0areturn 1;\x0a} else {\x0areturn (this-1)._jsbenchFib() + (this-2)._jsbenchFib() + 1;}'>",
  168. referencedClasses: [],
  169. //>>excludeEnd("ide");
  170. pragmas: [["inlineJS:", ["if (this < 2) {\x0areturn 1;\x0a} else {\x0areturn (this-1)._jsbenchFib() + (this-2)._jsbenchFib() + 1;}"]]],
  171. messageSends: []
  172. }, function ($methodClass){ return function (){
  173. var self=this,$self=this;
  174. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  175. return $core.withContext(function($ctx1) {
  176. //>>excludeEnd("ctx");
  177. if (this < 2) {
  178. return 1;
  179. } else {
  180. return (this-1)._jsbenchFib() + (this-2)._jsbenchFib() + 1;};
  181. return self;
  182. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  183. }, function($ctx1) {$ctx1.fill(self,"jsbenchFib",{})});
  184. //>>excludeEnd("ctx");
  185. }; }),
  186. $globals.Number);
  187. $core.addMethod(
  188. $core.method({
  189. selector: "jsbenchmark",
  190. protocol: "*Benchfib",
  191. //>>excludeStart("ide", pragmas.excludeIdeData);
  192. args: [],
  193. source: "jsbenchmark\x0a\x0a<inlineJS: '\x0avar size = 8190;\x0avar count;\x0afor (var z=0;z<this;z++) {\x0a\x09count = 0;\x0a\x09var flags = new Array();\x0a\x09for (var p=0; p<size; p++) {\x0a\x09flags[p] = true;\x0a\x09}\x0a\x09for (var i=1;i<=size;i++) {\x0a\x09\x09if (flags[i-1]) {\x0a\x09\x09\x09var prime = i+1;\x0a\x09\x09\x09var k = i + prime;\x0a\x09\x09\x09while (k <= size) {\x0a\x09\x09\x09\x09flags[k-1] = false;\x0a\x09\x09\x09\x09k = k + prime;\x0a\x09\x09\x09}\x0a\x09\x09\x09count = count + 1;\x0a\x09\x09}\x0a\x09}\x0a}\x0areturn count'>",
  194. referencedClasses: [],
  195. //>>excludeEnd("ide");
  196. pragmas: [["inlineJS:", ["\x0avar size = 8190;\x0avar count;\x0afor (var z=0;z<this;z++) {\x0a\x09count = 0;\x0a\x09var flags = new Array();\x0a\x09for (var p=0; p<size; p++) {\x0a\x09flags[p] = true;\x0a\x09}\x0a\x09for (var i=1;i<=size;i++) {\x0a\x09\x09if (flags[i-1]) {\x0a\x09\x09\x09var prime = i+1;\x0a\x09\x09\x09var k = i + prime;\x0a\x09\x09\x09while (k <= size) {\x0a\x09\x09\x09\x09flags[k-1] = false;\x0a\x09\x09\x09\x09k = k + prime;\x0a\x09\x09\x09}\x0a\x09\x09\x09count = count + 1;\x0a\x09\x09}\x0a\x09}\x0a}\x0areturn count"]]],
  197. messageSends: []
  198. }, function ($methodClass){ return function (){
  199. var self=this,$self=this;
  200. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  201. return $core.withContext(function($ctx1) {
  202. //>>excludeEnd("ctx");
  203. var size = 8190;
  204. var count;
  205. for (var z=0;z<this;z++) {
  206. count = 0;
  207. var flags = new Array();
  208. for (var p=0; p<size; p++) {
  209. flags[p] = true;
  210. }
  211. for (var i=1;i<=size;i++) {
  212. if (flags[i-1]) {
  213. var prime = i+1;
  214. var k = i + prime;
  215. while (k <= size) {
  216. flags[k-1] = false;
  217. k = k + prime;
  218. }
  219. count = count + 1;
  220. }
  221. }
  222. }
  223. return count;
  224. return self;
  225. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  226. }, function($ctx1) {$ctx1.fill(self,"jsbenchmark",{})});
  227. //>>excludeEnd("ctx");
  228. }; }),
  229. $globals.Number);
  230. $core.addMethod(
  231. $core.method({
  232. selector: "jstinyBenchmarks",
  233. protocol: "*Benchfib",
  234. //>>excludeStart("ide", pragmas.excludeIdeData);
  235. args: [],
  236. source: "jstinyBenchmarks\x0a\x09\x220 jstinyBenchmarks\x22\x0a\x0a\x09| t1 t2 r n1 n2 |\x0a\x09n1 := 1.\x0a\x09[t1 := Date millisecondsToRun: [n1 jsbenchmark].\x0a\x09t1 < 1000] whileTrue:[n1 := n1 * 2]. \x22Note: #benchmark's runtime is about O(n)\x22\x0a\x0a\x09n2 := 28.\x0a\x09[t2 := Date millisecondsToRun: [r := n2 jsbenchFib].\x0a\x09t2 < 1000] whileTrue:[n2 := n2 + 1].\x0a\x09\x22Note: #jsbenchFib's runtime is about O(k^n),\x0a\x09\x09where k is the golden number = (1 + 5 sqrt) / 2 = 1.618....\x22\x0a\x0a\x09^ ((n1 * 500000 * 1000) / t1) printString, ' bytecodes/sec; ',\x0a\x09\x09((r * 1000) / t2) printString, ' sends/sec'",
  237. referencedClasses: ["Date"],
  238. //>>excludeEnd("ide");
  239. pragmas: [],
  240. messageSends: ["whileTrue:", "millisecondsToRun:", "jsbenchmark", "<", "*", "jsbenchFib", "+", ",", "printString", "/"]
  241. }, function ($methodClass){ return function (){
  242. var self=this,$self=this;
  243. var t1,t2,r,n1,n2;
  244. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  245. return $core.withContext(function($ctx1) {
  246. //>>excludeEnd("ctx");
  247. n1=(1);
  248. [$recv((function(){
  249. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  250. return $core.withContext(function($ctx2) {
  251. //>>excludeEnd("ctx");
  252. t1=[$recv($globals.Date)._millisecondsToRun_((function(){
  253. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  254. return $core.withContext(function($ctx3) {
  255. //>>excludeEnd("ctx");
  256. return $recv(n1)._jsbenchmark();
  257. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  258. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,2)});
  259. //>>excludeEnd("ctx");
  260. }))
  261. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  262. ,$ctx2.sendIdx["millisecondsToRun:"]=1
  263. //>>excludeEnd("ctx");
  264. ][0];
  265. return [$recv(t1).__lt((1000))
  266. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  267. ,$ctx2.sendIdx["<"]=1
  268. //>>excludeEnd("ctx");
  269. ][0];
  270. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  271. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  272. //>>excludeEnd("ctx");
  273. }))._whileTrue_((function(){
  274. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  275. return $core.withContext(function($ctx2) {
  276. //>>excludeEnd("ctx");
  277. n1=[$recv(n1).__star((2))
  278. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  279. ,$ctx2.sendIdx["*"]=1
  280. //>>excludeEnd("ctx");
  281. ][0];
  282. return n1;
  283. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  284. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,3)});
  285. //>>excludeEnd("ctx");
  286. }))
  287. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  288. ,$ctx1.sendIdx["whileTrue:"]=1
  289. //>>excludeEnd("ctx");
  290. ][0];
  291. n2=(28);
  292. $recv((function(){
  293. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  294. return $core.withContext(function($ctx2) {
  295. //>>excludeEnd("ctx");
  296. t2=$recv($globals.Date)._millisecondsToRun_((function(){
  297. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  298. return $core.withContext(function($ctx3) {
  299. //>>excludeEnd("ctx");
  300. r=$recv(n2)._jsbenchFib();
  301. return r;
  302. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  303. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,5)});
  304. //>>excludeEnd("ctx");
  305. }));
  306. return $recv(t2).__lt((1000));
  307. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  308. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,4)});
  309. //>>excludeEnd("ctx");
  310. }))._whileTrue_((function(){
  311. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  312. return $core.withContext(function($ctx2) {
  313. //>>excludeEnd("ctx");
  314. n2=$recv(n2).__plus((1));
  315. return n2;
  316. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  317. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,6)});
  318. //>>excludeEnd("ctx");
  319. }));
  320. return [$recv([$recv($recv([$recv([$recv([$recv([$recv(n1).__star((500000))
  321. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  322. ,$ctx1.sendIdx["*"]=3
  323. //>>excludeEnd("ctx");
  324. ][0]).__star((1000))
  325. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  326. ,$ctx1.sendIdx["*"]=2
  327. //>>excludeEnd("ctx");
  328. ][0]).__slash(t1)
  329. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  330. ,$ctx1.sendIdx["/"]=1
  331. //>>excludeEnd("ctx");
  332. ][0])._printString()
  333. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  334. ,$ctx1.sendIdx["printString"]=1
  335. //>>excludeEnd("ctx");
  336. ][0]).__comma(" bytecodes/sec; ")).__comma($recv($recv($recv(r).__star((1000))).__slash(t2))._printString())
  337. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  338. ,$ctx1.sendIdx[","]=2
  339. //>>excludeEnd("ctx");
  340. ][0]).__comma(" sends/sec")
  341. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  342. ,$ctx1.sendIdx[","]=1
  343. //>>excludeEnd("ctx");
  344. ][0];
  345. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  346. }, function($ctx1) {$ctx1.fill(self,"jstinyBenchmarks",{t1:t1,t2:t2,r:r,n1:n1,n2:n2})});
  347. //>>excludeEnd("ctx");
  348. }; }),
  349. $globals.Number);
  350. $core.addMethod(
  351. $core.method({
  352. selector: "tinyBenchmarks",
  353. protocol: "*Benchfib",
  354. //>>excludeStart("ide", pragmas.excludeIdeData);
  355. args: [],
  356. source: "tinyBenchmarks\x0a\x09\x22Report the results of running the two tiny Squeak benchmarks.\x0a\x09ar 9/10/1999: Adjusted to run at least 1 sec to get more stable results\x22\x0a\x09\x220 tinyBenchmarks\x22\x0a\x09\x22On a 292 MHz G3 Mac: 22727272 bytecodes/sec; 984169 sends/sec\x22\x0a\x09\x22On a 400 MHz PII/Win98: 18028169 bytecodes/sec; 1081272 sends/sec\x22\x0a\x09| t1 t2 r n1 n2 |\x0a\x09n1 := 1.\x0a\x09[t1 := Date millisecondsToRun: [n1 benchmark].\x0a\x09t1 < 1000] whileTrue:[n1 := n1 * 2]. \x22Note: #benchmark's runtime is about O(n)\x22\x0a\x0a\x09n2 := 16.\x0a\x09[t2 := Date millisecondsToRun: [r := n2 benchFib].\x0a\x09t2 < 1000] whileTrue:[n2 := n2 + 1].\x0a\x09\x22Note: #benchFib's runtime is about O(k^n),\x0a\x09\x09where k is the golden number = (1 + 5 sqrt) / 2 = 1.618....\x22\x0a\x0a\x09^ ((n1 * 500000 * 1000) / t1) printString, ' bytecodes/sec; ',\x0a\x09\x09((r * 1000) / t2) printString, ' sends/sec'",
  357. referencedClasses: ["Date"],
  358. //>>excludeEnd("ide");
  359. pragmas: [],
  360. messageSends: ["whileTrue:", "millisecondsToRun:", "benchmark", "<", "*", "benchFib", "+", ",", "printString", "/"]
  361. }, function ($methodClass){ return function (){
  362. var self=this,$self=this;
  363. var t1,t2,r,n1,n2;
  364. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  365. return $core.withContext(function($ctx1) {
  366. //>>excludeEnd("ctx");
  367. n1=(1);
  368. [$recv((function(){
  369. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  370. return $core.withContext(function($ctx2) {
  371. //>>excludeEnd("ctx");
  372. t1=[$recv($globals.Date)._millisecondsToRun_((function(){
  373. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  374. return $core.withContext(function($ctx3) {
  375. //>>excludeEnd("ctx");
  376. return $recv(n1)._benchmark();
  377. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  378. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,2)});
  379. //>>excludeEnd("ctx");
  380. }))
  381. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  382. ,$ctx2.sendIdx["millisecondsToRun:"]=1
  383. //>>excludeEnd("ctx");
  384. ][0];
  385. return [$recv(t1).__lt((1000))
  386. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  387. ,$ctx2.sendIdx["<"]=1
  388. //>>excludeEnd("ctx");
  389. ][0];
  390. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  391. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,1)});
  392. //>>excludeEnd("ctx");
  393. }))._whileTrue_((function(){
  394. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  395. return $core.withContext(function($ctx2) {
  396. //>>excludeEnd("ctx");
  397. n1=[$recv(n1).__star((2))
  398. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  399. ,$ctx2.sendIdx["*"]=1
  400. //>>excludeEnd("ctx");
  401. ][0];
  402. return n1;
  403. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  404. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,3)});
  405. //>>excludeEnd("ctx");
  406. }))
  407. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  408. ,$ctx1.sendIdx["whileTrue:"]=1
  409. //>>excludeEnd("ctx");
  410. ][0];
  411. n2=(16);
  412. $recv((function(){
  413. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  414. return $core.withContext(function($ctx2) {
  415. //>>excludeEnd("ctx");
  416. t2=$recv($globals.Date)._millisecondsToRun_((function(){
  417. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  418. return $core.withContext(function($ctx3) {
  419. //>>excludeEnd("ctx");
  420. r=$recv(n2)._benchFib();
  421. return r;
  422. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  423. }, function($ctx3) {$ctx3.fillBlock({},$ctx2,5)});
  424. //>>excludeEnd("ctx");
  425. }));
  426. return $recv(t2).__lt((1000));
  427. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  428. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,4)});
  429. //>>excludeEnd("ctx");
  430. }))._whileTrue_((function(){
  431. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  432. return $core.withContext(function($ctx2) {
  433. //>>excludeEnd("ctx");
  434. n2=$recv(n2).__plus((1));
  435. return n2;
  436. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  437. }, function($ctx2) {$ctx2.fillBlock({},$ctx1,6)});
  438. //>>excludeEnd("ctx");
  439. }));
  440. return [$recv([$recv($recv([$recv([$recv([$recv([$recv(n1).__star((500000))
  441. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  442. ,$ctx1.sendIdx["*"]=3
  443. //>>excludeEnd("ctx");
  444. ][0]).__star((1000))
  445. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  446. ,$ctx1.sendIdx["*"]=2
  447. //>>excludeEnd("ctx");
  448. ][0]).__slash(t1)
  449. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  450. ,$ctx1.sendIdx["/"]=1
  451. //>>excludeEnd("ctx");
  452. ][0])._printString()
  453. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  454. ,$ctx1.sendIdx["printString"]=1
  455. //>>excludeEnd("ctx");
  456. ][0]).__comma(" bytecodes/sec; ")).__comma($recv($recv($recv(r).__star((1000))).__slash(t2))._printString())
  457. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  458. ,$ctx1.sendIdx[","]=2
  459. //>>excludeEnd("ctx");
  460. ][0]).__comma(" sends/sec")
  461. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  462. ,$ctx1.sendIdx[","]=1
  463. //>>excludeEnd("ctx");
  464. ][0];
  465. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  466. }, function($ctx1) {$ctx1.fill(self,"tinyBenchmarks",{t1:t1,t2:t2,r:r,n1:n1,n2:n2})});
  467. //>>excludeEnd("ctx");
  468. }; }),
  469. $globals.Number);
  470. });