resin 0.2.2 → 0.2.3

Sign up to get free protection for your applications and to get access to all the features.
Files changed (117) hide show
  1. data/amber/css/amber-normalize.css +73 -73
  2. data/amber/css/amber-normalize.less +1 -1
  3. data/amber/css/amber.css +106 -106
  4. data/amber/css/helios.css +242 -0
  5. data/amber/images/hsplitter.png +0 -0
  6. data/amber/images/vsplitter.png +0 -0
  7. data/amber/js/Benchfib.deploy.js +116 -38
  8. data/amber/js/Benchfib.js +120 -42
  9. data/amber/js/Canvas.deploy.js +674 -403
  10. data/amber/js/Canvas.js +682 -411
  11. data/amber/js/Compiler-AST.deploy.js +1150 -0
  12. data/amber/js/Compiler-AST.js +1591 -0
  13. data/amber/js/Compiler-Core.deploy.js +1562 -0
  14. data/amber/js/Compiler-Core.js +1972 -0
  15. data/amber/js/Compiler-Exceptions.deploy.js +114 -0
  16. data/amber/js/Compiler-Exceptions.js +161 -0
  17. data/amber/js/Compiler-IR.deploy.js +2326 -0
  18. data/amber/js/Compiler-IR.js +3146 -0
  19. data/amber/js/Compiler-Inlining.deploy.js +1147 -0
  20. data/amber/js/Compiler-Inlining.js +1514 -0
  21. data/amber/js/Compiler-Semantic.deploy.js +1207 -0
  22. data/amber/js/Compiler-Semantic.js +1628 -0
  23. data/amber/js/Compiler-Tests.deploy.js +646 -60
  24. data/amber/js/Compiler-Tests.js +843 -82
  25. data/amber/js/Compiler.deploy.js +1097 -159
  26. data/amber/js/Compiler.js +1414 -161
  27. data/amber/js/Examples.deploy.js +31 -15
  28. data/amber/js/Examples.js +33 -17
  29. data/amber/js/Helios-Announcements.deploy.js +127 -0
  30. data/amber/js/Helios-Announcements.js +157 -0
  31. data/amber/js/Helios-Browser.deploy.js +1473 -0
  32. data/amber/js/Helios-Browser.js +1953 -0
  33. data/amber/js/Helios-Commands.deploy.js +403 -0
  34. data/amber/js/Helios-Commands.js +563 -0
  35. data/amber/js/Helios-Core.deploy.js +1070 -0
  36. data/amber/js/Helios-Core.js +1445 -0
  37. data/amber/js/Helios-Environments.deploy.js +132 -0
  38. data/amber/js/Helios-Environments.js +179 -0
  39. data/amber/js/Helios-Inspector.deploy.js +855 -0
  40. data/amber/js/Helios-Inspector.js +1155 -0
  41. data/amber/js/Helios-KeyBindings.deploy.js +753 -0
  42. data/amber/js/Helios-KeyBindings.js +1023 -0
  43. data/amber/js/Helios-Layout.deploy.js +383 -0
  44. data/amber/js/Helios-Layout.js +523 -0
  45. data/amber/js/Helios-Workspace.deploy.js +799 -0
  46. data/amber/js/Helios-Workspace.js +1074 -0
  47. data/amber/js/IDE.deploy.js +2541 -1490
  48. data/amber/js/IDE.js +2721 -1660
  49. data/amber/js/Importer-Exporter.deploy.js +671 -0
  50. data/amber/js/Importer-Exporter.js +816 -0
  51. data/amber/js/Kernel-Announcements.deploy.js +137 -20
  52. data/amber/js/Kernel-Announcements.js +176 -22
  53. data/amber/js/Kernel-Classes.deploy.js +555 -168
  54. data/amber/js/Kernel-Classes.js +662 -205
  55. data/amber/js/Kernel-Collections.deploy.js +1403 -618
  56. data/amber/js/Kernel-Collections.js +1545 -690
  57. data/amber/js/Kernel-Exceptions.deploy.js +109 -45
  58. data/amber/js/Kernel-Exceptions.js +123 -49
  59. data/amber/js/Kernel-Methods.deploy.js +196 -81
  60. data/amber/js/Kernel-Methods.js +214 -89
  61. data/amber/js/Kernel-Objects.deploy.js +1542 -1117
  62. data/amber/js/Kernel-Objects.js +1593 -1148
  63. data/amber/js/Kernel-Tests.deploy.js +1725 -772
  64. data/amber/js/Kernel-Tests.js +2301 -1123
  65. data/amber/js/Kernel-Transcript.deploy.js +23 -25
  66. data/amber/js/Kernel-Transcript.js +24 -26
  67. data/amber/js/SUnit.deploy.js +204 -131
  68. data/amber/js/SUnit.js +222 -139
  69. data/amber/js/Spaces.deploy.js +240 -0
  70. data/amber/js/Spaces.js +326 -0
  71. data/amber/js/amber.js +26 -7
  72. data/amber/js/boot.js +65 -47
  73. data/amber/js/init.js +1 -1
  74. data/amber/js/lib/CodeMirror/amber.css +21 -21
  75. data/amber/js/lib/CodeMirror/codemirror.css +119 -13
  76. data/amber/js/lib/CodeMirror/codemirror.js +2219 -1220
  77. data/amber/js/lib/CodeMirror/smalltalk.js +134 -129
  78. data/amber/js/lib/bootstrap/css/bootstrap.css +5837 -0
  79. data/amber/js/lib/bootstrap/css/bootstrap.min.css +841 -0
  80. data/amber/js/lib/bootstrap/img/glyphicons-halflings-white.png +0 -0
  81. data/amber/js/lib/bootstrap/img/glyphicons-halflings.png +0 -0
  82. data/amber/js/lib/bootstrap/js/bootstrap.js +2038 -0
  83. data/amber/js/lib/bootstrap/js/bootstrap.min.js +7 -0
  84. data/amber/js/lib/jQuery/jquery-1.8.2.min.js +2 -0
  85. data/amber/js/lib/jQuery/jquery-ui-1.8.24.custom.min.js +125 -0
  86. data/amber/st/Compiler-AST.st +505 -0
  87. data/amber/st/Compiler-Core.st +835 -0
  88. data/amber/st/Compiler-Exceptions.st +87 -0
  89. data/amber/st/Compiler-IR.st +1097 -0
  90. data/amber/st/Compiler-Inlining.st +650 -0
  91. data/amber/st/Compiler-Semantic.st +558 -0
  92. data/amber/st/Compiler-Tests.st +285 -381
  93. data/amber/st/Compiler.st +725 -2
  94. data/amber/st/Helios-Announcements.st +104 -0
  95. data/amber/st/Helios-Browser.st +708 -0
  96. data/amber/st/Helios-Commands.st +223 -0
  97. data/amber/st/Helios-Core.st +532 -0
  98. data/amber/st/Helios-Environments.st +98 -0
  99. data/amber/st/Helios-Inspector.st +367 -0
  100. data/amber/st/Helios-KeyBindings.st +337 -0
  101. data/amber/st/Helios-Layout.st +199 -0
  102. data/amber/st/Helios-Workspace.st +367 -0
  103. data/amber/st/IDE.st +75 -53
  104. data/amber/st/Importer-Exporter.st +386 -0
  105. data/amber/st/Kernel-Announcements.st +92 -0
  106. data/amber/st/Kernel-Classes.st +137 -15
  107. data/amber/st/Kernel-Collections.st +137 -47
  108. data/amber/st/Kernel-Exceptions.st +14 -0
  109. data/amber/st/Kernel-Methods.st +9 -1
  110. data/amber/st/Kernel-Objects.st +29 -5
  111. data/amber/st/Kernel-Tests.st +545 -199
  112. data/amber/st/SUnit.st +10 -0
  113. data/amber/st/Spaces.st +142 -0
  114. data/lib/resin/app.rb +1 -1
  115. metadata +86 -31
  116. data/amber/js/lib/jQuery/jquery-1.4.4.min.js +0 -167
  117. data/amber/js/lib/jQuery/jquery-1.6.4.min.js +0 -4
@@ -7,7 +7,8 @@ selector: "context",
7
7
  fn: function (){
8
8
  var self=this;
9
9
  return self.context;
10
- return self;}
10
+ ;
11
+ return self}
11
12
  }),
12
13
  smalltalk.Error);
13
14
 
@@ -18,7 +19,8 @@ selector: "isSmalltalkError",
18
19
  fn: function (){
19
20
  var self=this;
20
21
  return self.smalltalkError === true;
21
- return self;}
22
+ ;
23
+ return self}
22
24
  }),
23
25
  smalltalk.Error);
24
26
 
@@ -29,7 +31,8 @@ selector: "jsStack",
29
31
  fn: function (){
30
32
  var self=this;
31
33
  return self.stack;
32
- return self;}
34
+ ;
35
+ return self}
33
36
  }),
34
37
  smalltalk.Error);
35
38
 
@@ -39,8 +42,8 @@ smalltalk.method({
39
42
  selector: "messageText",
40
43
  fn: function (){
41
44
  var self=this;
42
- return self['@messageText'];
43
- return self;}
45
+ return self["@messageText"];
46
+ }
44
47
  }),
45
48
  smalltalk.Error);
46
49
 
@@ -50,8 +53,8 @@ smalltalk.method({
50
53
  selector: "messageText:",
51
54
  fn: function (aString){
52
55
  var self=this;
53
- (self['@messageText']=aString);
54
- return self;}
56
+ self["@messageText"]=aString;
57
+ return self}
55
58
  }),
56
59
  smalltalk.Error);
57
60
 
@@ -62,7 +65,8 @@ selector: "signal",
62
65
  fn: function (){
63
66
  var self=this;
64
67
  self.context = smalltalk.getThisContext(); self.smalltalkError = true; throw(self);
65
- return self;}
68
+ ;
69
+ return self}
66
70
  }),
67
71
  smalltalk.Error);
68
72
 
@@ -72,9 +76,9 @@ smalltalk.method({
72
76
  selector: "signal:",
73
77
  fn: function (aString){
74
78
  var self=this;
75
- smalltalk.send(self, "_messageText_", [aString]);
76
- smalltalk.send(self, "_signal", []);
77
- return self;}
79
+ smalltalk.send(self,"_messageText_",[aString]);
80
+ smalltalk.send(self,"_signal",[]);
81
+ return self}
78
82
  }),
79
83
  smalltalk.Error);
80
84
 
@@ -85,8 +89,10 @@ smalltalk.method({
85
89
  selector: "signal",
86
90
  fn: function (){
87
91
  var self=this;
88
- return smalltalk.send(smalltalk.send(self, "_new", []), "_signal", []);
89
- return self;}
92
+ var $1;
93
+ $1=smalltalk.send(smalltalk.send(self,"_new",[]),"_signal",[]);
94
+ return $1;
95
+ }
90
96
  }),
91
97
  smalltalk.Error.klass);
92
98
 
@@ -96,8 +102,10 @@ smalltalk.method({
96
102
  selector: "signal:",
97
103
  fn: function (aString){
98
104
  var self=this;
99
- return smalltalk.send(smalltalk.send(self, "_new", []), "_signal_", [aString]);
100
- return self;}
105
+ var $1;
106
+ $1=smalltalk.send(smalltalk.send(self,"_new",[]),"_signal_",[aString]);
107
+ return $1;
108
+ }
101
109
  }),
102
110
  smalltalk.Error.klass);
103
111
 
@@ -109,8 +117,8 @@ smalltalk.method({
109
117
  selector: "message",
110
118
  fn: function (){
111
119
  var self=this;
112
- return self['@message'];
113
- return self;}
120
+ return self["@message"];
121
+ }
114
122
  }),
115
123
  smalltalk.MessageNotUnderstood);
116
124
 
@@ -120,8 +128,8 @@ smalltalk.method({
120
128
  selector: "message:",
121
129
  fn: function (aMessage){
122
130
  var self=this;
123
- (self['@message']=aMessage);
124
- return self;}
131
+ self["@message"]=aMessage;
132
+ return self}
125
133
  }),
126
134
  smalltalk.MessageNotUnderstood);
127
135
 
@@ -131,8 +139,10 @@ smalltalk.method({
131
139
  selector: "messageText",
132
140
  fn: function (){
133
141
  var self=this;
134
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_asString", []), "__comma", [" does not understand #"]), "__comma", [smalltalk.send(smalltalk.send(self, "_message", []), "_selector", [])]);
135
- return self;}
142
+ var $1;
143
+ $1=smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self,"_receiver",[]),"_asString",[]),"__comma",[" does not understand #"]),"__comma",[smalltalk.send(smalltalk.send(self,"_message",[]),"_selector",[])]);
144
+ return $1;
145
+ }
136
146
  }),
137
147
  smalltalk.MessageNotUnderstood);
138
148
 
@@ -142,8 +152,8 @@ smalltalk.method({
142
152
  selector: "receiver",
143
153
  fn: function (){
144
154
  var self=this;
145
- return self['@receiver'];
146
- return self;}
155
+ return self["@receiver"];
156
+ }
147
157
  }),
148
158
  smalltalk.MessageNotUnderstood);
149
159
 
@@ -153,13 +163,38 @@ smalltalk.method({
153
163
  selector: "receiver:",
154
164
  fn: function (anObject){
155
165
  var self=this;
156
- (self['@receiver']=anObject);
157
- return self;}
166
+ self["@receiver"]=anObject;
167
+ return self}
158
168
  }),
159
169
  smalltalk.MessageNotUnderstood);
160
170
 
161
171
 
162
172
 
173
+ smalltalk.addClass('NonBooleanReceiver', smalltalk.Error, ['object'], 'Kernel-Exceptions');
174
+ smalltalk.addMethod(
175
+ "_object",
176
+ smalltalk.method({
177
+ selector: "object",
178
+ fn: function (){
179
+ var self=this;
180
+ return self["@object"];
181
+ }
182
+ }),
183
+ smalltalk.NonBooleanReceiver);
184
+
185
+ smalltalk.addMethod(
186
+ "_object_",
187
+ smalltalk.method({
188
+ selector: "object:",
189
+ fn: function (anObject){
190
+ var self=this;
191
+ self["@object"]=anObject;
192
+ return self}
193
+ }),
194
+ smalltalk.NonBooleanReceiver);
195
+
196
+
197
+
163
198
  smalltalk.addClass('ErrorHandler', smalltalk.Object, [], 'Kernel-Exceptions');
164
199
  smalltalk.addMethod(
165
200
  "_handleError_",
@@ -167,9 +202,15 @@ smalltalk.method({
167
202
  selector: "handleError:",
168
203
  fn: function (anError){
169
204
  var self=this;
170
- (($receiver = smalltalk.send(anError, "_context", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logErrorContext_", [smalltalk.send(anError, "_context", [])]);})() : nil;
171
- smalltalk.send(self, "_logError_", [anError]);
172
- return self;}
205
+ var $1;
206
+ $1=smalltalk.send(anError,"_context",[]);
207
+ if(($receiver = $1) == nil || $receiver == undefined){
208
+ $1;
209
+ } else {
210
+ smalltalk.send(self,"_logErrorContext_",[smalltalk.send(anError,"_context",[])]);
211
+ };
212
+ smalltalk.send(self,"_logError_",[anError]);
213
+ return self}
173
214
  }),
174
215
  smalltalk.ErrorHandler);
175
216
 
@@ -179,8 +220,8 @@ smalltalk.method({
179
220
  selector: "log:",
180
221
  fn: function (aString){
181
222
  var self=this;
182
- smalltalk.send((typeof console == 'undefined' ? nil : console), "_log_", [aString]);
183
- return self;}
223
+ smalltalk.send(console,"_log_",[aString]);
224
+ return self}
184
225
  }),
185
226
  smalltalk.ErrorHandler);
186
227
 
@@ -190,9 +231,15 @@ smalltalk.method({
190
231
  selector: "logContext:",
191
232
  fn: function (aContext){
192
233
  var self=this;
193
- (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;
194
- smalltalk.send(self, "_log_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aContext, "_receiver", []), "_asString", []), "__comma", [">>"]), "__comma", [smalltalk.send(aContext, "_selector", [])])]);
195
- return self;}
234
+ var $1;
235
+ $1=smalltalk.send(aContext,"_home",[]);
236
+ if(($receiver = $1) == nil || $receiver == undefined){
237
+ $1;
238
+ } else {
239
+ smalltalk.send(self,"_logContext_",[smalltalk.send(aContext,"_home",[])]);
240
+ };
241
+ smalltalk.send(self,"_log_",[smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aContext,"_receiver",[]),"_asString",[]),"__comma",[">>"]),"__comma",[smalltalk.send(aContext,"_selector",[])])]);
242
+ return self}
196
243
  }),
197
244
  smalltalk.ErrorHandler);
198
245
 
@@ -202,8 +249,8 @@ smalltalk.method({
202
249
  selector: "logError:",
203
250
  fn: function (anError){
204
251
  var self=this;
205
- smalltalk.send(self, "_log_", [smalltalk.send(anError, "_messageText", [])]);
206
- return self;}
252
+ smalltalk.send(self,"_log_",[smalltalk.send(anError,"_messageText",[])]);
253
+ return self}
207
254
  }),
208
255
  smalltalk.ErrorHandler);
209
256
 
@@ -213,8 +260,18 @@ smalltalk.method({
213
260
  selector: "logErrorContext:",
214
261
  fn: function (aContext){
215
262
  var self=this;
216
- (($receiver = aContext) != nil && $receiver != undefined) ? (function(){return (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;})() : nil;
217
- return self;}
263
+ var $1;
264
+ if(($receiver = aContext) == nil || $receiver == undefined){
265
+ aContext;
266
+ } else {
267
+ $1=smalltalk.send(aContext,"_home",[]);
268
+ if(($receiver = $1) == nil || $receiver == undefined){
269
+ $1;
270
+ } else {
271
+ smalltalk.send(self,"_logContext_",[smalltalk.send(aContext,"_home",[])]);
272
+ };
273
+ };
274
+ return self}
218
275
  }),
219
276
  smalltalk.ErrorHandler);
220
277
 
@@ -226,8 +283,15 @@ smalltalk.method({
226
283
  selector: "current",
227
284
  fn: function (){
228
285
  var self=this;
229
- return (($receiver = self['@current']) == nil || $receiver == undefined) ? (function(){return (self['@current']=smalltalk.send(self, "_new", []));})() : $receiver;
230
- return self;}
286
+ var $1;
287
+ if(($receiver = self["@current"]) == nil || $receiver == undefined){
288
+ self["@current"]=smalltalk.send(self,"_new",[]);
289
+ $1=self["@current"];
290
+ } else {
291
+ $1=self["@current"];
292
+ };
293
+ return $1;
294
+ }
231
295
  }),
232
296
  smalltalk.ErrorHandler.klass);
233
297
 
@@ -237,8 +301,8 @@ smalltalk.method({
237
301
  selector: "initialize",
238
302
  fn: function (){
239
303
  var self=this;
240
- smalltalk.send(self, "_register", []);
241
- return self;}
304
+ smalltalk.send(self,"_register",[]);
305
+ return self}
242
306
  }),
243
307
  smalltalk.ErrorHandler.klass);
244
308
 
@@ -248,8 +312,8 @@ smalltalk.method({
248
312
  selector: "register",
249
313
  fn: function (){
250
314
  var self=this;
251
- smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_setCurrent_", [smalltalk.send(self, "_new", [])]);
252
- return self;}
315
+ smalltalk.send((smalltalk.ErrorHandler || ErrorHandler),"_setCurrent_",[smalltalk.send(self,"_new",[])]);
316
+ return self}
253
317
  }),
254
318
  smalltalk.ErrorHandler.klass);
255
319
 
@@ -259,8 +323,8 @@ smalltalk.method({
259
323
  selector: "setCurrent:",
260
324
  fn: function (anHandler){
261
325
  var self=this;
262
- (self['@current']=anHandler);
263
- return self;}
326
+ self["@current"]=anHandler;
327
+ return self}
264
328
  }),
265
329
  smalltalk.ErrorHandler.klass);
266
330
 
@@ -8,7 +8,8 @@ category: 'accessing',
8
8
  fn: function (){
9
9
  var self=this;
10
10
  return self.context;
11
- return self;},
11
+ ;
12
+ return self},
12
13
  args: [],
13
14
  source: "context\x0a\x09<return self.context>",
14
15
  messageSends: [],
@@ -24,7 +25,8 @@ category: 'testing',
24
25
  fn: function (){
25
26
  var self=this;
26
27
  return self.smalltalkError === true;
27
- return self;},
28
+ ;
29
+ return self},
28
30
  args: [],
29
31
  source: "isSmalltalkError\x0a\x09<return self.smalltalkError === true>",
30
32
  messageSends: [],
@@ -40,7 +42,8 @@ category: 'accessing',
40
42
  fn: function (){
41
43
  var self=this;
42
44
  return self.stack;
43
- return self;},
45
+ ;
46
+ return self},
44
47
  args: [],
45
48
  source: "jsStack\x0a\x09<return self.stack>",
46
49
  messageSends: [],
@@ -55,8 +58,8 @@ selector: "messageText",
55
58
  category: 'accessing',
56
59
  fn: function (){
57
60
  var self=this;
58
- return self['@messageText'];
59
- return self;},
61
+ return self["@messageText"];
62
+ },
60
63
  args: [],
61
64
  source: "messageText\x0a\x09^messageText",
62
65
  messageSends: [],
@@ -71,8 +74,8 @@ selector: "messageText:",
71
74
  category: 'accessing',
72
75
  fn: function (aString){
73
76
  var self=this;
74
- (self['@messageText']=aString);
75
- return self;},
77
+ self["@messageText"]=aString;
78
+ return self},
76
79
  args: ["aString"],
77
80
  source: "messageText: aString\x0a\x09messageText := aString",
78
81
  messageSends: [],
@@ -88,7 +91,8 @@ category: 'signaling',
88
91
  fn: function (){
89
92
  var self=this;
90
93
  self.context = smalltalk.getThisContext(); self.smalltalkError = true; throw(self);
91
- return self;},
94
+ ;
95
+ return self},
92
96
  args: [],
93
97
  source: "signal\x0a\x09<self.context = smalltalk.getThisContext(); self.smalltalkError = true; throw(self)>",
94
98
  messageSends: [],
@@ -103,9 +107,9 @@ selector: "signal:",
103
107
  category: 'signaling',
104
108
  fn: function (aString){
105
109
  var self=this;
106
- smalltalk.send(self, "_messageText_", [aString]);
107
- smalltalk.send(self, "_signal", []);
108
- return self;},
110
+ smalltalk.send(self,"_messageText_",[aString]);
111
+ smalltalk.send(self,"_signal",[]);
112
+ return self},
109
113
  args: ["aString"],
110
114
  source: "signal: aString\x0a\x09self messageText: aString.\x0a\x09self signal",
111
115
  messageSends: ["messageText:", "signal"],
@@ -121,8 +125,10 @@ selector: "signal",
121
125
  category: 'instance creation',
122
126
  fn: function (){
123
127
  var self=this;
124
- return smalltalk.send(smalltalk.send(self, "_new", []), "_signal", []);
125
- return self;},
128
+ var $1;
129
+ $1=smalltalk.send(smalltalk.send(self,"_new",[]),"_signal",[]);
130
+ return $1;
131
+ },
126
132
  args: [],
127
133
  source: "signal\x0a\x09^self new signal",
128
134
  messageSends: ["signal", "new"],
@@ -137,8 +143,10 @@ selector: "signal:",
137
143
  category: 'instance creation',
138
144
  fn: function (aString){
139
145
  var self=this;
140
- return smalltalk.send(smalltalk.send(self, "_new", []), "_signal_", [aString]);
141
- return self;},
146
+ var $1;
147
+ $1=smalltalk.send(smalltalk.send(self,"_new",[]),"_signal_",[aString]);
148
+ return $1;
149
+ },
142
150
  args: ["aString"],
143
151
  source: "signal: aString\x0a\x09 ^self new\x0a\x09\x09signal: aString",
144
152
  messageSends: ["signal:", "new"],
@@ -155,8 +163,8 @@ selector: "message",
155
163
  category: 'accessing',
156
164
  fn: function (){
157
165
  var self=this;
158
- return self['@message'];
159
- return self;},
166
+ return self["@message"];
167
+ },
160
168
  args: [],
161
169
  source: "message\x0a\x09^message",
162
170
  messageSends: [],
@@ -171,8 +179,8 @@ selector: "message:",
171
179
  category: 'accessing',
172
180
  fn: function (aMessage){
173
181
  var self=this;
174
- (self['@message']=aMessage);
175
- return self;},
182
+ self["@message"]=aMessage;
183
+ return self},
176
184
  args: ["aMessage"],
177
185
  source: "message: aMessage\x0a\x09message := aMessage",
178
186
  messageSends: [],
@@ -187,11 +195,13 @@ selector: "messageText",
187
195
  category: 'accessing',
188
196
  fn: function (){
189
197
  var self=this;
190
- return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self, "_receiver", []), "_asString", []), "__comma", [" does not understand #"]), "__comma", [smalltalk.send(smalltalk.send(self, "_message", []), "_selector", [])]);
191
- return self;},
198
+ var $1;
199
+ $1=smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(self,"_receiver",[]),"_asString",[]),"__comma",[" does not understand #"]),"__comma",[smalltalk.send(smalltalk.send(self,"_message",[]),"_selector",[])]);
200
+ return $1;
201
+ },
192
202
  args: [],
193
203
  source: "messageText\x0a\x09^self receiver asString, ' does not understand #', self message selector",
194
- messageSends: [",", "asString", "receiver", "selector", "message"],
204
+ messageSends: [",", "selector", "message", "asString", "receiver"],
195
205
  referencedClasses: []
196
206
  }),
197
207
  smalltalk.MessageNotUnderstood);
@@ -203,8 +213,8 @@ selector: "receiver",
203
213
  category: 'accessing',
204
214
  fn: function (){
205
215
  var self=this;
206
- return self['@receiver'];
207
- return self;},
216
+ return self["@receiver"];
217
+ },
208
218
  args: [],
209
219
  source: "receiver\x0a\x09^receiver",
210
220
  messageSends: [],
@@ -219,8 +229,8 @@ selector: "receiver:",
219
229
  category: 'accessing',
220
230
  fn: function (anObject){
221
231
  var self=this;
222
- (self['@receiver']=anObject);
223
- return self;},
232
+ self["@receiver"]=anObject;
233
+ return self},
224
234
  args: ["anObject"],
225
235
  source: "receiver: anObject\x0a\x09receiver := anObject",
226
236
  messageSends: [],
@@ -230,6 +240,41 @@ smalltalk.MessageNotUnderstood);
230
240
 
231
241
 
232
242
 
243
+ smalltalk.addClass('NonBooleanReceiver', smalltalk.Error, ['object'], 'Kernel-Exceptions');
244
+ smalltalk.addMethod(
245
+ "_object",
246
+ smalltalk.method({
247
+ selector: "object",
248
+ category: 'accessing',
249
+ fn: function (){
250
+ var self=this;
251
+ return self["@object"];
252
+ },
253
+ args: [],
254
+ source: "object\x0a\x09^ object",
255
+ messageSends: [],
256
+ referencedClasses: []
257
+ }),
258
+ smalltalk.NonBooleanReceiver);
259
+
260
+ smalltalk.addMethod(
261
+ "_object_",
262
+ smalltalk.method({
263
+ selector: "object:",
264
+ category: 'accessing',
265
+ fn: function (anObject){
266
+ var self=this;
267
+ self["@object"]=anObject;
268
+ return self},
269
+ args: ["anObject"],
270
+ source: "object: anObject\x0a\x09object := anObject",
271
+ messageSends: [],
272
+ referencedClasses: []
273
+ }),
274
+ smalltalk.NonBooleanReceiver);
275
+
276
+
277
+
233
278
  smalltalk.addClass('ErrorHandler', smalltalk.Object, [], 'Kernel-Exceptions');
234
279
  smalltalk.addMethod(
235
280
  "_handleError_",
@@ -238,12 +283,18 @@ selector: "handleError:",
238
283
  category: 'error handling',
239
284
  fn: function (anError){
240
285
  var self=this;
241
- (($receiver = smalltalk.send(anError, "_context", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logErrorContext_", [smalltalk.send(anError, "_context", [])]);})() : nil;
242
- smalltalk.send(self, "_logError_", [anError]);
243
- return self;},
286
+ var $1;
287
+ $1=smalltalk.send(anError,"_context",[]);
288
+ if(($receiver = $1) == nil || $receiver == undefined){
289
+ $1;
290
+ } else {
291
+ smalltalk.send(self,"_logErrorContext_",[smalltalk.send(anError,"_context",[])]);
292
+ };
293
+ smalltalk.send(self,"_logError_",[anError]);
294
+ return self},
244
295
  args: ["anError"],
245
296
  source: "handleError: anError\x0a\x09anError context ifNotNil: [self logErrorContext: anError context].\x0a\x09self logError: anError",
246
- messageSends: ["ifNotNil:", "context", "logErrorContext:", "logError:"],
297
+ messageSends: ["ifNotNil:", "logErrorContext:", "context", "logError:"],
247
298
  referencedClasses: []
248
299
  }),
249
300
  smalltalk.ErrorHandler);
@@ -255,8 +306,8 @@ selector: "log:",
255
306
  category: 'private',
256
307
  fn: function (aString){
257
308
  var self=this;
258
- smalltalk.send((typeof console == 'undefined' ? nil : console), "_log_", [aString]);
259
- return self;},
309
+ smalltalk.send(console,"_log_",[aString]);
310
+ return self},
260
311
  args: ["aString"],
261
312
  source: "log: aString\x0a\x09console log: aString",
262
313
  messageSends: ["log:"],
@@ -271,12 +322,18 @@ selector: "logContext:",
271
322
  category: 'private',
272
323
  fn: function (aContext){
273
324
  var self=this;
274
- (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;
275
- smalltalk.send(self, "_log_", [smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aContext, "_receiver", []), "_asString", []), "__comma", [">>"]), "__comma", [smalltalk.send(aContext, "_selector", [])])]);
276
- return self;},
325
+ var $1;
326
+ $1=smalltalk.send(aContext,"_home",[]);
327
+ if(($receiver = $1) == nil || $receiver == undefined){
328
+ $1;
329
+ } else {
330
+ smalltalk.send(self,"_logContext_",[smalltalk.send(aContext,"_home",[])]);
331
+ };
332
+ smalltalk.send(self,"_log_",[smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(aContext,"_receiver",[]),"_asString",[]),"__comma",[">>"]),"__comma",[smalltalk.send(aContext,"_selector",[])])]);
333
+ return self},
277
334
  args: ["aContext"],
278
335
  source: "logContext: aContext\x0a\x09aContext home ifNotNil: [\x0a\x09\x09self logContext: aContext home].\x0a\x09self log: aContext receiver asString, '>>', aContext selector",
279
- messageSends: ["ifNotNil:", "home", "logContext:", "log:", ",", "asString", "receiver", "selector"],
336
+ messageSends: ["ifNotNil:", "logContext:", "home", "log:", ",", "selector", "asString", "receiver"],
280
337
  referencedClasses: []
281
338
  }),
282
339
  smalltalk.ErrorHandler);
@@ -288,8 +345,8 @@ selector: "logError:",
288
345
  category: 'private',
289
346
  fn: function (anError){
290
347
  var self=this;
291
- smalltalk.send(self, "_log_", [smalltalk.send(anError, "_messageText", [])]);
292
- return self;},
348
+ smalltalk.send(self,"_log_",[smalltalk.send(anError,"_messageText",[])]);
349
+ return self},
293
350
  args: ["anError"],
294
351
  source: "logError: anError\x0a\x09self log: anError messageText",
295
352
  messageSends: ["log:", "messageText"],
@@ -304,11 +361,21 @@ selector: "logErrorContext:",
304
361
  category: 'private',
305
362
  fn: function (aContext){
306
363
  var self=this;
307
- (($receiver = aContext) != nil && $receiver != undefined) ? (function(){return (($receiver = smalltalk.send(aContext, "_home", [])) != nil && $receiver != undefined) ? (function(){return smalltalk.send(self, "_logContext_", [smalltalk.send(aContext, "_home", [])]);})() : nil;})() : nil;
308
- return self;},
364
+ var $1;
365
+ if(($receiver = aContext) == nil || $receiver == undefined){
366
+ aContext;
367
+ } else {
368
+ $1=smalltalk.send(aContext,"_home",[]);
369
+ if(($receiver = $1) == nil || $receiver == undefined){
370
+ $1;
371
+ } else {
372
+ smalltalk.send(self,"_logContext_",[smalltalk.send(aContext,"_home",[])]);
373
+ };
374
+ };
375
+ return self},
309
376
  args: ["aContext"],
310
377
  source: "logErrorContext: aContext\x0a\x09aContext ifNotNil: [\x0a\x09\x09aContext home ifNotNil: [\x0a\x09\x09\x09self logContext: aContext home]]",
311
- messageSends: ["ifNotNil:", "home", "logContext:"],
378
+ messageSends: ["ifNotNil:", "logContext:", "home"],
312
379
  referencedClasses: []
313
380
  }),
314
381
  smalltalk.ErrorHandler);
@@ -322,8 +389,15 @@ selector: "current",
322
389
  category: 'accessing',
323
390
  fn: function (){
324
391
  var self=this;
325
- return (($receiver = self['@current']) == nil || $receiver == undefined) ? (function(){return (self['@current']=smalltalk.send(self, "_new", []));})() : $receiver;
326
- return self;},
392
+ var $1;
393
+ if(($receiver = self["@current"]) == nil || $receiver == undefined){
394
+ self["@current"]=smalltalk.send(self,"_new",[]);
395
+ $1=self["@current"];
396
+ } else {
397
+ $1=self["@current"];
398
+ };
399
+ return $1;
400
+ },
327
401
  args: [],
328
402
  source: "current\x0a\x09^current ifNil: [current := self new]",
329
403
  messageSends: ["ifNil:", "new"],
@@ -338,8 +412,8 @@ selector: "initialize",
338
412
  category: 'initialization',
339
413
  fn: function (){
340
414
  var self=this;
341
- smalltalk.send(self, "_register", []);
342
- return self;},
415
+ smalltalk.send(self,"_register",[]);
416
+ return self},
343
417
  args: [],
344
418
  source: "initialize\x0a\x09self register",
345
419
  messageSends: ["register"],
@@ -354,8 +428,8 @@ selector: "register",
354
428
  category: 'initialization',
355
429
  fn: function (){
356
430
  var self=this;
357
- smalltalk.send((smalltalk.ErrorHandler || ErrorHandler), "_setCurrent_", [smalltalk.send(self, "_new", [])]);
358
- return self;},
431
+ smalltalk.send((smalltalk.ErrorHandler || ErrorHandler),"_setCurrent_",[smalltalk.send(self,"_new",[])]);
432
+ return self},
359
433
  args: [],
360
434
  source: "register\x0a\x09ErrorHandler setCurrent: self new",
361
435
  messageSends: ["setCurrent:", "new"],
@@ -370,8 +444,8 @@ selector: "setCurrent:",
370
444
  category: 'accessing',
371
445
  fn: function (anHandler){
372
446
  var self=this;
373
- (self['@current']=anHandler);
374
- return self;},
447
+ self["@current"]=anHandler;
448
+ return self},
375
449
  args: ["anHandler"],
376
450
  source: "setCurrent: anHandler\x0a\x09current := anHandler",
377
451
  messageSends: [],