Benchfib.js 19 KB

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