صفحهٔ اصلی گشت‌و‌گذار راهنما
ثبت نام ورود
ajpo-amber
/
amber
برگرفته از amber/amber
2
0
انشعاب 0
پرونده‌ها
درخت: b342ae927c
شاخه‌ها تگ‌ها
amber
/
examples
/
nodejs
/
pystone
/
Pystone.js

Pystone.js 45 KB
تاريخچه خام

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519 
  1. smalltalk.addClass('PyStoneRecord', smalltalk.Object, ['ptrComp', 'discr', 'enumComp', 'intComp', 'stringComp'], 'Pystone');
    2. 

  2. smalltalk.PyStoneRecord.comment=unescape('Record%20class%20used%20in%20Pystone%20benchmark.')
    3. 

  3. smalltalk.addMethod(
    4. 

  4. '_discr',
    5. 

  5. smalltalk.method({
    6. 

  6. selector: 'discr',
    7. 

  7. category: 'accessing',
    8. 

  8. fn: function (){
    9. 

  9. var self=this;
    10. 

  10. return self['@discr'];
    11. 

  11. return self;},
    12. 

  12. source: unescape('discr%0A%09%5Ediscr'),
    13. 

  13. messageSends: [],
    14. 

  14. referencedClasses: []
    15. 

  15. }),
    16. 

  16. smalltalk.PyStoneRecord);
    17. 

  17. 

  18. smalltalk.addMethod(
    19. 

  19. '_discr_',
    20. 

  20. smalltalk.method({
    21. 

  21. selector: 'discr:',
    22. 

  22. category: 'accessing',
    23. 

  23. fn: function (p){
    24. 

  24. var self=this;
    25. 

  25. self['@discr']=p;
    26. 

  26. return self;},
    27. 

  27. source: unescape('discr%3A%20p%0A%09discr%20%3A%3D%20p'),
    28. 

  28. messageSends: [],
    29. 

  29. referencedClasses: []
    30. 

  30. }),
    31. 

  31. smalltalk.PyStoneRecord);
    32. 

  32. 

  33. smalltalk.addMethod(
    34. 

  34. '_enumComp',
    35. 

  35. smalltalk.method({
    36. 

  36. selector: 'enumComp',
    37. 

  37. category: 'accessing',
    38. 

  38. fn: function (){
    39. 

  39. var self=this;
    40. 

  40. return self['@enumComp'];
    41. 

  41. return self;},
    42. 

  42. source: unescape('enumComp%0A%09%5EenumComp'),
    43. 

  43. messageSends: [],
    44. 

  44. referencedClasses: []
    45. 

  45. }),
    46. 

  46. smalltalk.PyStoneRecord);
    47. 

  47. 

  48. smalltalk.addMethod(
    49. 

  49. '_enumComp_',
    50. 

  50. smalltalk.method({
    51. 

  51. selector: 'enumComp:',
    52. 

  52. category: 'accessing',
    53. 

  53. fn: function (p){
    54. 

  54. var self=this;
    55. 

  55. self['@enumComp']=p;
    56. 

  56. return self;},
    57. 

  57. source: unescape('enumComp%3A%20p%0A%09enumComp%20%3A%3D%20p'),
    58. 

  58. messageSends: [],
    59. 

  59. referencedClasses: []
    60. 

  60. }),
    61. 

  61. smalltalk.PyStoneRecord);
    62. 

  62. 

  63. smalltalk.addMethod(
    64. 

  64. '_intComp',
    65. 

  65. smalltalk.method({
    66. 

  66. selector: 'intComp',
    67. 

  67. category: 'accessing',
    68. 

  68. fn: function (){
    69. 

  69. var self=this;
    70. 

  70. return self['@intComp'];
    71. 

  71. return self;},
    72. 

  72. source: unescape('intComp%0A%09%5EintComp'),
    73. 

  73. messageSends: [],
    74. 

  74. referencedClasses: []
    75. 

  75. }),
    76. 

  76. smalltalk.PyStoneRecord);
    77. 

  77. 

  78. smalltalk.addMethod(
    79. 

  79. '_intComp_',
    80. 

  80. smalltalk.method({
    81. 

  81. selector: 'intComp:',
    82. 

  82. category: 'accessing',
    83. 

  83. fn: function (p){
    84. 

  84. var self=this;
    85. 

  85. self['@intComp']=p;
    86. 

  86. return self;},
    87. 

  87. source: unescape('intComp%3A%20p%0A%09intComp%20%3A%3D%20p'),
    88. 

  88. messageSends: [],
    89. 

  89. referencedClasses: []
    90. 

  90. }),
    91. 

  91. smalltalk.PyStoneRecord);
    92. 

  92. 

  93. smalltalk.addMethod(
    94. 

  94. '_ptrComp',
    95. 

  95. smalltalk.method({
    96. 

  96. selector: 'ptrComp',
    97. 

  97. category: 'accessing',
    98. 

  98. fn: function (){
    99. 

  99. var self=this;
    100. 

  100. return self['@ptrComp'];
    101. 

  101. return self;},
    102. 

  102. source: unescape('ptrComp%0A%09%5EptrComp'),
    103. 

  103. messageSends: [],
    104. 

  104. referencedClasses: []
    105. 

  105. }),
    106. 

  106. smalltalk.PyStoneRecord);
    107. 

  107. 

  108. smalltalk.addMethod(
    109. 

  109. '_ptrComp_',
    110. 

  110. smalltalk.method({
    111. 

  111. selector: 'ptrComp:',
    112. 

  112. category: 'accessing',
    113. 

  113. fn: function (p){
    114. 

  114. var self=this;
    115. 

  115. self['@ptrComp']=p;
    116. 

  116. return self;},
    117. 

  117. source: unescape('ptrComp%3A%20p%0A%09ptrComp%20%3A%3D%20p'),
    118. 

  118. messageSends: [],
    119. 

  119. referencedClasses: []
    120. 

  120. }),
    121. 

  121. smalltalk.PyStoneRecord);
    122. 

  122. 

  123. smalltalk.addMethod(
    124. 

  124. '_stringComp',
    125. 

  125. smalltalk.method({
    126. 

  126. selector: 'stringComp',
    127. 

  127. category: 'accessing',
    128. 

  128. fn: function (){
    129. 

  129. var self=this;
    130. 

  130. return self['@stringComp'];
    131. 

  131. return self;},
    132. 

  132. source: unescape('stringComp%0A%09%5EstringComp'),
    133. 

  133. messageSends: [],
    134. 

  134. referencedClasses: []
    135. 

  135. }),
    136. 

  136. smalltalk.PyStoneRecord);
    137. 

  137. 

  138. smalltalk.addMethod(
    139. 

  139. '_stringComp_',
    140. 

  140. smalltalk.method({
    141. 

  141. selector: 'stringComp:',
    142. 

  142. category: 'accessing',
    143. 

  143. fn: function (p){
    144. 

  144. var self=this;
    145. 

  145. self['@stringComp']=p;
    146. 

  146. return self;},
    147. 

  147. source: unescape('stringComp%3A%20p%0A%09stringComp%20%3A%3D%20p'),
    148. 

  148. messageSends: [],
    149. 

  149. referencedClasses: []
    150. 

  150. }),
    151. 

  151. smalltalk.PyStoneRecord);
    152. 

  152. 

  153. smalltalk.addMethod(
    154. 

  154. '_copy',
    155. 

  155. smalltalk.method({
    156. 

  156. selector: 'copy',
    157. 

  157. category: 'copying',
    158. 

  158. fn: function (){
    159. 

  159. var self=this;
    160. 

  160. return smalltalk.send((smalltalk.PyStoneRecord || PyStoneRecord), "_ptrComp_discr_enumComp_intComp_stringComp_", [self['@ptrComp'], self['@discr'], self['@enumComp'], self['@intComp'], self['@stringComp']]);
    161. 

  161. return self;},
    162. 

  162. source: unescape('copy%0A%09%5EPyStoneRecord%20ptrComp%3A%20ptrComp%20discr%3A%20discr%20enumComp%3A%20enumComp%20intComp%3A%20intComp%20stringComp%3A%20stringComp'),
    163. 

  163. messageSends: ["ptrComp:discr:enumComp:intComp:stringComp:"],
    164. 

  164. referencedClasses: [smalltalk.PyStoneRecord]
    165. 

  165. }),
    166. 

  166. smalltalk.PyStoneRecord);
    167. 

  167. 

  168. smalltalk.addMethod(
    169. 

  169. '_ptrComp_discr_enumComp_intComp_stringComp_',
    170. 

  170. smalltalk.method({
    171. 

  171. selector: 'ptrComp:discr:enumComp:intComp:stringComp:',
    172. 

  172. category: 'initialize-release',
    173. 

  173. fn: function (p, d, e, i, s){
    174. 

  174. var self=this;
    175. 

  175. self['@ptrComp']=p;
    176. 

  176. self['@discr']=d;
    177. 

  177. self['@enumComp']=e;
    178. 

  178. self['@intComp']=i;
    179. 

  179. self['@stringComp']=s;
    180. 

  180. return self;},
    181. 

  181. source: unescape('ptrComp%3A%20p%20discr%3A%20d%20enumComp%3A%20e%20intComp%3A%20i%20stringComp%3A%20s%0A%0A%09ptrComp%20%3A%3D%20p.%0A%09discr%20%3A%3D%20d.%0A%09enumComp%20%3A%3D%20e.%0A%09intComp%20%3A%3D%20i.%0A%09stringComp%20%3A%3D%20s'),
    182. 

  182. messageSends: [],
    183. 

  183. referencedClasses: []
    184. 

  184. }),
    185. 

  185. smalltalk.PyStoneRecord);
    186. 

  186. 

  187. 

  188. smalltalk.addMethod(
    189. 

  189. '_new',
    190. 

  190. smalltalk.method({
    191. 

  191. selector: 'new',
    192. 

  192. category: 'instance-creation',
    193. 

  193. fn: function (){
    194. 

  194. var self=this;
    195. 

  195. return smalltalk.send(self, "_ptrComp_discr_enumComp_intComp_stringComp_", [nil, (0), (0), (0), (0)]);
    196. 

  196. return self;},
    197. 

  197. source: unescape('new%0A%0A%09%5Eself%20ptrComp%3A%20nil%20discr%3A%200%20enumComp%3A%200%20intComp%3A%200%20stringComp%3A%200'),
    198. 

  198. messageSends: ["ptrComp:discr:enumComp:intComp:stringComp:"],
    199. 

  199. referencedClasses: []
    200. 

  200. }),
    201. 

  201. smalltalk.PyStoneRecord.klass);
    202. 

  202. 

  203. smalltalk.addMethod(
    204. 

  204. '_ptrComp_discr_enumComp_intComp_stringComp_',
    205. 

  205. smalltalk.method({
    206. 

  206. selector: 'ptrComp:discr:enumComp:intComp:stringComp:',
    207. 

  207. category: 'instance-creation',
    208. 

  208. fn: function (p, d, e, i, s){
    209. 

  209. var self=this;
    210. 

  210. return smalltalk.send(smalltalk.send(self, "_new", [], smalltalk.Object.klass), "_ptrComp_discr_enumComp_intComp_stringComp_", [p, d, e, i, s]);
    211. 

  211. return self;},
    212. 

  212. source: unescape('ptrComp%3A%20p%20discr%3A%20d%20enumComp%3A%20e%20intComp%3A%20i%20stringComp%3A%20s%0A%0A%09%5Esuper%20new%20ptrComp%3A%20p%20discr%3A%20d%20enumComp%3A%20e%20intComp%3A%20i%20stringComp%3A%20s'),
    213. 

  213. messageSends: ["ptrComp:discr:enumComp:intComp:stringComp:", "new"],
    214. 

  214. referencedClasses: []
    215. 

  215. }),
    216. 

  216. smalltalk.PyStoneRecord.klass);
    217. 

  217. 

  218. 

  219. smalltalk.addClass('Pystone', smalltalk.Object, ['nulltime', 'ptrGlbNext', 'ptrGlb', 'ident1', 'ident3', 'ident2', 'ident4', 'ident5', 'ident6', 'intGlob', 'boolGlob', 'char1Glob', 'char2Glob', 'array1Glob', 'array2Glob', 'func3', 'func2', 'func1'], 'Pystone');
    220. 

  220. smalltalk.Pystone.comment=unescape('This%20is%20a%20straight%20translation%20of%20pystone%201.1%20from%20Python%20to%20Squeak.%20Procedures%20have%20been%20mapped%20to%20instance%20side%20methods%2C%20functions%20have%20been%20mapped%20to%20blocks.%20Open%20a%20transcript%20and%20run%3A%0A%0APystone%20run')
    221. 

  221. smalltalk.addMethod(
    222. 

  222. '_defineFunctions',
    223. 

  223. smalltalk.method({
    224. 

  224. selector: 'defineFunctions',
    225. 

  225. category: 'as yet unclassified',
    226. 

  226. fn: function (){
    227. 

  227. var self=this;
    228. 

  228. self['@func1']=(function(charPar1, charPar2){var charLoc1=nil;
    229. 

  229. var charLoc2=nil;
    230. 

  230. charLoc1=charPar1;charLoc2=charLoc1;return (($receiver = smalltalk.send(charLoc2, "__eq", [charPar2])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return self['@ident2'];})() : (function(){return self['@ident1'];})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return self['@ident2'];}), (function(){return self['@ident1'];})]);});
    231. 

  231. self['@func2']=(function(strParI1, strParI2){var intLoc=nil;
    232. 

  232. var charLoc=nil;
    233. 

  233. intLoc=(1);(function(){while((function(){return (($receiver = intLoc).klass === smalltalk.Number) ? $receiver <=(1) : smalltalk.send($receiver, "__lt_eq", [(1)]);})()) {(function(){return (($receiver = smalltalk.send(smalltalk.send(self['@func1'], "_value_value_", [smalltalk.send(strParI1, "_at_", [intLoc]), smalltalk.send(strParI1, "_at_", [(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])])]), "__eq", [self['@ident1']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){charLoc="A";return intLoc=(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){charLoc="A";return intLoc=(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]);})]);})()}})();(($receiver = smalltalk.send((($receiver = charLoc).klass === smalltalk.Number) ? $receiver >="W" : smalltalk.send($receiver, "__gt_eq", ["W"]), "_and_", [(function(){return (($receiver = charLoc).klass === smalltalk.Number) ? $receiver <="Z" : smalltalk.send($receiver, "__lt_eq", ["Z"]);})])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return intLoc=(7);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return intLoc=(7);})]);return (($receiver = smalltalk.send(charLoc, "__eq", ["X"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return true;})() : (function(){return (($receiver = (($receiver = strParI1).klass === smalltalk.Number) ? $receiver >strParI2 : smalltalk.send($receiver, "__gt", [strParI2])).klass === smalltalk.Boolean) ? ($receiver ? (function(){intLoc=(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(7) : smalltalk.send($receiver, "__plus", [(7)]);return true;})() : (function(){return false;})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){intLoc=(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(7) : smalltalk.send($receiver, "__plus", [(7)]);return true;}), (function(){return false;})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return true;}), (function(){return (($receiver = (($receiver = strParI1).klass === smalltalk.Number) ? $receiver >strParI2 : smalltalk.send($receiver, "__gt", [strParI2])).klass === smalltalk.Boolean) ? ($receiver ? (function(){intLoc=(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(7) : smalltalk.send($receiver, "__plus", [(7)]);return true;})() : (function(){return false;})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){intLoc=(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(7) : smalltalk.send($receiver, "__plus", [(7)]);return true;}), (function(){return false;})]);})]);});
    234. 

  234. self['@func3']=(function(enumParIn){var enumLoc=nil;
    235. 

  235. enumLoc=enumParIn;return smalltalk.send(enumLoc, "__eq", [self['@ident3']]);});
    236. 

  236. return self;},
    237. 

  237. source: unescape('defineFunctions%0A%09%22Functions%20have%20been%20mapped%20to%20blocks%2C%20since%20that%0A%09would%20be%20natural.%22%0A%09%0A%09func1%20%3A%3D%20%5B%3AcharPar1%20%3AcharPar2%20%7C%0A%09%09%7C%20charLoc1%20charLoc2%20%7C%0A%09%09charLoc1%20%3A%3D%20charPar1.%0A%09%09charLoc2%20%3A%3D%20charLoc1.%0A%09%09%28charLoc2%20%3D%20charPar2%29%20ifTrue%3A%20%5Bident2%5D%20ifFalse%3A%20%5Bident1%5D%5D.%0A%0A%09func2%20%3A%3D%20%5B%3AstrParI1%20%3AstrParI2%20%7C%0A%09%09%7C%20intLoc%20charLoc%20%7C%0A%09%09intLoc%20%3A%3D%201.%0A%09%09%5BintLoc%20%3C%3D%201%5D%20whileTrue%3A%20%5B%0A%09%09%09%28%28func1%20value%3A%20%28strParI1%20at%3A%20intLoc%29%20value%3A%20%28strParI1%20at%3A%20intLoc%20+%201%29%29%20%3D%20ident1%29%0A%09%09%09%09ifTrue%3A%20%5B%0A%09%09%09%09%09charLoc%20%3A%3D%20%27A%27.%0A%09%09%09%09%09intLoc%20%3A%3D%20intLoc%20+%201%5D%5D.%0A%09%09%28charLoc%20%3E%3D%20%27W%27%20and%3A%20%5BcharLoc%20%3C%3D%20%27Z%27%5D%29%20ifTrue%3A%20%5B%0A%09%09%09intLoc%20%3A%3D%207%5D.%0A%09%09%28charLoc%20%3D%20%27X%27%29%20ifTrue%3A%20%5Btrue%5D%20ifFalse%3A%20%5B%0A%09%09%09%28strParI1%20%3E%20strParI2%29%20ifTrue%3A%20%5B%0A%09%09%09%09intLoc%20%3A%3D%20intLoc%20+%207.%0A%09%09%09%09true%5D%0A%09%09%09ifFalse%3A%20%5B%0A%09%09%09%09false%5D%5D%5D.%0A%09%0A%09func3%20%3A%3D%20%5B%3AenumParIn%20%7C%0A%09%09%7C%20enumLoc%20%7C%0A%09%09enumLoc%20%3A%3D%20enumParIn.%0A%09%09enumLoc%20%3D%20ident3%5D'),
    238. 

  238. messageSends: ["ifTrue:ifFalse:", unescape("%3D"), "whileTrue:", unescape("%3C%3D"), "ifTrue:", "value:value:", "at:", unescape("+"), "and:", unescape("%3E%3D"), unescape("%3E")],
    239. 

  239. referencedClasses: []
    240. 

  240. }),
    241. 

  241. smalltalk.Pystone);
    242. 

  242. 

  243. smalltalk.addMethod(
    244. 

  244. '_main_',
    245. 

  245. smalltalk.method({
    246. 

  246. selector: 'main:',
    247. 

  247. category: 'as yet unclassified',
    248. 

  248. fn: function (loops){
    249. 

  249. var self=this;
    250. 

  250. self['@ident1']=(1);
    251. 

  251. self['@ident2']=(2);
    252. 

  252. self['@ident3']=(3);
    253. 

  253. self['@ident4']=(4);
    254. 

  254. self['@ident5']=(5);
    255. 

  255. self['@ident6']=(6);
    256. 

  256. self['@intGlob']=(0);
    257. 

  257. self['@boolGlob']=false;
    258. 

  258. self['@char1Glob']=smalltalk.send((smalltalk.String || String), "_value_", [(0)]);
    259. 

  259. self['@char2Glob']=smalltalk.send((smalltalk.String || String), "_value_", [(0)]);
    260. 

  260. self['@array1Glob']=smalltalk.send((smalltalk.Array || Array), "_new", []);
    261. 

  261. smalltalk.send((51), "_timesRepeat_", [(function(){return smalltalk.send(self['@array1Glob'], "_add_", [(0)]);})]);
    262. 

  262. self['@array2Glob']=smalltalk.send(smalltalk.send(smalltalk.send((1), "_to_", [(51)]), "_collect_", [(function(i){return smalltalk.send(self['@array1Glob'], "_copy", []);})]), "_asArray", []);
    263. 

  263. smalltalk.send(self, "_defineFunctions", []);
    264. 

  264. smalltalk.send(self, "_pystones_block_", [loops, (function(benchtime, stones){smalltalk.send(self, "_log_", [smalltalk.send(smalltalk.send(smalltalk.send(unescape("Pystone%281.1%29%20time%20for%20"), "__comma", [smalltalk.send(loops, "_asString", [])]), "__comma", [unescape("%20passes%20%3D%20")]), "__comma", [smalltalk.send(benchtime, "_asString", [])])]);return smalltalk.send(self, "_log_", [smalltalk.send(smalltalk.send("This machine benchmarks at ", "__comma", [smalltalk.send((($receiver = smalltalk.send((($receiver = stones).klass === smalltalk.Number) ? $receiver /(0.1) : smalltalk.send($receiver, "__slash", [(0.1)]), "_rounded", [])).klass === smalltalk.Number) ? $receiver *(0.1) : smalltalk.send($receiver, "__star", [(0.1)]), "_asString", [])]), "__comma", [unescape("%20pystones/second")])]);})]);
    265. 

  265. return self;},
    266. 

  266. source: unescape('main%3A%20loops%0A%09%22Adaption%20of%20pystone.py%20version%201.9%20from%20Python.%22%0A%0A%09ident1%20%3A%3D%201.%20ident2%20%3A%3D%202.%20ident3%20%3A%3D%203.%20ident4%20%3A%3D%204.%20ident5%20%3A%3D%205.%20ident6%20%3A%3D%206.%0A%09intGlob%20%3A%3D%200.%0A%09boolGlob%20%3A%3D%20false.%0A%09char1Glob%20%3A%3D%20String%20value%3A%200.%0A%09char2Glob%20%3A%3D%20String%20value%3A%200.%0A%09array1Glob%20%3A%3D%20Array%20new.%0A%20%20%20%20%20%20%20%2051%20timesRepeat%3A%20%5B%20array1Glob%20add%3A%200%5D.%0A%09array2Glob%20%3A%3D%20%28%281%20to%3A%2051%29%20collect%3A%20%5B%3Ai%20%7C%20array1Glob%20copy%5D%29%20asArray.%0A%0A%09self%20defineFunctions.%0A%0A%09self%20pystones%3A%20loops%20block%3A%20%5B%3Abenchtime%20%3Astones%20%7C%0A%09%09self%20log%3A%20%27Pystone%281.1%29%20time%20for%20%27%2C%20loops%20asString%2C%20%27%20passes%20%3D%20%27%2C%20benchtime%20asString.%0A%09%09self%20log%3A%20%27This%20machine%20benchmarks%20at%20%27%2C%0A%09%09%09%28%28stones%20/%200.1%29%20rounded%20*%200.1%29%20asString%2C%20%27%20pystones/second%27%5D'),
    267. 

  267. messageSends: ["value:", "new", "timesRepeat:", "add:", "asArray", "collect:", "to:", "copy", "defineFunctions", "pystones:block:", "log:", unescape("%2C"), "asString", unescape("*"), "rounded", unescape("/")],
    268. 

  268. referencedClasses: [smalltalk.String,smalltalk.Array]
    269. 

  269. }),
    270. 

  270. smalltalk.Pystone);
    271. 

  271. 

  272. smalltalk.addMethod(
    273. 

  273. '_log_',
    274. 

  274. smalltalk.method({
    275. 

  275. selector: 'log:',
    276. 

  276. category: 'as yet unclassified',
    277. 

  277. fn: function (aString){
    278. 

  278. var self=this;
    279. 

  279. (($receiver = smalltalk.send((typeof smalltalk == 'undefined' ? nil : smalltalk), "_at_", ["Transcript"])) == nil || $receiver == undefined) ? (function(){return smalltalk.send((typeof console == 'undefined' ? nil : console), "_log_", [aString]);})() : (function(){return (function($rec){smalltalk.send($rec, "_show_", [aString]);return smalltalk.send($rec, "_cr", []);})((smalltalk.Transcript || Transcript));})();
    280. 

  280. return self;},
    281. 

  281. source: unescape('log%3A%20aString%0A%09%28smalltalk%20at%3A%20%23Transcript%29%0A%09%09ifNotNil%3A%20%5B%0A%09%09%09Transcript%20show%3A%20aString%3Bcr%5D%0A%09%09ifNil%3A%20%5B%0A%09%09%09console%20log%3A%20aString%5D'),
    282. 

  282. messageSends: ["ifNotNil:ifNil:", "at:", "log:", "show:", "cr"],
    283. 

  283. referencedClasses: []
    284. 

  284. }),
    285. 

  285. smalltalk.Pystone);
    286. 

  286. 

  287. smalltalk.addMethod(
    288. 

  288. '_proc0_block_',
    289. 

  289. smalltalk.method({
    290. 

  290. selector: 'proc0:block:',
    291. 

  291. category: 'as yet unclassified',
    292. 

  292. fn: function (loops, aBlock){
    293. 

  293. var self=this;
    294. 

  294. var string1Loc=nil;
    295. 

  295. var starttime=nil;
    296. 

  296. var intLoc1=nil;
    297. 

  297. var intLoc2=nil;
    298. 

  298. var string2Loc=nil;
    299. 

  299. var enumLoc=nil;
    300. 

  300. var intLoc3=nil;
    301. 

  301. var charIndex=nil;
    302. 

  302. var benchtime=nil;
    303. 

  303. smalltalk.send(loops, "_timesRepeat_", [(function(){return nil;})]);
    304. 

  304. benchtime=smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){self['@ptrGlbNext']=smalltalk.send((smalltalk.PyStoneRecord || PyStoneRecord), "_new", []);self['@ptrGlb']=smalltalk.send((smalltalk.PyStoneRecord || PyStoneRecord), "_new", []);smalltalk.send(self['@ptrGlb'], "_ptrComp_", [self['@ptrGlbNext']]);smalltalk.send(self['@ptrGlb'], "_discr_", [self['@ident1']]);smalltalk.send(self['@ptrGlb'], "_enumComp_", [self['@ident3']]);smalltalk.send(self['@ptrGlb'], "_intComp_", [(40)]);smalltalk.send(self['@ptrGlb'], "_stringComp_", [unescape("DHRYSTONE%20PROGRAM%2C%20SOME%20STRING")]);string1Loc=unescape("DHRYSTONE%20PROGRAM%2C%201%27ST%20STRING");smalltalk.send(smalltalk.send(self['@array2Glob'], "_at_", [(8)]), "_at_put_", [(7), (10)]);return smalltalk.send(loops, "_timesRepeat_", [(function(){(function($rec){smalltalk.send($rec, "_proc5", []);return smalltalk.send($rec, "_proc4", []);})(self);intLoc1=(2);intLoc2=(3);string2Loc=unescape("DHRYSTONE%20PROGRAM%2C%202%27ND%20STRING");enumLoc=self['@ident2'];self['@boolGlob']=smalltalk.send(smalltalk.send(self['@func2'], "_value_value_", [string1Loc, string2Loc]), "_not", []);(function(){while((function(){return (($receiver = intLoc1).klass === smalltalk.Number) ? $receiver <intLoc2 : smalltalk.send($receiver, "__lt", [intLoc2]);})()) {(function(){intLoc3=(($receiver = (5) * intLoc1).klass === smalltalk.Number) ? $receiver -intLoc2 : smalltalk.send($receiver, "__minus", [intLoc2]);intLoc3=smalltalk.send(self, "_proc7_with_", [intLoc1, intLoc2]);return intLoc1=(($receiver = intLoc1).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]);})()}})();smalltalk.send(self, "_proc8_with_with_with_", [self['@array1Glob'], self['@array2Glob'], intLoc1, intLoc3]);self['@ptrGlb']=smalltalk.send(self, "_proc1_", [self['@ptrGlb']]);charIndex="A";(function(){while((function(){return (($receiver = charIndex).klass === smalltalk.Number) ? $receiver <=self['@char2Glob'] : smalltalk.send($receiver, "__lt_eq", [self['@char2Glob']]);})()) {(function(){(($receiver = smalltalk.send(enumLoc, "__eq", [smalltalk.send(self['@func1'], "_value_value_", [charIndex, "C"])])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumLoc=smalltalk.send(self, "_proc6_", [self['@ident1']]);})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumLoc=smalltalk.send(self, "_proc6_", [self['@ident1']]);})]);return charIndex=smalltalk.send((smalltalk.String || String), "_value_", [(($receiver = smalltalk.send(charIndex, "_asciiValue", [])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])]);})()}})();intLoc3=(($receiver = intLoc2).klass === smalltalk.Number) ? $receiver *intLoc1 : smalltalk.send($receiver, "__star", [intLoc1]);intLoc2=(($receiver = intLoc3).klass === smalltalk.Number) ? $receiver /intLoc1 : smalltalk.send($receiver, "__slash", [intLoc1]);intLoc2=(($receiver = (7) * (($receiver = intLoc3).klass === smalltalk.Number) ? $receiver -intLoc2 : smalltalk.send($receiver, "__minus", [intLoc2])).klass === smalltalk.Number) ? $receiver -intLoc1 : smalltalk.send($receiver, "__minus", [intLoc1]);return intLoc1=smalltalk.send(self, "_proc2_", [intLoc1]);})]);})]);
    305. 

  305. return smalltalk.send(aBlock, "_value_value_", [(($receiver = benchtime).klass === smalltalk.Number) ? $receiver /(1000) : smalltalk.send($receiver, "__slash", [(1000)]), (($receiver = (($receiver = loops).klass === smalltalk.Number) ? $receiver /benchtime : smalltalk.send($receiver, "__slash", [benchtime])).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)])]);
    306. 

  306. return self;},
    307. 

  307. source: unescape('proc0%3A%20loops%20block%3A%20aBlock%0A%09%7C%20string1Loc%20starttime%20intLoc1%20intLoc2%20string2Loc%20enumLoc%20intLoc3%20charIndex%20benchtime%20%7C%0A%0A%09loops%20timesRepeat%3A%20%5B%5D.%0A%0A%09benchtime%20%3A%3D%20Date%20millisecondsToRun%3A%20%5B%0A%09ptrGlbNext%20%3A%3D%20PyStoneRecord%20new.%0A%09ptrGlb%20%3A%3D%20PyStoneRecord%20new.%0A%09ptrGlb%20ptrComp%3A%20ptrGlbNext.%0A%09ptrGlb%20discr%3A%20ident1.%0A%09ptrGlb%20enumComp%3A%20ident3.%0A%09ptrGlb%20intComp%3A%2040.%0A%09ptrGlb%20stringComp%3A%20%27DHRYSTONE%20PROGRAM%2C%20SOME%20STRING%27.%0A%09string1Loc%20%3A%3D%20%27DHRYSTONE%20PROGRAM%2C%201%27%27ST%20STRING%27.%0A%09%0A%09%28array2Glob%20at%3A%208%29%20at%3A%207%20put%3A%2010.%0A%09%221%20to%3A%20loops%20-%201%20do%3A%20%5B%3Ai%20%7C%20%20%20%20%20%20%20Changed%20this%20to%20use%20timesRepeat%3A%20since%20i%20is%20not%20used%20at%20all%20in%20the%20loop%22%0A%09loops%20timesRepeat%3A%20%5B%0A%09%09self%20proc5%3B%20proc4.%0A%09%09intLoc1%20%3A%3D%202.%0A%09%09intLoc2%20%3A%3D%203.%0A%09%09string2Loc%20%3A%3D%20%27DHRYSTONE%20PROGRAM%2C%202%27%27ND%20STRING%27.%0A%09%09enumLoc%20%3A%3D%20ident2.%0A%09%09boolGlob%20%3A%3D%20%28func2%20value%3A%20string1Loc%20value%3A%20string2Loc%29%20not.%0A%09%09%5BintLoc1%20%3C%20intLoc2%5D%20whileTrue%3A%20%5B%0A%09%09%09intLoc3%20%3A%3D%205%20*%20intLoc1%20-%20intLoc2.%0A%09%09%09intLoc3%20%3A%3D%20self%20proc7%3A%20intLoc1%20with%3A%20intLoc2.%0A%09%09%09intLoc1%20%3A%3D%20intLoc1%20+%201%5D.%0A%09%20%09self%20proc8%3Aarray1Glob%20with%3A%20array2Glob%20with%3A%20intLoc1%20with%3A%20intLoc3.%0A%09%09ptrGlb%20%3A%3D%20self%20proc1%3A%20ptrGlb.%0A%09%09charIndex%20%3A%3D%20%27A%27.%0A%09%09%5BcharIndex%20%3C%3D%20char2Glob%5D%20whileTrue%3A%20%5B%0A%09%09%09%28enumLoc%20%3D%20%28func1%20value%3A%20charIndex%20value%3A%20%27C%27%29%29%0A%09%09%09%09%09ifTrue%3A%20%5BenumLoc%20%3A%3D%20self%20proc6%3A%20ident1%5D.%0A%09%09%09charIndex%20%3A%3D%20String%20value%3A%20%28charIndex%20asciiValue%20+%201%29%5D.%0A%09%09intLoc3%20%3A%3D%20intLoc2%20*%20intLoc1.%0A%09%09intLoc2%20%3A%3D%20intLoc3%20/%20intLoc1.%0A%09%09intLoc2%20%3A%3D%207%20*%20%28intLoc3%20-%20intLoc2%29%20-%20intLoc1.%0A%09%09intLoc1%20%3A%3D%20self%20proc2%3A%20intLoc1%5D%5D.%0A%20%20%20%20%5E%20aBlock%20value%3A%20%28benchtime%20/%201000%29%20value%3A%20%28loops%20/%20benchtime%29%20*%201000'),
    308. 

  308. messageSends: ["timesRepeat:", "millisecondsToRun:", "new", "ptrComp:", "discr:", "enumComp:", "intComp:", "stringComp:", "at:put:", "at:", "proc5", "proc4", "not", "value:value:", "whileTrue:", unescape("%3C"), unescape("-"), unescape("*"), "proc7:with:", unescape("+"), "proc8:with:with:with:", "proc1:", unescape("%3C%3D"), "ifTrue:", unescape("%3D"), "proc6:", "value:", "asciiValue", unescape("/"), "proc2:"],
    309. 

  309. referencedClasses: [smalltalk.Date,smalltalk.PyStoneRecord,smalltalk.String]
    310. 

  310. }),
    311. 

  311. smalltalk.Pystone);
    312. 

  312. 

  313. smalltalk.addMethod(
    314. 

  314. '_proc1_',
    315. 

  315. smalltalk.method({
    316. 

  316. selector: 'proc1:',
    317. 

  317. category: 'as yet unclassified',
    318. 

  318. fn: function (ptrParIn){
    319. 

  319. var self=this;
    320. 

  320. var nextRecord=nil;
    321. 

  321. var tmp=nil;
    322. 

  322. tmp=ptrParIn;
    323. 

  323. nextRecord=smalltalk.send(self['@ptrGlb'], "_copy", []);
    324. 

  324. smalltalk.send(ptrParIn, "_ptrComp_", [nextRecord]);
    325. 

  325. smalltalk.send(ptrParIn, "_intComp_", [(5)]);
    326. 

  326. smalltalk.send(nextRecord, "_intComp_", [smalltalk.send(ptrParIn, "_intComp", [])]);
    327. 

  327. smalltalk.send(nextRecord, "_ptrComp_", [smalltalk.send(ptrParIn, "_ptrComp", [])]);
    328. 

  328. smalltalk.send(nextRecord, "_ptrComp_", [smalltalk.send(self, "_proc3_", [smalltalk.send(nextRecord, "_ptrComp", [])])]);
    329. 

  329. (($receiver = smalltalk.send(smalltalk.send(nextRecord, "_discr", []), "__eq", [self['@ident1']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){smalltalk.send(nextRecord, "_intComp_", [(6)]);smalltalk.send(nextRecord, "_enumComp_", [smalltalk.send(self, "_proc6_", [smalltalk.send(ptrParIn, "_enumComp", [])])]);smalltalk.send(nextRecord, "_ptrComp_", [smalltalk.send(self['@ptrGlb'], "_ptrComp", [])]);return smalltalk.send(nextRecord, "_intComp_", [smalltalk.send(self, "_proc7_with_", [smalltalk.send(nextRecord, "_intComp", []), (10)])]);})() : (function(){return tmp=smalltalk.send(nextRecord, "_copy", []);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){smalltalk.send(nextRecord, "_intComp_", [(6)]);smalltalk.send(nextRecord, "_enumComp_", [smalltalk.send(self, "_proc6_", [smalltalk.send(ptrParIn, "_enumComp", [])])]);smalltalk.send(nextRecord, "_ptrComp_", [smalltalk.send(self['@ptrGlb'], "_ptrComp", [])]);return smalltalk.send(nextRecord, "_intComp_", [smalltalk.send(self, "_proc7_with_", [smalltalk.send(nextRecord, "_intComp", []), (10)])]);}), (function(){return tmp=smalltalk.send(nextRecord, "_copy", []);})]);
    330. 

  330. smalltalk.send(nextRecord, "_ptrComp_", [nil]);
    331. 

  331. return tmp;
    332. 

  332. return self;},
    333. 

  333. source: unescape('proc1%3A%20ptrParIn%0A%09%7C%20nextRecord%20tmp%20%7C%0A%09tmp%20%3A%3D%20ptrParIn.%0A%09nextRecord%20%3A%3D%20ptrGlb%20copy.%0A%09ptrParIn%20ptrComp%3A%20nextRecord.%0A%09ptrParIn%20intComp%3A%205.%0A%09nextRecord%20intComp%3A%20ptrParIn%20intComp.%0A%09nextRecord%20ptrComp%3A%20ptrParIn%20ptrComp.%0A%09nextRecord%20ptrComp%3A%20%28self%20proc3%3A%20nextRecord%20ptrComp%29.%0A%09%28nextRecord%20discr%20%3D%20ident1%29%20ifTrue%3A%20%5B%0A%09%09nextRecord%20intComp%3A%206.%0A%09%09nextRecord%20enumComp%3A%20%28self%20proc6%3A%20ptrParIn%20enumComp%29.%0A%09%09nextRecord%20ptrComp%3A%20ptrGlb%20ptrComp.%0A%09%09nextRecord%20intComp%3A%20%28self%20proc7%3A%20nextRecord%20intComp%20with%3A%2010%29%20%5D%0A%09ifFalse%3A%20%5B%0A%09%09tmp%20%3A%3D%20nextRecord%20copy%5D.%0A%09nextRecord%20ptrComp%3A%20nil.%0A%09%5Etmp'),
    334. 

  334. messageSends: ["copy", "ptrComp:", "intComp:", "intComp", "ptrComp", "proc3:", "ifTrue:ifFalse:", unescape("%3D"), "discr", "enumComp:", "proc6:", "enumComp", "proc7:with:"],
    335. 

  335. referencedClasses: []
    336. 

  336. }),
    337. 

  337. smalltalk.Pystone);
    338. 

  338. 

  339. smalltalk.addMethod(
    340. 

  340. '_proc2_',
    341. 

  341. smalltalk.method({
    342. 

  342. selector: 'proc2:',
    343. 

  343. category: 'as yet unclassified',
    344. 

  344. fn: function (intParIO){
    345. 

  345. var self=this;
    346. 

  346. try{var tmp=nil;
    347. 

  347. var intLoc=nil;
    348. 

  348. var enumLoc=nil;
    349. 

  349. tmp=intParIO;
    350. 

  350. intLoc=(($receiver = intParIO).klass === smalltalk.Number) ? $receiver +(10) : smalltalk.send($receiver, "__plus", [(10)]);
    351. 

  351. (function(){while((function(){return true;})()) {(function(){(($receiver = smalltalk.send(self['@char1Glob'], "__eq", ["A"])).klass === smalltalk.Boolean) ? ($receiver ? (function(){intLoc=(($receiver = intLoc).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)]);tmp=(($receiver = intLoc).klass === smalltalk.Number) ? $receiver -self['@intGlob'] : smalltalk.send($receiver, "__minus", [self['@intGlob']]);return enumLoc=self['@ident1'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){intLoc=(($receiver = intLoc).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)]);tmp=(($receiver = intLoc).klass === smalltalk.Number) ? $receiver -self['@intGlob'] : smalltalk.send($receiver, "__minus", [self['@intGlob']]);return enumLoc=self['@ident1'];})]);return (($receiver = smalltalk.send(enumLoc, "__eq", [self['@ident1']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (function(){throw({name: 'stReturn', selector: '_proc2_', fn: function(){return tmp}})})();})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return (function(){throw({name: 'stReturn', selector: '_proc2_', fn: function(){return tmp}})})();})]);})()}})();
    352. 

  352. return self;
    353. 

  353. } catch(e) {if(e.name === 'stReturn' && e.selector === '_proc2_'){return e.fn()} throw(e)}},
    354. 

  354. source: unescape('proc2%3A%20intParIO%0A%09%7C%20tmp%20intLoc%20enumLoc%20%7C%0A%09tmp%20%3A%3D%20intParIO.%0A%09intLoc%20%3A%3D%20intParIO%20+%2010.%0A%09%5Btrue%5D%20whileTrue%3A%20%5B%0A%09%09%28char1Glob%20%3D%20%27A%27%29%20ifTrue%3A%20%5B%0A%09%09%09intLoc%20%3A%3D%20intLoc%20-%201.%0A%09%09%09tmp%20%3A%3D%20intLoc%20-%20intGlob.%0A%09%09%09enumLoc%20%3A%3D%20ident1%5D.%0A%09%09%28enumLoc%20%3D%20ident1%29%20ifTrue%3A%20%5B%0A%09%09%09%5E%20tmp%5D%5D'),
    355. 

  355. messageSends: [unescape("+"), "whileTrue:", "ifTrue:", unescape("%3D"), unescape("-")],
    356. 

  356. referencedClasses: []
    357. 

  357. }),
    358. 

  358. smalltalk.Pystone);
    359. 

  359. 

  360. smalltalk.addMethod(
    361. 

  361. '_proc3_',
    362. 

  362. smalltalk.method({
    363. 

  363. selector: 'proc3:',
    364. 

  364. category: 'as yet unclassified',
    365. 

  365. fn: function (ptrParOut){
    366. 

  366. var self=this;
    367. 

  367. var tmp=nil;
    368. 

  368. tmp=ptrParOut;
    369. 

  369. (($receiver = self['@ptrGlb']) == nil || $receiver == undefined) ? (function(){return self['@intGlob']=(100);})() : (function(){return tmp=smalltalk.send(self['@ptrGlb'], "_ptrComp", []);})();
    370. 

  370. smalltalk.send(self['@ptrGlb'], "_intComp_", [smalltalk.send(self, "_proc7_with_", [(10), self['@intGlob']])]);
    371. 

  371. return tmp;
    372. 

  372. return self;},
    373. 

  373. source: unescape('proc3%3A%20ptrParOut%0A%09%7C%20tmp%20%7C%0A%09tmp%20%3A%3D%20ptrParOut.%0A%09ptrGlb%20ifNotNil%3A%20%5B%0A%09%09tmp%20%3A%3D%20ptrGlb%20ptrComp%5D%0A%09ifNil%3A%20%5B%0A%09%09intGlob%20%3A%3D%20100%5D.%0A%09ptrGlb%20intComp%3A%20%28self%20proc7%3A%2010%20with%3A%20intGlob%29.%0A%09%5Etmp'),
    374. 

  374. messageSends: ["ifNotNil:ifNil:", "ptrComp", "intComp:", "proc7:with:"],
    375. 

  375. referencedClasses: []
    376. 

  376. }),
    377. 

  377. smalltalk.Pystone);
    378. 

  378. 

  379. smalltalk.addMethod(
    380. 

  380. '_proc4',
    381. 

  381. smalltalk.method({
    382. 

  382. selector: 'proc4',
    383. 

  383. category: 'as yet unclassified',
    384. 

  384. fn: function (){
    385. 

  385. var self=this;
    386. 

  386. var boolLoc=nil;
    387. 

  387. boolLoc=smalltalk.send(self['@char1Glob'], "__eq", ["A"]);
    388. 

  388. boolLoc=smalltalk.send(boolLoc, "_|", [self['@boolGlob']]);
    389. 

  389. self['@char2Glob']="B";
    390. 

  390. return self;},
    391. 

  391. source: unescape('proc4%0A%09%7C%20boolLoc%20%7C%0A%09boolLoc%20%3A%3D%20char1Glob%20%3D%20%27A%27.%0A%09boolLoc%20%3A%3D%20boolLoc%20%7C%20boolGlob.%0A%09char2Glob%20%3A%3D%20%27B%27'),
    392. 

  392. messageSends: [unescape("%3D"), unescape("%7C")],
    393. 

  393. referencedClasses: []
    394. 

  394. }),
    395. 

  395. smalltalk.Pystone);
    396. 

  396. 

  397. smalltalk.addMethod(
    398. 

  398. '_proc5',
    399. 

  399. smalltalk.method({
    400. 

  400. selector: 'proc5',
    401. 

  401. category: 'as yet unclassified',
    402. 

  402. fn: function (){
    403. 

  403. var self=this;
    404. 

  404. self['@char1Glob']="A";
    405. 

  405. self['@boolGlob']=false;
    406. 

  406. return self;},
    407. 

  407. source: unescape('proc5%0A%09char1Glob%20%3A%3D%20%27A%27.%0A%09boolGlob%20%3A%3D%20false'),
    408. 

  408. messageSends: [],
    409. 

  409. referencedClasses: []
    410. 

  410. }),
    411. 

  411. smalltalk.Pystone);
    412. 

  412. 

  413. smalltalk.addMethod(
    414. 

  414. '_proc6_',
    415. 

  415. smalltalk.method({
    416. 

  416. selector: 'proc6:',
    417. 

  417. category: 'as yet unclassified',
    418. 

  418. fn: function (enumParIn){
    419. 

  419. var self=this;
    420. 

  420. var enumParOut=nil;
    421. 

  421. enumParOut=enumParIn;
    422. 

  422. (($receiver = smalltalk.send(self['@func3'], "_value_", [enumParIn])).klass === smalltalk.Boolean) ? (! $receiver ? (function(){return enumParOut=self['@ident4'];})() : nil) : smalltalk.send($receiver, "_ifFalse_", [(function(){return enumParOut=self['@ident4'];})]);
    423. 

  423. (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident1']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident1'];})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident2']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (($receiver = (($receiver = self['@intGlob']).klass === smalltalk.Number) ? $receiver >(100) : smalltalk.send($receiver, "__gt", [(100)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident1'];})() : (function(){return enumParOut=self['@ident4'];})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return enumParOut=self['@ident1'];}), (function(){return enumParOut=self['@ident4'];})]);})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident3']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident2'];})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident4']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return nil;})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return nil;}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return enumParOut=self['@ident2'];}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident4']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return nil;})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return nil;}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})]);})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return (($receiver = (($receiver = self['@intGlob']).klass === smalltalk.Number) ? $receiver >(100) : smalltalk.send($receiver, "__gt", [(100)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident1'];})() : (function(){return enumParOut=self['@ident4'];})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return enumParOut=self['@ident1'];}), (function(){return enumParOut=self['@ident4'];})]);}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident3']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident2'];})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident4']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return nil;})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return nil;}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return enumParOut=self['@ident2'];}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident4']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return nil;})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return nil;}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})]);})]);})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return enumParOut=self['@ident1'];}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident2']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return (($receiver = (($receiver = self['@intGlob']).klass === smalltalk.Number) ? $receiver >(100) : smalltalk.send($receiver, "__gt", [(100)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident1'];})() : (function(){return enumParOut=self['@ident4'];})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return enumParOut=self['@ident1'];}), (function(){return enumParOut=self['@ident4'];})]);})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident3']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident2'];})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident4']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return nil;})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return nil;}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return enumParOut=self['@ident2'];}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident4']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return nil;})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return nil;}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})]);})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return (($receiver = (($receiver = self['@intGlob']).klass === smalltalk.Number) ? $receiver >(100) : smalltalk.send($receiver, "__gt", [(100)])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident1'];})() : (function(){return enumParOut=self['@ident4'];})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return enumParOut=self['@ident1'];}), (function(){return enumParOut=self['@ident4'];})]);}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident3']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident2'];})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident4']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return nil;})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return nil;}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return enumParOut=self['@ident2'];}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident4']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return nil;})() : (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})()) : smalltalk.send($receiver, "_ifTrue_ifFalse_", [(function(){return nil;}), (function(){return (($receiver = smalltalk.send(enumParIn, "__eq", [self['@ident5']])).klass === smalltalk.Boolean) ? ($receiver ? (function(){return enumParOut=self['@ident3'];})() : nil) : smalltalk.send($receiver, "_ifTrue_", [(function(){return enumParOut=self['@ident3'];})]);})]);})]);})]);})]);
    424. 

  424. return enumParOut;
    425. 

  425. return self;},
    426. 

  426. source: unescape('proc6%3A%20enumParIn%0A%09%7C%20enumParOut%20%7C%0A%09enumParOut%20%3A%3D%20enumParIn.%0A%09%28func3%20value%3A%20enumParIn%29%20ifFalse%3A%20%5B%0A%09%09enumParOut%20%3A%3D%20ident4%5D.%0A%09%28enumParIn%20%3D%20ident1%29%20ifTrue%3A%20%5B%0A%09%09enumParOut%20%3A%3D%20ident1%5D%20ifFalse%3A%20%5B%0A%09%28enumParIn%20%3D%20ident2%29%20ifTrue%3A%20%5B%0A%09%09%09intGlob%20%3E%20100%20ifTrue%3A%20%5B%0A%09%09%09%09enumParOut%20%3A%3D%20ident1%5D%0A%09%09%09ifFalse%3A%20%5B%0A%09%09%09%09enumParOut%20%3A%3D%20ident4%5D%5D%20ifFalse%3A%20%5B%0A%09%28enumParIn%20%3D%20ident3%29%20ifTrue%3A%20%5B%0A%09%09enumParOut%20%3A%3D%20ident2%5D%20ifFalse%3A%20%5B%0A%09%28enumParIn%20%3D%20ident4%29%20ifTrue%3A%20%5B%5D%20ifFalse%3A%20%5B%0A%09%28enumParIn%20%3D%20ident5%29%20ifTrue%3A%20%5B%0A%09%09enumParOut%20%3A%3D%20ident3%5D%5D%5D%5D%5D.%0A%09%5EenumParOut'),
    427. 

  427. messageSends: ["ifFalse:", "value:", "ifTrue:ifFalse:", unescape("%3D"), unescape("%3E"), "ifTrue:"],
    428. 

  428. referencedClasses: []
    429. 

  429. }),
    430. 

  430. smalltalk.Pystone);
    431. 

  431. 

  432. smalltalk.addMethod(
    433. 

  433. '_proc7_with_',
    434. 

  434. smalltalk.method({
    435. 

  435. selector: 'proc7:with:',
    436. 

  436. category: 'as yet unclassified',
    437. 

  437. fn: function (intParI1, intParI2){
    438. 

  438. var self=this;
    439. 

  439. var intLoc=nil;
    440. 

  440. var intParOut=nil;
    441. 

  441. intLoc=(($receiver = intParI1).klass === smalltalk.Number) ? $receiver +(2) : smalltalk.send($receiver, "__plus", [(2)]);
    442. 

  442. intParOut=(($receiver = intParI2).klass === smalltalk.Number) ? $receiver +intLoc : smalltalk.send($receiver, "__plus", [intLoc]);
    443. 

  443. return intParOut;
    444. 

  444. return self;},
    445. 

  445. source: unescape('proc7%3A%20intParI1%20with%3A%20intParI2%0A%09%7C%20intLoc%20intParOut%20%7C%0A%09intLoc%20%3A%3D%20intParI1%20+%202.%0A%09intParOut%20%3A%3D%20intParI2%20+%20intLoc.%0A%09%5E%20intParOut'),
    446. 

  446. messageSends: [unescape("+")],
    447. 

  447. referencedClasses: []
    448. 

  448. }),
    449. 

  449. smalltalk.Pystone);
    450. 

  450. 

  451. smalltalk.addMethod(
    452. 

  452. '_proc8_with_with_with_',
    453. 

  453. smalltalk.method({
    454. 

  454. selector: 'proc8:with:with:with:',
    455. 

  455. category: 'as yet unclassified',
    456. 

  456. fn: function (array1Par, array2Par, intParI1, intParI2){
    457. 

  457. var self=this;
    458. 

  458. var intLoc=nil;
    459. 

  459. intLoc=(($receiver = intParI1).klass === smalltalk.Number) ? $receiver +(5) : smalltalk.send($receiver, "__plus", [(5)]);
    460. 

  460. smalltalk.send(array1Par, "_at_put_", [intLoc, intParI2]);
    461. 

  461. smalltalk.send(array1Par, "_at_put_", [(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]), smalltalk.send(array1Par, "_at_", [intLoc])]);
    462. 

  462. smalltalk.send(array1Par, "_at_put_", [(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(30) : smalltalk.send($receiver, "__plus", [(30)]), intLoc]);
    463. 

  463. smalltalk.send(intLoc, "_to_do_", [(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)]), (function(intIndex){smalltalk.send(smalltalk.send(array2Par, "_at_", [intLoc]), "_at_put_", [intIndex, intLoc]);smalltalk.send(smalltalk.send(array2Par, "_at_", [intLoc]), "_at_put_", [(($receiver = intLoc).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)]), (($receiver = smalltalk.send(smalltalk.send(array2Par, "_at_", [intLoc]), "_at_", [(($receiver = intLoc).klass === smalltalk.Number) ? $receiver -(1) : smalltalk.send($receiver, "__minus", [(1)])])).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])]);return smalltalk.send(smalltalk.send(array2Par, "_at_", [(($receiver = intLoc).klass === smalltalk.Number) ? $receiver +(20) : smalltalk.send($receiver, "__plus", [(20)])]), "_at_put_", [intLoc, smalltalk.send(array1Par, "_at_", [intLoc])]);})]);
    464. 

  464. self['@intGlob']=(5);
    465. 

  465. return self;},
    466. 

  466. source: unescape('proc8%3A%20array1Par%20with%3A%20array2Par%20with%3A%20intParI1%20with%3A%20intParI2%0A%09%7C%20intLoc%20%7C%0A%09intLoc%20%3A%3D%20intParI1%20+%205.%0A%09array1Par%20at%3A%20intLoc%20put%3A%20intParI2.%0A%09array1Par%20at%3A%20intLoc%20+%201%20put%3A%20%28array1Par%20at%3A%20intLoc%29.%0A%09array1Par%20at%3A%20intLoc%20+%2030%20put%3A%20intLoc.%0A%09intLoc%20to%3A%20intLoc%20+%201%20do%3A%20%5B%3AintIndex%20%7C%0A%09%09%28array2Par%20at%3A%20intLoc%29%20at%3A%20intIndex%20put%3A%20intLoc.%0A%09%09%28array2Par%20at%3A%20intLoc%29%20at%3A%20intLoc%20-%201%20put%3A%20%28%28array2Par%20at%3A%20intLoc%29%20at%3A%20intLoc%20-%201%29%20+%201.%0A%09%09%28array2Par%20at%3A%20intLoc%20+%2020%29%20at%3A%20intLoc%20put%3A%20%28array1Par%20at%3A%20intLoc%29%5D.%0A%09intGlob%20%3A%3D%205'),
    467. 

  467. messageSends: [unescape("+"), "at:put:", "at:", "to:do:", unescape("-")],
    468. 

  468. referencedClasses: []
    469. 

  469. }),
    470. 

  470. smalltalk.Pystone);
    471. 

  471. 

  472. smalltalk.addMethod(
    473. 

  473. '_pystones_block_',
    474. 

  474. smalltalk.method({
    475. 

  475. selector: 'pystones:block:',
    476. 

  476. category: 'as yet unclassified',
    477. 

  477. fn: function (loops, aBlock){
    478. 

  478. var self=this;
    479. 

  479. return smalltalk.send(self, "_proc0_block_", [loops, aBlock]);
    480. 

  480. return self;},
    481. 

  481. source: unescape('pystones%3A%20loops%20block%3A%20aBlock%0A%09%5Eself%20proc0%3A%20loops%20block%3A%20aBlock'),
    482. 

  482. messageSends: ["proc0:block:"],
    483. 

  483. referencedClasses: []
    484. 

  484. }),
    485. 

  485. smalltalk.Pystone);
    486. 

  486. 

  487. 

  488. smalltalk.Pystone.klass.iVarNames = ['nulltime'];
    489. 

  489. smalltalk.addMethod(
    490. 

  490. '_main',
    491. 

  491. smalltalk.method({
    492. 

  492. selector: 'main',
    493. 

  493. category: 'as yet unclassified',
    494. 

  494. fn: function (){
    495. 

  495. var self=this;
    496. 

  496. smalltalk.send(self, "_run_", [(50000)]);
    497. 

  497. return self;},
    498. 

  498. source: unescape('main%0A%09%22self%20main%22%0A%09%0A%09self%20run%3A%2050000'),
    499. 

  499. messageSends: ["run:"],
    500. 

  500. referencedClasses: []
    501. 

  501. }),
    502. 

  502. smalltalk.Pystone.klass);
    503. 

  503. 

  504. smalltalk.addMethod(
    505. 

  505. '_run_',
    506. 

  506. smalltalk.method({
    507. 

  507. selector: 'run:',
    508. 

  508. category: 'as yet unclassified',
    509. 

  509. fn: function (loops){
    510. 

  510. var self=this;
    511. 

  511. smalltalk.send(smalltalk.send(self, "_new", []), "_main_", [loops]);
    512. 

  512. return self;},
    513. 

  513. source: unescape('run%3A%20loops%0A%09%22self%20run%3A%2050000%22%0A%09%0A%09self%20new%20main%3A%20loops'),
    514. 

  514. messageSends: ["main:", "new"],
    515. 

  515. referencedClasses: []
    516. 

  516. }),
    517. 

  517. smalltalk.Pystone.klass);
    518. 

  518. 

  519.