- renamed js files to match the class category name

- Moved examples classes in the Examples category
- New object inspector
- Added a commit button to the class browser
- updated the css file

css/jtalk.css

@@ -141,7 +141,7 @@ body.jtalkBody {
     font-size: 12px;
 }
 
-.jtalkTool ul.jt_column {
+.jtalkTool .jt_column {
     width: 24%;
     padding: 0;
     margin: 0;
@@ -155,36 +155,41 @@ body.jtalkBody {
     top: 0;
 }
 
-.jtalkTool ul.jt_column.categories {
+.jtalkTool .jt_column.value {
+    left: 25.2%;
+    width: 74.8%;
+}
+
+.jtalkTool .jt_column.categories {
     left: 0%;
     height: 105px;
 }
 
-.jtalkTool ul.jt_column.classes {
+.jtalkTool .jt_column.classes {
     height: 105px;
     left: 25.2%
 }
 
-.jtalkTool ul.jt_column.protocols {
+.jtalkTool .jt_column.protocols {
     left: 50.4%
 }
 
-.jtalkTool ul.jt_column.methods {
+.jtalkTool .jt_column.methods {
     left: 75.6%
 }
 
-.jtalkTool ul.jt_column li {
+.jtalkTool .jt_column li {
     list-style-type: none;
     padding-left: 5px;
     cursor: pointer;
 }
 
-.jtalkTool ul.jt_column li.selected {
+.jtalkTool .jt_column li.selected {
 	background: #e3e3e3;
 	color: #222;
 }
 
-.jtalkTool ul.jt_column li:hover {
+.jtalkTool .jt_column li:hover {
     background: #08c;
     color: white;
 }

js/Examples.js

@@ -0,0 +1,698 @@
+smalltalk.addClass('Counter', smalltalk.Widget, ['count'], 'Examples');
+smalltalk.addMethod(
+'_initialize',
+smalltalk.method({
+selector: 'initialize',
+category: 'initialization',
+fn: function () {
+    var self = this;
+    self.klass.superclass.fn.prototype._initialize.apply(self, []);
+    self['@count'] = 0;
+    return self;
+},
+source: unescape('initialize%0A%20%20%20%20super%20initialize.%0A%20%20%20%20count%20%3A%3D%200%0A')}),
+smalltalk.Counter);
+
+smalltalk.addMethod(
+'_renderOn_',
+smalltalk.method({
+selector: 'renderOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    html._h1()._with_(self['@count']._asString());
+    (function ($rec) {$rec._with_(unescape("++"));return $rec._onClick_(function () {return self._increase();});}(html._button()));
+    (function ($rec) {$rec._with_(unescape("--"));return $rec._onClick_(function () {return self._decrease();});}(html._button()));
+    return self;
+},
+source: unescape('renderOn%3A%20html%0A%20%20%20%20html%20h1%20with%3A%20count%20asString.%0A%20%20%20%20html%20button%0A%09with%3A%20%27++%27%3B%0A%09onClick%3A%20%5Bself%20increase%5D.%0A%20%20%20%20html%20button%0A%09with%3A%20%27--%27%3B%0A%09onClick%3A%20%5Bself%20decrease%5D%0A')}),
+smalltalk.Counter);
+
+smalltalk.addMethod(
+'_increase',
+smalltalk.method({
+selector: 'increase',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@count'] = self['@count'].__plus(1);
+    self._update();
+    return self;
+},
+source: unescape('increase%0A%20%20%20%20count%20%3A%3D%20count%20+%201.%0A%20%20%20%20self%20update%0A')}),
+smalltalk.Counter);
+
+smalltalk.addMethod(
+'_decrease',
+smalltalk.method({
+selector: 'decrease',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@count'] = self['@count'].__minus(1);
+    self._update();
+    return self;
+},
+source: unescape('decrease%0A%20%20%20%20count%20%3A%3D%20count%20-%201.%0A%20%20%20%20self%20update%0A')}),
+smalltalk.Counter);
+
+
+
+smalltalk.addClass('Tetris', smalltalk.Widget, ['renderingContext', 'timer', 'speed', 'score', 'rows', 'movingPiece'], 'Examples');
+smalltalk.addMethod(
+'_renderOn_',
+smalltalk.method({
+selector: 'renderOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._class_("tetris");return $rec._with_(function () {html._h3()._with_("Tetris");self._renderCanvasOn_(html);return self._renderButtonsOn_(html);});}(html._div()));
+    return self;
+},
+source: unescape('renderOn%3A%20html%0A%09html%20div%0A%09%09class%3A%20%27tetris%27%3B%0A%09%09with%3A%20%5B%0A%09%09%09html%20h3%20with%3A%20%27Tetris%27.%0A%09%09%09self%20renderCanvasOn%3A%20html.%0A%09%09%09self%20renderButtonsOn%3A%20html%5D')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_renderCanvasOn_',
+smalltalk.method({
+selector: 'renderCanvasOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    var canvas = nil;
+    canvas = html._canvas();
+    canvas._at_put_("width", self._width()._asString());
+    canvas._at_put_("height", self._height()._asString());
+    self['@renderingContext'] = smalltalk.CanvasRenderingContext._tagBrush_(canvas);
+    self._redraw();
+    return self;
+},
+source: unescape('renderCanvasOn%3A%20html%0A%09%7C%20canvas%20%7C%0A%09canvas%20%3A%3D%20html%20canvas.%0A%09canvas%20at%3A%20%27width%27%20put%3A%20self%20width%20asString.%0A%09canvas%20at%3A%20%27height%27%20put%3A%20self%20height%20asString.%0A%09renderingContext%20%3A%3D%20CanvasRenderingContext%20tagBrush%3A%20canvas.%0A%09self%20redraw')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_renderButtonsOn_',
+smalltalk.method({
+selector: 'renderButtonsOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._class_("tetris_buttons");return $rec._with_(function () {(function ($rec) {$rec._with_("New game");return $rec._onClick_(function () {return self._startNewGame();});}(html._button()));return function ($rec) {$rec._with_(unescape("play/pause"));return $rec._onClick_(function () {return self._update();});}(html._button());});}(html._div()));
+    return self;
+},
+source: unescape('renderButtonsOn%3A%20html%0A%09html%20div%20%0A%09%09class%3A%20%27tetris_buttons%27%3B%0A%09%09with%3A%20%5B%0A%09%09%09html%20button%0A%09%09%09%09with%3A%20%27New%20game%27%3B%0A%09%09%09%09onClick%3A%20%5Bself%20startNewGame%5D.%0A%09%09%09html%20button%0A%09%09%09%09with%3A%20%27play/pause%27%3B%0A%09%09%09%09onClick%3A%20%5Bself%20update%5D%5D')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_initialize',
+smalltalk.method({
+selector: 'initialize',
+category: 'initialization',
+fn: function () {
+    var self = this;
+    self.klass.superclass.fn.prototype._initialize.apply(self, []);
+    self._newGame();
+    return self;
+},
+source: unescape('initialize%0A%09super%20initialize.%0A%09self%20newGame')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_startNewGame',
+smalltalk.method({
+selector: 'startNewGame',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self._newGame();
+    self['@timer']._ifNotNil_(function () {return self['@timer']._clearInterval();});
+    self['@timer'] = function () {return self._nextStep();}._valueWithInterval_(self['@speed']);
+    return self;
+},
+source: unescape('startNewGame%0A%09self%20newGame.%0A%09timer%20ifNotNil%3A%20%5Btimer%20clearInterval%5D.%0A%09timer%20%3A%3D%20%5Bself%20nextStep%5D%20valueWithInterval%3A%20speed')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_width',
+smalltalk.method({
+selector: 'width',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self._class()._width();
+    return self;
+},
+source: unescape('width%0A%09%5Eself%20class%20width')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_height',
+smalltalk.method({
+selector: 'height',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self._class()._height();
+    return self;
+},
+source: unescape('height%0A%09%5Eself%20class%20height')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_nextStep',
+smalltalk.method({
+selector: 'nextStep',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@movingPiece']._ifNil_(function () {return self._newPiece();});
+    self['@movingPiece']._canMoveIn_(self)._ifTrue_ifFalse_(function () {return self['@movingPiece']._position_(self['@movingPiece']._position().__plus((0).__at(1)));}, function () {return self._newPiece();});
+    self._redraw();
+    return self;
+},
+source: unescape('nextStep%0A%09movingPiece%20ifNil%3A%20%5Bself%20newPiece%5D.%0A%09%28movingPiece%20canMoveIn%3A%20self%29%0A%09%09ifTrue%3A%20%5BmovingPiece%20position%3A%20movingPiece%20position%20+%20%280@1%29%5D%0A%09%09ifFalse%3A%20%5Bself%20newPiece%5D.%0A%09self%20redraw%0A%09')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_redraw',
+smalltalk.method({
+selector: 'redraw',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@renderingContext']._clearRectFrom_to_((0).__at(self._width()), (0).__at(self._height()));
+    (function ($rec) {$rec._drawMap();return $rec._drawPiece();}(self));
+    return self;
+},
+source: unescape('redraw%0A%09renderingContext%20clearRectFrom%3A%200@%20self%20width%20to%3A%200@%20self%20height.%0A%09self%20%0A%09%09drawMap%3B%0A%09%09drawPiece')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_drawMap',
+smalltalk.method({
+selector: 'drawMap',
+category: 'actions',
+fn: function () {
+    var self = this;
+    (function ($rec) {$rec._fillStyle_(unescape("%23fafafa"));return $rec._fillRectFrom_to_((0).__at(0), self._width().__at(self._height()));}(self['@renderingContext']));
+    (function ($rec) {$rec._lineWidth_(0.5);return $rec._strokeStyle_(unescape("%23999"));}(self['@renderingContext']));
+    (0)._to_do_(self._class()._squares()._x(), function (each) {var x = nil;x = each.__star(self._class()._squareSize());return self._drawLineFrom_to_(x.__at(0), x.__at(self._height()));});
+    (0)._to_do_(self._class()._squares()._y(), function (each) {var y = nil;y = each.__star(self._class()._squareSize());return self._drawLineFrom_to_((0).__at(y), self._width().__at(y));});
+    return self;
+},
+source: unescape('drawMap%0A%09renderingContext%20%0A%09%09fillStyle%3A%20%27%23fafafa%27%3B%0A%09%09fillRectFrom%3A%200@0%20to%3A%20self%20width@self%20height.%0A%09renderingContext%20%0A%09%09lineWidth%3A%200.5%3B%0A%09%09strokeStyle%3A%20%27%23999%27.%0A%090%20to%3A%20self%20class%20squares%20x%20do%3A%20%5B%3Aeach%20%7C%20%7C%20x%20%7C%0A%09%09x%20%3A%3D%20each%20*%20self%20class%20squareSize.%0A%09%09self%20drawLineFrom%3A%20x@0%20to%3A%20x@self%20height%5D.%0A%090%20to%3A%20self%20class%20squares%20y%20do%3A%20%5B%3Aeach%20%7C%20%7C%20y%20%7C%0A%09%09y%20%3A%3D%20each%20*%20self%20class%20squareSize.%0A%09%09self%20drawLineFrom%3A%200@y%20to%3A%20self%20width@y%5D.')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_drawLineFrom_to_',
+smalltalk.method({
+selector: 'drawLineFrom:to:',
+category: 'actions',
+fn: function (aPoint, anotherPoint) {
+    var self = this;
+    (function ($rec) {$rec._beginPath();$rec._moveTo_(aPoint);$rec._lineTo_(anotherPoint);return $rec._stroke();}(self['@renderingContext']));
+    return self;
+},
+source: unescape('drawLineFrom%3A%20aPoint%20to%3A%20anotherPoint%0A%09renderingContext%20%0A%09%09beginPath%3B%0A%09%09moveTo%3A%20aPoint%3B%0A%09%09lineTo%3A%20anotherPoint%3B%0A%09%09stroke')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_newGame',
+smalltalk.method({
+selector: 'newGame',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@rows'] = [];
+    self['@movingPiece'] = nil;
+    self['@speed'] = 200;
+    self['@score'] = 0;
+    return self;
+},
+source: unescape('newGame%0A%09rows%20%3A%3D%20%23%28%29.%0A%09movingPiece%20%3A%3D%20nil.%0A%09speed%20%3A%3D%20200.%0A%09score%20%3A%3D%200')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_newPiece',
+smalltalk.method({
+selector: 'newPiece',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@movingPiece'] = smalltalk.TetrisPiece._atRandom();
+    return self;
+},
+source: unescape('newPiece%0A%09movingPiece%20%3A%3D%20TetrisPiece%20atRandom')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_squares',
+smalltalk.method({
+selector: 'squares',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self._class()._squares();
+    return self;
+},
+source: unescape('squares%0A%09%5Eself%20class%20squares')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_gluePiece_',
+smalltalk.method({
+selector: 'gluePiece:',
+category: 'accessing',
+fn: function (aPiece) {
+    var self = this;
+    aPiece._glueOn_(self);
+    return self;
+},
+source: unescape('gluePiece%3A%20aPiece%0A%09aPiece%20glueOn%3A%20self%0A%09')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_drawRows',
+smalltalk.method({
+selector: 'drawRows',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self._rows()._do_(function (each) {return nil;});
+    self['@movingPiece']._ifNotNil_(function () {return self['@movingPiece']._drawOn_(self['@renderingContext']);});
+    return self;
+},
+source: unescape('drawRows%0A%09self%20rows%20do%3A%20%5B%3Aeach%20%7C%5D.%0A%09movingPiece%20ifNotNil%3A%20%5BmovingPiece%20drawOn%3A%20renderingContext%5D')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_drawPiece',
+smalltalk.method({
+selector: 'drawPiece',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@movingPiece']._ifNotNil_(function () {return self['@movingPiece']._drawOn_(self['@renderingContext']);});
+    return self;
+},
+source: unescape('drawPiece%0A%09movingPiece%20ifNotNil%3A%20%5B%0A%09%09movingPiece%20drawOn%3A%20renderingContext%5D')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_rows',
+smalltalk.method({
+selector: 'rows',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@rows'];
+    return self;
+},
+source: unescape('rows%0A%09%22An%20array%20of%20rows.%20Each%20row%20is%20a%20collection%20of%20points.%22%0A%09%5Erows')}),
+smalltalk.Tetris);
+
+smalltalk.addMethod(
+'_addRow_',
+smalltalk.method({
+selector: 'addRow:',
+category: 'accessing',
+fn: function (aCollection) {
+    var self = this;
+    self._rows()._add_(aCollection);
+    return self;
+},
+source: unescape('addRow%3A%20aCollection%0A%09self%20rows%20add%3A%20aCollection')}),
+smalltalk.Tetris);
+
+
+smalltalk.addMethod(
+'_squareSize',
+smalltalk.method({
+selector: 'squareSize',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return 22;
+    return self;
+},
+source: unescape('squareSize%0A%09%5E22')}),
+smalltalk.Tetris.klass);
+
+smalltalk.addMethod(
+'_width',
+smalltalk.method({
+selector: 'width',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self._squareSize().__star(self._squares()._x());
+    return self;
+},
+source: unescape('width%0A%09%5Eself%20squareSize%20*%20%28self%20squares%20x%29')}),
+smalltalk.Tetris.klass);
+
+smalltalk.addMethod(
+'_height',
+smalltalk.method({
+selector: 'height',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self._squareSize().__star(self._squares()._y());
+    return self;
+},
+source: unescape('height%0A%09%5Eself%20squareSize%20*%20%28self%20squares%20y%29')}),
+smalltalk.Tetris.klass);
+
+smalltalk.addMethod(
+'_squares',
+smalltalk.method({
+selector: 'squares',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return (10).__at(15);
+    return self;
+},
+source: unescape('squares%0A%09%5E10@15')}),
+smalltalk.Tetris.klass);
+
+
+smalltalk.addClass('TetrisPiece', smalltalk.Widget, ['rotation', 'position'], 'Examples');
+smalltalk.addMethod(
+'_drawOn_',
+smalltalk.method({
+selector: 'drawOn:',
+category: 'drawing',
+fn: function (aRenderingContext) {
+    var self = this;
+    aRenderingContext._fillStyle_(self._color());
+    self._bounds()._do_(function (each) {return function ($rec) {$rec._fillRectFrom_to_(each.__plus(self._position()).__star(smalltalk.Tetris._squareSize()), (1).__at(1).__star(smalltalk.Tetris._squareSize()));$rec._strokeStyle_(unescape("%23999"));$rec._lineWidth_(2);return $rec._strokeRectFrom_to_(each.__plus(self._position()).__star(smalltalk.Tetris._squareSize()), (1).__at(1).__star(smalltalk.Tetris._squareSize()));}(aRenderingContext);});
+    return self;
+},
+source: unescape('drawOn%3A%20aRenderingContext%0A%09aRenderingContext%20fillStyle%3A%20self%20color.%0A%09self%20bounds%20do%3A%20%5B%3Aeach%20%7C%0A%09%09aRenderingContext%20%0A%09%09%09fillRectFrom%3A%20each%20+%20self%20position*%20Tetris%20squareSize%20to%3A%201@1%20*%20Tetris%20squareSize%3B%0A%09%09%09strokeStyle%3A%20%27%23999%27%3B%0A%09%09%09lineWidth%3A%202%3B%0A%09%09%09strokeRectFrom%3A%20each%20+%20self%20position*%20Tetris%20squareSize%20to%3A%201@1%20*%20Tetris%20squareSize%5D')}),
+smalltalk.TetrisPiece);
+
+smalltalk.addMethod(
+'_rotation',
+smalltalk.method({
+selector: 'rotation',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@rotation']._ifNil_(function () {return self['@rotation'] = 1;});
+    return self;
+},
+source: unescape('rotation%0A%09%5Erotation%20ifNil%3A%20%5Brotation%20%3A%3D%201%5D')}),
+smalltalk.TetrisPiece);
+
+smalltalk.addMethod(
+'_rotation_',
+smalltalk.method({
+selector: 'rotation:',
+category: 'accessing',
+fn: function (aNumber) {
+    var self = this;
+    self['@rotation'] = aNumber;
+    return self;
+},
+source: unescape('rotation%3A%20aNumber%0A%09rotation%20%3A%3D%20aNumber')}),
+smalltalk.TetrisPiece);
+
+smalltalk.addMethod(
+'_position',
+smalltalk.method({
+selector: 'position',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@position']._ifNil_(function () {return smalltalk.Tetris._squares()._x().__slash(2).__minus(1).__at(0);});
+    return self;
+},
+source: unescape('position%0A%09%5Eposition%20ifNil%3A%20%5B%28Tetris%20squares%20x%20/%202%29%20-1%20@%200%5D')}),
+smalltalk.TetrisPiece);
+
+smalltalk.addMethod(
+'_position_',
+smalltalk.method({
+selector: 'position:',
+category: 'accessing',
+fn: function (aPoint) {
+    var self = this;
+    return self['@position'] = aPoint;
+    return self;
+},
+source: unescape('position%3A%20aPoint%0A%09%5Eposition%20%3A%3D%20aPoint')}),
+smalltalk.TetrisPiece);
+
+smalltalk.addMethod(
+'_bounds',
+smalltalk.method({
+selector: 'bounds',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    self._subclassResponsibility();
+    return self;
+},
+source: unescape('bounds%0A%09self%20subclassResponsibility')}),
+smalltalk.TetrisPiece);
+
+smalltalk.addMethod(
+'_color',
+smalltalk.method({
+selector: 'color',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return unescape("%23afa");
+    return self;
+},
+source: unescape('color%0A%09%5E%27%23afa%27')}),
+smalltalk.TetrisPiece);
+
+smalltalk.addMethod(
+'_canMove',
+smalltalk.method({
+selector: 'canMove',
+category: 'testing',
+fn: function () {
+    var self = this;
+    return self._position()._y().__lt(smalltalk.Tetris._squares()._y().__minus(self._height()));
+    return self;
+},
+source: unescape('canMove%0A%09%5Eself%20position%20y%20%3C%20%28Tetris%20squares%20y%20-%20self%20height%29')}),
+smalltalk.TetrisPiece);
+
+smalltalk.addMethod(
+'_height',
+smalltalk.method({
+selector: 'height',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return 2;
+    return self;
+},
+source: unescape('height%0A%09%5E2')}),
+smalltalk.TetrisPiece);
+
+smalltalk.addMethod(
+'_canMoveIn_',
+smalltalk.method({
+selector: 'canMoveIn:',
+category: 'testing',
+fn: function (aTetris) {
+    var self = this;
+    return self._position()._y().__lt(aTetris._squares()._y().__minus(self._height()));
+    return self;
+},
+source: unescape('canMoveIn%3A%20aTetris%0A%09%5Eself%20position%20y%20%3C%20%28aTetris%20squares%20y%20-%20self%20height%29')}),
+smalltalk.TetrisPiece);
+
+
+smalltalk.addMethod(
+'_atRandom',
+smalltalk.method({
+selector: 'atRandom',
+category: 'instance creation',
+fn: function () {
+    var self = this;
+    return self._subclasses()._at_(self._subclasses()._size()._atRandom())._new();
+    return self;
+},
+source: unescape('atRandom%0A%09%5E%28self%20subclasses%20at%3A%20self%20subclasses%20size%20atRandom%29%20new')}),
+smalltalk.TetrisPiece.klass);
+
+
+smalltalk.addClass('TetrisPieceO', smalltalk.TetrisPiece, [], 'Examples');
+smalltalk.addMethod(
+'_bounds',
+smalltalk.method({
+selector: 'bounds',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return function ($rec) {$rec._add_((0).__at(0));$rec._add_((0).__at(1));$rec._add_((1).__at(0));$rec._add_((1).__at(1));return $rec._yourself();}(smalltalk.Array._new());
+    return self;
+},
+source: unescape('bounds%0A%09%5EArray%20new%0A%09%09add%3A%200@0%3B%0A%09%09add%3A%200@1%3B%0A%09%09add%3A%201@0%3B%0A%09%09add%3A%201@1%3B%0A%09%09yourself')}),
+smalltalk.TetrisPieceO);
+
+
+
+smalltalk.addClass('TetrisPieceL', smalltalk.TetrisPiece, [], 'Examples');
+smalltalk.addMethod(
+'_bounds',
+smalltalk.method({
+selector: 'bounds',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return function ($rec) {$rec._add_((0).__at(0));$rec._add_((0).__at(1));$rec._add_((0).__at(2));$rec._add_((1).__at(2));return $rec._yourself();}(smalltalk.Array._new());
+    return self;
+},
+source: unescape('bounds%0A%09%5EArray%20new%0A%09%09add%3A%200@0%3B%0A%09%09add%3A%200@1%3B%0A%09%09add%3A%200@2%3B%0A%09%09add%3A%201@2%3B%0A%09%09yourself')}),
+smalltalk.TetrisPieceL);
+
+smalltalk.addMethod(
+'_color',
+smalltalk.method({
+selector: 'color',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return unescape("%23ffa");
+    return self;
+},
+source: unescape('color%0A%09%5E%27%23ffa%27')}),
+smalltalk.TetrisPieceL);
+
+smalltalk.addMethod(
+'_height',
+smalltalk.method({
+selector: 'height',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return 3;
+    return self;
+},
+source: unescape('height%0A%09%5E3')}),
+smalltalk.TetrisPieceL);
+
+
+
+smalltalk.addClass('TetrisPieceJ', smalltalk.TetrisPiece, [], 'Examples');
+smalltalk.addMethod(
+'_color',
+smalltalk.method({
+selector: 'color',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return unescape("%23aaf");
+    return self;
+},
+source: unescape('color%0A%09%5E%27%23aaf%27')}),
+smalltalk.TetrisPieceJ);
+
+smalltalk.addMethod(
+'_bounds',
+smalltalk.method({
+selector: 'bounds',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return function ($rec) {$rec._add_((1).__at(0));$rec._add_((1).__at(1));$rec._add_((1).__at(2));$rec._add_((0).__at(2));return $rec._yourself();}(smalltalk.Array._new());
+    return self;
+},
+source: unescape('bounds%0A%09%5EArray%20new%0A%09%09add%3A%201@0%3B%0A%09%09add%3A%201@1%3B%0A%09%09add%3A%201@2%3B%0A%09%09add%3A%200@2%3B%0A%09%09yourself')}),
+smalltalk.TetrisPieceJ);
+
+smalltalk.addMethod(
+'_height',
+smalltalk.method({
+selector: 'height',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return 3;
+    return self;
+},
+source: unescape('height%0A%09%5E3')}),
+smalltalk.TetrisPieceJ);
+
+
+
+smalltalk.addClass('TetrisPieceI', smalltalk.TetrisPiece, [], 'Examples');
+smalltalk.addMethod(
+'_color',
+smalltalk.method({
+selector: 'color',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return unescape("%23faa");
+    return self;
+},
+source: unescape('color%0A%09%5E%27%23faa%27')}),
+smalltalk.TetrisPieceI);
+
+smalltalk.addMethod(
+'_bounds',
+smalltalk.method({
+selector: 'bounds',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return function ($rec) {$rec._add_((0).__at(0));$rec._add_((0).__at(1));$rec._add_((0).__at(2));$rec._add_((0).__at(3));return $rec._yourself();}(smalltalk.Array._new());
+    return self;
+},
+source: unescape('bounds%0A%09%5EArray%20new%0A%09%09add%3A%200@0%3B%0A%09%09add%3A%200@1%3B%0A%09%09add%3A%200@2%3B%0A%09%09add%3A%200@3%3B%0A%09%09yourself')}),
+smalltalk.TetrisPieceI);
+
+smalltalk.addMethod(
+'_height',
+smalltalk.method({
+selector: 'height',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return 4;
+    return self;
+},
+source: unescape('height%0A%09%5E4')}),
+smalltalk.TetrisPieceI);
+
+
+
+smalltalk.addClass('TetrisPieceT', smalltalk.TetrisPiece, [], 'Examples');
+smalltalk.addMethod(
+'_bounds',
+smalltalk.method({
+selector: 'bounds',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return function ($rec) {$rec._add_((0).__at(0));$rec._add_((1).__at(0));$rec._add_((2).__at(0));$rec._add_((1).__at(1));return $rec._yourself();}(smalltalk.Array._new());
+    return self;
+},
+source: unescape('bounds%0A%09%5EArray%20new%0A%09%09add%3A%200@0%3B%0A%09%09add%3A%201@0%3B%0A%09%09add%3A%202@0%3B%0A%09%09add%3A%201@1%3B%0A%09%09yourself')}),
+smalltalk.TetrisPieceT);
+
+smalltalk.addMethod(
+'_color',
+smalltalk.method({
+selector: 'color',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return unescape("%23aaf");
+    return self;
+},
+source: unescape('color%0A%09%5E%27%23aaf%27')}),
+smalltalk.TetrisPieceT);
+
+
+

js/IDE.js

@@ -0,0 +1,1732 @@
+smalltalk.addClass('TabManager', smalltalk.Widget, ['selectedTab', 'tabs', 'opened'], 'IDE');
+smalltalk.addMethod(
+'_initialize',
+smalltalk.method({
+selector: 'initialize',
+category: 'initialization',
+fn: function () {
+    var self = this;
+    self.klass.superclass.fn.prototype._initialize.apply(self, []);
+    self['@opened'] = true;
+    (function ($rec) {$rec._append_(self);$rec._append_(function (html) {return html._div()._id_("jtalk");});return $rec._addClass_("jtalkBody");}("body"._asJQuery()));
+    (function ($rec) {$rec._addTab_(smalltalk.Transcript._current());return $rec._addTab_(smalltalk.Workspace._new());}(self));
+    self._selectTab_(self._tabs()._last());
+    (function ($rec) {$rec._onResize_(function () {return function ($rec) {$rec._updateBodyMargin();return $rec._updatePosition();}(self);});return $rec._onWindowResize_(function () {return self._updatePosition();});}(self));
+    return self;
+},
+source: unescape('initialize%0A%20%20%20%20super%20initialize.%0A%20%20%20%20opened%20%3A%3D%20true.%0A%20%20%20%20%27body%27%20asJQuery%20%0A%09append%3A%20self%3B%0A%09append%3A%20%5B%3Ahtml%20%7C%20html%20div%20id%3A%20%27jtalk%27%5D%3B%0A%09addClass%3A%20%27jtalkBody%27.%0A%20%20%20%20self%20%0A%09addTab%3A%20Transcript%20current%3B%0A%09addTab%3A%20Workspace%20new.%0A%20%20%20%20self%20selectTab%3A%20self%20tabs%20last.%0A%20%20%20%20self%20%0A%09onResize%3A%20%5Bself%20updateBodyMargin%3B%20updatePosition%5D%3B%0A%09onWindowResize%3A%20%5Bself%20updatePosition%5D%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_tabs',
+smalltalk.method({
+selector: 'tabs',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@tabs']._ifNil_(function () {return self['@tabs'] = smalltalk.Array._new();});
+    return self;
+},
+source: unescape('tabs%0A%20%20%20%20%5Etabs%20ifNil%3A%20%5Btabs%20%3A%3D%20Array%20new%5D%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_addTab_',
+smalltalk.method({
+selector: 'addTab:',
+category: 'adding/Removing',
+fn: function (aWidget) {
+    var self = this;
+    self._tabs()._add_(aWidget);
+    unescape("%23jtalk")._asJQuery()._append_(aWidget);
+    aWidget._root()._asJQuery()._hide();
+    return self;
+},
+source: unescape('addTab%3A%20aWidget%0A%20%20%20%20self%20tabs%20add%3A%20aWidget.%0A%20%20%20%20%27%23jtalk%27%20asJQuery%20append%3A%20aWidget.%0A%20%20%20%20aWidget%20root%20asJQuery%20hide%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_removeTab_',
+smalltalk.method({
+selector: 'removeTab:',
+category: 'adding/Removing',
+fn: function (aWidget) {
+    var self = this;
+    self._tabs()._remove_(aWidget);
+    self._update();
+    return self;
+},
+source: unescape('removeTab%3A%20aWidget%0A%20%20%20%20self%20tabs%20remove%3A%20aWidget.%0A%20%20%20%20self%20update%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_updateBodyMargin',
+smalltalk.method({
+selector: 'updateBodyMargin',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self._setBodyMargin_(unescape("%23jtalk")._asJQuery()._height().__plus(27));
+    return self;
+},
+source: unescape('updateBodyMargin%0A%20%20%20%20self%20setBodyMargin%3A%20%27%23jtalk%27%20asJQuery%20height%20+%2027%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_updatePosition',
+smalltalk.method({
+selector: 'updatePosition',
+category: 'actions',
+fn: function () {
+    var self = this;
+    (function () {jQuery("#jtalk").css("top", "").css("bottom", "27px");}());
+    return self;
+},
+source: unescape('updatePosition%0A%20%20%20%20%7B%27jQuery%28%27%27%23jtalk%27%27%29.css%28%27%27top%27%27%2C%20%27%27%27%27%27%27%29.css%28%27%27bottom%27%27%2C%20%27%2727px%27%27%29%3B%27%7D%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_removeBodyMargin',
+smalltalk.method({
+selector: 'removeBodyMargin',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self._setBodyMargin_(0);
+    return self;
+},
+source: unescape('removeBodyMargin%0A%20%20%20%20self%20setBodyMargin%3A%200%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_setBodyMargin_',
+smalltalk.method({
+selector: 'setBodyMargin:',
+category: 'actions',
+fn: function (anInteger) {
+    var self = this;
+    ".jtalkBody"._asJQuery()._cssAt_put_(unescape("margin-bottom"), anInteger._asString().__comma("px"));
+    return self;
+},
+source: unescape('setBodyMargin%3A%20anInteger%0A%20%20%20%20%27.jtalkBody%27%20asJQuery%20cssAt%3A%20%27margin-bottom%27%20put%3A%20anInteger%20asString%2C%20%27px%27%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_onResize_',
+smalltalk.method({
+selector: 'onResize:',
+category: 'actions',
+fn: function (aBlock) {
+    var self = this;
+    (function () {jQuery("#jtalk").resizable({handles: "n", resize: aBlock, minHeight: 230});}());
+    return self;
+},
+source: unescape('onResize%3A%20aBlock%0A%20%20%20%20%7B%27jQuery%28%27%27%23jtalk%27%27%29.resizable%28%7B%0A%09handles%3A%20%27%27n%27%27%2C%20%0A%09resize%3A%20aBlock%2C%0A%09minHeight%3A%20230%0A%7D%29%3B%27%7D%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_onWindowResize_',
+smalltalk.method({
+selector: 'onWindowResize:',
+category: 'actions',
+fn: function (aBlock) {
+    var self = this;
+    (function () {jQuery(window).resize(aBlock);}());
+    return self;
+},
+source: unescape('onWindowResize%3A%20aBlock%0A%20%20%20%20%7B%27jQuery%28window%29.resize%28aBlock%29%27%7D%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_open',
+smalltalk.method({
+selector: 'open',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@opened']._ifFalse_(function () {self._root()._asJQuery()._show();"body"._asJQuery()._addClass_("jtalkBody");unescape("%23jtalk")._asJQuery()._show();self._updateBodyMargin();self['@selectedTab']._root()._asJQuery()._show();return self['@opened'] = true;});
+    return self;
+},
+source: unescape('open%0A%20%20%20%20opened%20ifFalse%3A%20%5B%0A%09self%20root%20asJQuery%20show.%0A%09%27body%27%20asJQuery%20addClass%3A%20%27jtalkBody%27.%0A%09%27%23jtalk%27%20asJQuery%20show.%0A%09self%20updateBodyMargin.%0A%09selectedTab%20root%20asJQuery%20show.%0A%09opened%20%3A%3D%20true%5D%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_close',
+smalltalk.method({
+selector: 'close',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@opened']._ifTrue_(function () {self._root()._asJQuery()._hide();unescape("%23jtalk")._asJQuery()._hide();self._removeBodyMargin();"body"._asJQuery()._removeClass_("jtalkBody");return self['@opened'] = false;});
+    return self;
+},
+source: unescape('close%0A%20%20%20%20opened%20ifTrue%3A%20%5B%0A%09self%20root%20asJQuery%20hide.%0A%09%27%23jtalk%27%20asJQuery%20hide.%0A%09self%20removeBodyMargin.%0A%09%27body%27%20asJQuery%20removeClass%3A%20%27jtalkBody%27.%0A%09opened%20%3A%3D%20false%5D%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_newBrowserTab',
+smalltalk.method({
+selector: 'newBrowserTab',
+category: 'actions',
+fn: function () {
+    var self = this;
+    smalltalk.Browser._open();
+    return self;
+},
+source: unescape('newBrowserTab%0A%20%20%20%20Browser%20open%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_selectTab_',
+smalltalk.method({
+selector: 'selectTab:',
+category: 'actions',
+fn: function (aWidget) {
+    var self = this;
+    self._open();
+    self['@selectedTab'] = aWidget;
+    self._tabs()._do_(function (each) {return each._root()._asJQuery()._hide();});
+    aWidget._root()._asJQuery()._show();
+    self._update();
+    return self;
+},
+source: unescape('selectTab%3A%20aWidget%0A%20%20%20%20self%20open.%0A%20%20%20%20selectedTab%20%3A%3D%20aWidget.%0A%20%20%20%20self%20tabs%20do%3A%20%5B%3Aeach%20%7C%0A%09each%20root%20asJQuery%20hide%5D.%0A%20%20%20%20aWidget%20root%20asJQuery%20show.%0A%20%20%20%20self%20update%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_closeTab_',
+smalltalk.method({
+selector: 'closeTab:',
+category: 'actions',
+fn: function (aWidget) {
+    var self = this;
+    self._removeTab_(aWidget);
+    self._selectTab_(self._tabs()._last());
+    aWidget._root()._asJQuery()._remove();
+    self._update();
+    return self;
+},
+source: unescape('closeTab%3A%20aWidget%0A%20%20%20%20self%20removeTab%3A%20aWidget.%0A%20%20%20%20self%20selectTab%3A%20self%20tabs%20last.%0A%20%20%20%20aWidget%20root%20asJQuery%20remove.%0A%20%20%20%20self%20update%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_renderOn_',
+smalltalk.method({
+selector: 'renderOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._id_("jtalkTabs");return $rec._with_(function () {(function ($rec) {$rec._class_("closeAll");$rec._with_("x");return $rec._onClick_(function () {return self._close();});}(html._li()));self._tabs()._do_(function (each) {return self._renderTabFor_on_(each, html);});return function ($rec) {$rec._class_("newtab");$rec._with_(unescape("%20+%20"));return $rec._onClick_(function () {return self._newBrowserTab();});}(html._li());});}(html._ul()));
+    return self;
+},
+source: unescape('renderOn%3A%20html%0A%20%20%20%20html%20ul%0A%09id%3A%20%27jtalkTabs%27%3B%0A%09with%3A%20%5B%0A%09%20%20%20%20html%20li%20%0A%09%09class%3A%20%27closeAll%27%3B%0A%09%09with%3A%20%27x%27%3B%0A%09%09onClick%3A%20%5Bself%20close%5D.%0A%09%20%20%20%20self%20tabs%20do%3A%20%5B%3Aeach%20%7C%0A%09%09self%20renderTabFor%3A%20each%20on%3A%20html%5D.%0A%09%20%20%20%20html%20li%0A%09%09class%3A%20%27newtab%27%3B%0A%09%09with%3A%20%27%20+%20%27%3B%0A%09%09onClick%3A%20%5Bself%20newBrowserTab%5D%5D%0A')}),
+smalltalk.TabManager);
+
+smalltalk.addMethod(
+'_renderTabFor_on_',
+smalltalk.method({
+selector: 'renderTabFor:on:',
+category: 'rendering',
+fn: function (aWidget, html) {
+    var self = this;
+    var li = nil;
+    li = html._li();
+    self['@selectedTab'].__eq(aWidget)._ifTrue_(function () {return li._class_("selected");});
+    li._with_(function () {(function ($rec) {$rec._with_(aWidget._label());return $rec._onClick_(function () {return self._selectTab_(aWidget);});}(html._span()));return aWidget._canBeClosed()._ifTrue_(function () {return function ($rec) {$rec._class_("close");$rec._with_("x");return $rec._onClick_(function () {return self._closeTab_(aWidget);});}(html._span());});});
+    return self;
+},
+source: unescape('renderTabFor%3A%20aWidget%20on%3A%20html%0A%20%20%20%20%7C%20li%20%7C%0A%20%20%20%20li%20%3A%3D%20html%20li.%0A%20%20%20%20selectedTab%20%3D%20aWidget%20ifTrue%3A%20%5B%0A%09li%20class%3A%20%27selected%27%5D.%0A%20%20%20%20li%20with%3A%20%5B%0A%09html%20span%0A%09%20%20%20%20with%3A%20aWidget%20label%3B%0A%09%20%20%20%20onClick%3A%20%5Bself%20selectTab%3A%20aWidget%5D.%0A%09aWidget%20canBeClosed%20ifTrue%3A%20%5B%0A%09%20%20%20%20html%20span%20%0A%09%09class%3A%20%27close%27%3B%0A%09%09with%3A%20%27x%27%3B%0A%09%09onClick%3A%20%5Bself%20closeTab%3A%20aWidget%5D%5D%5D%0A')}),
+smalltalk.TabManager);
+
+
+smalltalk.TabManager.klass.iVarNames = ['current'];
+smalltalk.addMethod(
+'_current',
+smalltalk.method({
+selector: 'current',
+category: 'instance creation',
+fn: function () {
+    var self = this;
+    return self['@current']._ifNil_(function () {return self['@current'] = self.klass.superclass.fn.prototype._new.apply(self, []);});
+    return self;
+},
+source: unescape('current%0A%20%20%20%20%5Ecurrent%20ifNil%3A%20%5Bcurrent%20%3A%3D%20super%20new%5D%0A')}),
+smalltalk.TabManager.klass);
+
+smalltalk.addMethod(
+'_new',
+smalltalk.method({
+selector: 'new',
+category: 'instance creation',
+fn: function () {
+    var self = this;
+    self._shouldNotImplement();
+    return self;
+},
+source: unescape('new%0A%20%20%20%20self%20shouldNotImplement%0A')}),
+smalltalk.TabManager.klass);
+
+
+smalltalk.addClass('TabWidget', smalltalk.Widget, [], 'IDE');
+smalltalk.addMethod(
+'_label',
+smalltalk.method({
+selector: 'label',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    self._subclassResponsibility();
+    return self;
+},
+source: unescape('label%0A%20%20%20%20self%20subclassResponsibility%0A')}),
+smalltalk.TabWidget);
+
+smalltalk.addMethod(
+'_open',
+smalltalk.method({
+selector: 'open',
+category: 'actions',
+fn: function () {
+    var self = this;
+    (function ($rec) {$rec._addTab_(self);return $rec._selectTab_(self);}(smalltalk.TabManager._current()));
+    return self;
+},
+source: unescape('open%0A%20%20%20%20TabManager%20current%0A%09addTab%3A%20self%3B%0A%09selectTab%3A%20self%0A')}),
+smalltalk.TabWidget);
+
+smalltalk.addMethod(
+'_canBeClosed',
+smalltalk.method({
+selector: 'canBeClosed',
+category: 'testing',
+fn: function () {
+    var self = this;
+    return false;
+    return self;
+},
+source: unescape('canBeClosed%0A%20%20%20%20%5Efalse%0A')}),
+smalltalk.TabWidget);
+
+smalltalk.addMethod(
+'_renderOn_',
+smalltalk.method({
+selector: 'renderOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._class_("jtalkTool");return $rec._with_(function () {(function ($rec) {$rec._class_("jt_box");return $rec._with_(function () {return self._renderBoxOn_(html);});}(html._div()));return function ($rec) {$rec._class_("jt_buttons");return $rec._with_(function () {return self._renderButtonsOn_(html);});}(html._div());});}(html._root()));
+    return self;
+},
+source: unescape('renderOn%3A%20html%0A%20%20%20%20html%20root%0A%09class%3A%20%27jtalkTool%27%3B%0A%09with%3A%20%5B%0A%09%20%20%20%20html%20div%0A%09%09class%3A%20%27jt_box%27%3B%0A%09%09with%3A%20%5Bself%20renderBoxOn%3A%20html%5D.%0A%09%20%20%20%20html%20div%0A%09%09class%3A%20%27jt_buttons%27%3B%0A%09%09with%3A%20%5Bself%20renderButtonsOn%3A%20html%5D%5D%0A')}),
+smalltalk.TabWidget);
+
+smalltalk.addMethod(
+'_renderBoxOn_',
+smalltalk.method({
+selector: 'renderBoxOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    return self;
+},
+source: unescape('renderBoxOn%3A%20html%0A')}),
+smalltalk.TabWidget);
+
+smalltalk.addMethod(
+'_renderButtonsOn_',
+smalltalk.method({
+selector: 'renderButtonsOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    return self;
+},
+source: unescape('renderButtonsOn%3A%20html%0A')}),
+smalltalk.TabWidget);
+
+
+smalltalk.addMethod(
+'_open',
+smalltalk.method({
+selector: 'open',
+category: 'instance creation',
+fn: function () {
+    var self = this;
+    return self._new()._open();
+    return self;
+},
+source: unescape('open%0A%20%20%20%20%5Eself%20new%20open%0A')}),
+smalltalk.TabWidget.klass);
+
+
+smalltalk.addClass('Workspace', smalltalk.TabWidget, ['textarea'], 'IDE');
+smalltalk.addMethod(
+'_label',
+smalltalk.method({
+selector: 'label',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return unescape("%5BWorkspace%5D");
+    return self;
+},
+source: unescape('label%0A%20%20%20%20%5E%27%5BWorkspace%5D%27%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_selection',
+smalltalk.method({
+selector: 'selection',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return function () {return document.selection;}();
+    return self;
+},
+source: unescape('selection%0A%20%20%20%20%5E%7B%27return%20document.selection%27%7D%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_selectionStart',
+smalltalk.method({
+selector: 'selectionStart',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return function () {return jQuery(".jt_workspace")[0].selectionStart;}();
+    return self;
+},
+source: unescape('selectionStart%0A%20%20%20%20%5E%7B%27return%20jQuery%28%27%27.jt_workspace%27%27%29%5B0%5D.selectionStart%27%7D%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_selectionEnd',
+smalltalk.method({
+selector: 'selectionEnd',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return function () {return jQuery(".jt_workspace")[0].selectionEnd;}();
+    return self;
+},
+source: unescape('selectionEnd%0A%20%20%20%20%5E%7B%27return%20jQuery%28%27%27.jt_workspace%27%27%29%5B0%5D.selectionEnd%27%7D%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_selectionStart_',
+smalltalk.method({
+selector: 'selectionStart:',
+category: 'accessing',
+fn: function (anInteger) {
+    var self = this;
+    (function () {jQuery(".jt_workspace")[0].selectionStart = anInteger;}());
+    return self;
+},
+source: unescape('selectionStart%3A%20anInteger%0A%20%20%20%20%7B%27jQuery%28%27%27.jt_workspace%27%27%29%5B0%5D.selectionStart%20%3D%20anInteger%27%7D%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_selectionEnd_',
+smalltalk.method({
+selector: 'selectionEnd:',
+category: 'accessing',
+fn: function (anInteger) {
+    var self = this;
+    (function () {jQuery(".jt_workspace")[0].selectionEnd = anInteger;}());
+    return self;
+},
+source: unescape('selectionEnd%3A%20anInteger%0A%20%20%20%20%7B%27jQuery%28%27%27.jt_workspace%27%27%29%5B0%5D.selectionEnd%20%3D%20anInteger%27%7D%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_currentLine',
+smalltalk.method({
+selector: 'currentLine',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    try {
+        var lines = nil;
+        var startLine = nil;
+        var endLine = nil;
+        lines = self['@textarea']._asJQuery()._val()._tokenize_(smalltalk.String._cr());
+        startLine = endLine = 0;
+        lines._do_(function (each) {endLine = startLine.__plus(each._size());startLine = endLine.__plus(1);return endLine.__gt_eq(self._selectionStart())._ifTrue_(function () {self._selectionEnd_(endLine);return function () {throw {name: "stReturn", selector: "_currentLine", fn: function () {return each;}};}();});});
+        return self;
+    } catch (e) {
+        if (e.name === "stReturn" && e.selector === "_currentLine") {
+            return e.fn();
+        }
+        throw e;
+    }
+},
+source: unescape('currentLine%0A%20%20%20%20%7C%20lines%20startLine%20endLine%7C%0A%20%20%20%20lines%20%3A%3D%20textarea%20asJQuery%20val%20tokenize%3A%20String%20cr.%0A%20%20%20%20startLine%20%3A%3D%20endLine%20%3A%3D%200.%0A%20%20%20%20lines%20do%3A%20%5B%3Aeach%20%7C%0A%09endLine%20%3A%3D%20startLine%20+%20each%20size.%0A%09startLine%20%3A%3D%20endLine%20+%201.%0A%09endLine%20%3E%3D%20self%20selectionStart%20ifTrue%3A%20%5B%0A%09%20%20%20%20self%20selectionEnd%3A%20endLine.%0A%09%20%20%20%20%5Eeach%5D%5D%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_handleKeyDown_',
+smalltalk.method({
+selector: 'handleKeyDown:',
+category: 'actions',
+fn: function (anEvent) {
+    var self = this;
+    return function () {if (anEvent.ctrlKey) {if (anEvent.keyCode === 68) {self._printIt();return false;}if (anEvent.keyCode === 80) {self._doIt();return false;}}}();
+    return self;
+},
+source: unescape('handleKeyDown%3A%20anEvent%0A%20%20%20%20%5E%7B%27if%28anEvent.ctrlKey%29%20%7B%0A%09%09if%28anEvent.keyCode%20%3D%3D%3D%2068%29%20%7B%20//ctrl+p%0A%09%09%09self._printIt%28%29%3B%0A%09%09%09return%20false%3B%0A%09%09%7D%0A%09%09if%28anEvent.keyCode%20%3D%3D%3D%2080%29%20%7B%20//ctrl+d%0A%09%09%09self._doIt%28%29%3B%0A%09%09%09return%20false%3B%0A%09%09%7D%0A%09%7D%27%7D%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_clearWorkspace',
+smalltalk.method({
+selector: 'clearWorkspace',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@textarea']._asJQuery()._val_("");
+    return self;
+},
+source: unescape('clearWorkspace%0A%20%20%20%20textarea%20asJQuery%20val%3A%20%27%27%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_doIt',
+smalltalk.method({
+selector: 'doIt',
+category: 'actions',
+fn: function () {
+    var self = this;
+    var selection = nil;
+    self['@textarea']._asJQuery()._focus();
+    self._selectionStart().__eq(self._selectionEnd())._ifTrue_ifFalse_(function () {return selection = self._currentLine();}, function () {return selection = self['@textarea']._asJQuery()._val()._copyFrom_to_(self._selectionStart().__plus(1), self._selectionEnd().__plus(1));});
+    return self._eval_(selection);
+    return self;
+},
+source: unescape('doIt%0A%20%20%20%20%7C%20selection%20%7C%0A%20%20%20%20textarea%20asJQuery%20focus.%0A%20%20%20%20self%20selectionStart%20%3D%20self%20selectionEnd%0A%09ifTrue%3A%20%5Bselection%20%3A%3D%20self%20currentLine%5D%0A%09ifFalse%3A%20%5B%0A%09%20%20%20%20selection%20%3A%3D%20textarea%20asJQuery%20val%20copyFrom%3A%20self%20selectionStart%20+%201%20to%3A%20self%20selectionEnd%20+%201%5D.%0A%20%20%20%20%5Eself%20eval%3A%20selection')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_printIt',
+smalltalk.method({
+selector: 'printIt',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self._print_(self._doIt()._printString());
+    return self;
+},
+source: unescape('printIt%0A%20%20%20%20self%20print%3A%20self%20doIt%20printString%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_print_',
+smalltalk.method({
+selector: 'print:',
+category: 'actions',
+fn: function (aString) {
+    var self = this;
+    var start = nil;
+    start = self._selectionEnd();
+    self['@textarea']._asJQuery()._val_(self['@textarea']._asJQuery()._val()._copyFrom_to_(1, start).__comma(" ").__comma(aString).__comma(" ").__comma(self['@textarea']._asJQuery()._val()._copyFrom_to_(start.__plus(1), self['@textarea']._asJQuery()._val()._size())));
+    self._selectionStart_(start);
+    self._selectionEnd_(start.__plus(aString._size()).__plus(2));
+    return self;
+},
+source: unescape('print%3A%20aString%0A%20%20%20%20%7C%20start%20%7C%0A%20%20%20%20start%20%3A%3D%20self%20selectionEnd.%0A%20%20%20%20textarea%20asJQuery%20val%3A%20%28%0A%09%28textarea%20asJQuery%20val%20copyFrom%3A%201%20to%3A%20start%29%2C%0A%09%27%20%27%2C%20aString%2C%20%27%20%27%2C%0A%09%28textarea%20asJQuery%20val%20copyFrom%3A%20start%20+%201%20to%3A%20textarea%20asJQuery%20val%20size%29%29.%0A%20%20%20%20self%20selectionStart%3A%20start.%0A%20%20%20%20self%20selectionEnd%3A%20start%20+%20aString%20size%20+%202%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_eval_',
+smalltalk.method({
+selector: 'eval:',
+category: 'actions',
+fn: function (aString) {
+    var self = this;
+    try {
+        var compiler = nil;
+        var node = nil;
+        compiler = smalltalk.Compiler._new();
+        node = compiler._parseExpression_(aString);
+        node._isParseFailure()._ifTrue_(function () {return function () {throw {name: "stReturn", selector: "_eval_", fn: function () {return self._alert_(node._reason().__comma(unescape("%2C%20position%3A%20")).__comma(node._position()));}};}();});
+        (function () {throw {name: "stReturn", selector: "_eval_", fn: function () {return compiler._loadExpression_(aString);}};}());
+        return self;
+    } catch (e) {
+        if (e.name === "stReturn" && e.selector === "_eval_") {
+            return e.fn();
+        }
+        throw e;
+    }
+},
+source: unescape('eval%3A%20aString%0A%20%20%20%20%7C%20compiler%20node%20%7C%0A%20%20%20%20compiler%20%3A%3D%20Compiler%20new.%0A%20%20%20%20node%20%3A%3D%20compiler%20parseExpression%3A%20aString.%0A%20%20%20%20node%20isParseFailure%20ifTrue%3A%20%5B%0A%09%5Eself%20alert%3A%20node%20reason%2C%20%27%2C%20position%3A%20%27%2C%20node%20position%5D.%0A%20%20%20%20%5Ecompiler%20loadExpression%3A%20aString%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_renderBoxOn_',
+smalltalk.method({
+selector: 'renderBoxOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    self['@textarea'] = html._textarea();
+    self['@textarea']._asJQuery()._call_("tabby");
+    self['@textarea']._onKeyDown_(function (e) {return self._handleKeyDown_(e);});
+    (function ($rec) {$rec._class_("jt_workspace");return $rec._at_put_("spellcheck", "false");}(self['@textarea']));
+    return self;
+},
+source: unescape('renderBoxOn%3A%20html%0A%20%20%20%20textarea%20%3A%3D%20html%20textarea.%0A%20%20%20%20textarea%20asJQuery%20call%3A%20%27tabby%27.%0A%20%20%20%20textarea%20onKeyDown%3A%20%5B%3Ae%20%7C%20self%20handleKeyDown%3A%20e%5D.%0A%20%20%20%20textarea%20%0A%09class%3A%20%27jt_workspace%27%3B%0A%09at%3A%20%27spellcheck%27%20put%3A%20%27false%27%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_renderButtonsOn_',
+smalltalk.method({
+selector: 'renderButtonsOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._with_("DoIt");$rec._title_(unescape("ctrl+d"));return $rec._onClick_(function () {return self._doIt();});}(html._button()));
+    (function ($rec) {$rec._with_("PrintIt");$rec._title_(unescape("ctrl+p"));return $rec._onClick_(function () {return self._printIt();});}(html._button()));
+    (function ($rec) {$rec._with_("InspectIt");$rec._title_(unescape("ctrl+i"));return $rec._onClick_(function () {return self._inspectIt();});}(html._button()));
+    (function ($rec) {$rec._with_("Clear workspace");return $rec._onClick_(function () {return self._clearWorkspace();});}(html._button()));
+    return self;
+},
+source: unescape('renderButtonsOn%3A%20html%0A%20%20%20%20html%20button%0A%09with%3A%20%27DoIt%27%3B%0A%09title%3A%20%27ctrl+d%27%3B%0A%09onClick%3A%20%5Bself%20doIt%5D.%0A%20%20%20%20html%20button%0A%09with%3A%20%27PrintIt%27%3B%0A%09title%3A%20%27ctrl+p%27%3B%0A%09onClick%3A%20%5Bself%20printIt%5D.%0A%20%20%20%20html%20button%0A%09with%3A%20%27InspectIt%27%3B%0A%09title%3A%20%27ctrl+i%27%3B%0A%09onClick%3A%20%5Bself%20inspectIt%5D.%0A%20%20%20%20html%20button%0A%09with%3A%20%27Clear%20workspace%27%3B%0A%09onClick%3A%20%5Bself%20clearWorkspace%5D%0A')}),
+smalltalk.Workspace);
+
+smalltalk.addMethod(
+'_inspectIt',
+smalltalk.method({
+selector: 'inspectIt',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self._doIt()._inspect();
+    return self;
+},
+source: unescape('inspectIt%0A%20%20%20%20self%20doIt%20inspect%0A')}),
+smalltalk.Workspace);
+
+
+
+smalltalk.addClass('Transcript', smalltalk.TabWidget, ['textarea'], 'IDE');
+smalltalk.addMethod(
+'_label',
+smalltalk.method({
+selector: 'label',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return unescape("%5BTranscript%5D");
+    return self;
+},
+source: unescape('label%0A%20%20%20%20%5E%27%5BTranscript%5D%27%0A')}),
+smalltalk.Transcript);
+
+smalltalk.addMethod(
+'_show_',
+smalltalk.method({
+selector: 'show:',
+category: 'actions',
+fn: function (anObject) {
+    var self = this;
+    self['@textarea']._asJQuery()._val_(self['@textarea']._asJQuery()._val().__comma(anObject._asString()));
+    return self;
+},
+source: unescape('show%3A%20anObject%0A%20%20%20%20textarea%20asJQuery%20val%3A%20textarea%20asJQuery%20val%2C%20anObject%20asString.%0A%0A')}),
+smalltalk.Transcript);
+
+smalltalk.addMethod(
+'_cr',
+smalltalk.method({
+selector: 'cr',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@textarea']._asJQuery()._val_(self['@textarea']._asJQuery()._val().__comma(smalltalk.String._cr()));
+    return self;
+},
+source: unescape('cr%0A%20%20%20%20textarea%20asJQuery%20val%3A%20textarea%20asJQuery%20val%2C%20String%20cr.%0A')}),
+smalltalk.Transcript);
+
+smalltalk.addMethod(
+'_clear',
+smalltalk.method({
+selector: 'clear',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@textarea']._asJQuery()._val_("");
+    return self;
+},
+source: unescape('clear%0A%20%20%20%20textarea%20asJQuery%20val%3A%20%27%27%0A')}),
+smalltalk.Transcript);
+
+smalltalk.addMethod(
+'_renderBoxOn_',
+smalltalk.method({
+selector: 'renderBoxOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    self['@textarea'] = html._textarea();
+    self['@textarea']._asJQuery()._call_("tabby");
+    (function ($rec) {$rec._class_("jt_transcript");return $rec._at_put_("spellcheck", "false");}(self['@textarea']));
+    return self;
+},
+source: unescape('renderBoxOn%3A%20html%0A%20%20%20%20textarea%20%3A%3D%20html%20textarea.%0A%20%20%20%20textarea%20asJQuery%20call%3A%20%27tabby%27.%0A%20%20%20%20textarea%20%0A%09class%3A%20%27jt_transcript%27%3B%0A%09at%3A%20%27spellcheck%27%20put%3A%20%27false%27%0A')}),
+smalltalk.Transcript);
+
+smalltalk.addMethod(
+'_renderButtonsOn_',
+smalltalk.method({
+selector: 'renderButtonsOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._with_("Clear transcript");return $rec._onClick_(function () {return self._clear();});}(html._button()));
+    return self;
+},
+source: unescape('renderButtonsOn%3A%20html%0A%20%20%20%20html%20button%0A%09with%3A%20%27Clear%20transcript%27%3B%0A%09onClick%3A%20%5Bself%20clear%5D%0A')}),
+smalltalk.Transcript);
+
+
+smalltalk.Transcript.klass.iVarNames = ['current'];
+smalltalk.addMethod(
+'_open',
+smalltalk.method({
+selector: 'open',
+category: 'instance creation',
+fn: function () {
+    var self = this;
+    self._current()._open();
+    return self;
+},
+source: unescape('open%0A%20%20%20%20self%20current%20open%0A')}),
+smalltalk.Transcript.klass);
+
+smalltalk.addMethod(
+'_new',
+smalltalk.method({
+selector: 'new',
+category: 'instance creation',
+fn: function () {
+    var self = this;
+    self._shouldNotImplement();
+    return self;
+},
+source: unescape('new%0A%20%20%20%20self%20shouldNotImplement%0A')}),
+smalltalk.Transcript.klass);
+
+smalltalk.addMethod(
+'_current',
+smalltalk.method({
+selector: 'current',
+category: 'instance creation',
+fn: function () {
+    var self = this;
+    return self['@current']._ifNil_(function () {return self['@current'] = self.klass.superclass.fn.prototype._new.apply(self, []);});
+    return self;
+},
+source: unescape('current%0A%20%20%20%20%5Ecurrent%20ifNil%3A%20%5Bcurrent%20%3A%3D%20super%20new%5D%0A')}),
+smalltalk.Transcript.klass);
+
+smalltalk.addMethod(
+'_show_',
+smalltalk.method({
+selector: 'show:',
+category: 'printing',
+fn: function (anObject) {
+    var self = this;
+    self._current()._show_(anObject);
+    return self;
+},
+source: unescape('show%3A%20anObject%0A%20%20%20%20self%20current%20show%3A%20anObject%0A')}),
+smalltalk.Transcript.klass);
+
+smalltalk.addMethod(
+'_cr',
+smalltalk.method({
+selector: 'cr',
+category: 'printing',
+fn: function () {
+    var self = this;
+    self._current()._show_(smalltalk.String._cr());
+    return self;
+},
+source: unescape('cr%0A%20%20%20%20self%20current%20show%3A%20String%20cr%0A')}),
+smalltalk.Transcript.klass);
+
+smalltalk.addMethod(
+'_clear',
+smalltalk.method({
+selector: 'clear',
+category: 'printing',
+fn: function () {
+    var self = this;
+    self._current()._clear();
+    return self;
+},
+source: unescape('clear%0A%20%20%20%20self%20current%20clear%0A')}),
+smalltalk.Transcript.klass);
+
+
+smalltalk.addClass('Browser', smalltalk.TabWidget, ['selectedCategory', 'selectedClass', 'selectedProtocol', 'selectedMethod', 'commitButton', 'categoriesList', 'classesList', 'protocolsList', 'methodsList', 'sourceTextarea', 'tabsList', 'selectedTab', 'saveButton', 'classButtons', 'methodButtons', 'unsavedChanges'], 'IDE');
+smalltalk.addMethod(
+'_initialize',
+smalltalk.method({
+selector: 'initialize',
+category: 'initialization',
+fn: function () {
+    var self = this;
+    self.klass.superclass.fn.prototype._initialize.apply(self, []);
+    self['@selectedTab'] = "instance";
+    self['@unsavedChanges'] = false;
+    return self;
+},
+source: unescape('initialize%0A%20%20%20%20super%20initialize.%0A%20%20%20%20selectedTab%20%3A%3D%20%23instance.%0A%20%20%20%20unsavedChanges%20%3A%3D%20false%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_label',
+smalltalk.method({
+selector: 'label',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@selectedClass']._ifNil_ifNotNil_(function () {return unescape("Browser%20%28nil%29");}, function () {return self['@selectedClass']._name();});
+    return self;
+},
+source: unescape('label%0A%20%20%20%20%5EselectedClass%20%0A%09ifNil%3A%20%5B%27Browser%20%28nil%29%27%5D%0A%09ifNotNil%3A%20%5BselectedClass%20name%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_categories',
+smalltalk.method({
+selector: 'categories',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    var categories = nil;
+    categories = smalltalk.Array._new();
+    smalltalk.Smalltalk._current()._classes()._do_(function (each) {return categories._includes_(each._category())._ifFalse_(function () {return categories._add_(each._category());});});
+    return categories._sort();
+    return self;
+},
+source: unescape('categories%0A%20%20%20%20%7C%20categories%20%7C%0A%20%20%20%20categories%20%3A%3D%20Array%20new.%0A%20%20%20%20Smalltalk%20current%20classes%20do%3A%20%5B%3Aeach%20%7C%0A%09%28categories%20includes%3A%20each%20category%29%20ifFalse%3A%20%5B%0A%09%20%20%20%20categories%20add%3A%20each%20category%5D%5D.%0A%20%20%20%20%5Ecategories%20sort%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_classes',
+smalltalk.method({
+selector: 'classes',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return smalltalk.Smalltalk._current()._classes()._select_(function (each) {return each._category().__eq(self['@selectedCategory']);})._sort_(function (a, b) {return a._name().__gt(b._name());});
+    return self;
+},
+source: unescape('classes%0A%20%20%20%20%5E%28Smalltalk%20current%20classes%20%0A%09select%3A%20%5B%3Aeach%20%7C%20each%20category%20%3D%20selectedCategory%5D%29%0A%09sort%3A%20%5B%3Aa%20%3Ab%20%7C%20a%20name%20%3E%20b%20name%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_protocols',
+smalltalk.method({
+selector: 'protocols',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    try {
+        var klass = nil;
+        var protocols = nil;
+        protocols = smalltalk.Array._new();
+        self['@selectedClass']._ifNotNil_(function () {self['@selectedTab'].__eq("comment")._ifTrue_(function () {return function () {throw {name: "stReturn", selector: "_protocols", fn: function () {return [];}};}();});klass = self['@selectedTab'].__eq("instance")._ifTrue_ifFalse_(function () {return self['@selectedClass'];}, function () {return self['@selectedClass']._class();});klass._methodDictionary()._isEmpty()._ifTrue_(function () {return protocols._add_("not yet classified");});return klass._methodDictionary()._do_(function (each) {return protocols._includes_(each._category())._ifFalse_(function () {return protocols._add_(each._category());});});});
+        (function () {throw {name: "stReturn", selector: "_protocols", fn: function () {return protocols._sort();}};}());
+        return self;
+    } catch (e) {
+        if (e.name === "stReturn" && e.selector === "_protocols") {
+            return e.fn();
+        }
+        throw e;
+    }
+},
+source: unescape('protocols%0A%20%20%20%20%7C%20klass%20protocols%20%7C%0A%20%20%20%20protocols%20%3A%3D%20Array%20new.%0A%20%20%20%20selectedClass%20ifNotNil%3A%20%5B%0A%09selectedTab%20%3D%20%23comment%20ifTrue%3A%20%5B%5E%23%28%29%5D.%0A%09klass%20%3A%3D%20selectedTab%20%3D%20%23instance%0A%09%20%20%20%20ifTrue%3A%20%5BselectedClass%5D%0A%09%20%20%20%20ifFalse%3A%20%5BselectedClass%20class%5D.%0A%09klass%20methodDictionary%20isEmpty%20ifTrue%3A%20%5B%0A%09%20%20%20%20protocols%20add%3A%20%27not%20yet%20classified%27%5D.%0A%09klass%20methodDictionary%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20%28protocols%20includes%3A%20each%20category%29%20ifFalse%3A%20%5B%0A%09%09protocols%20add%3A%20each%20category%5D%5D%5D.%0A%20%20%20%20%5Eprotocols%20sort%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_methods',
+smalltalk.method({
+selector: 'methods',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    try {
+        var klass = nil;
+        self['@selectedTab'].__eq("comment")._ifTrue_(function () {return function () {throw {name: "stReturn", selector: "_methods", fn: function () {return [];}};}();});
+        self['@selectedClass']._ifNotNil_(function () {return klass = self['@selectedTab'].__eq("instance")._ifTrue_ifFalse_(function () {return self['@selectedClass'];}, function () {return self['@selectedClass']._class();});});
+        (function () {throw {name: "stReturn", selector: "_methods", fn: function () {return self['@selectedProtocol']._ifNil_ifNotNil_(function () {return klass._ifNil_ifNotNil_(function () {return [];}, function () {return klass._methodDictionary()._values();});}, function () {return klass._methodDictionary()._values()._select_(function (each) {return each._category().__eq(self['@selectedProtocol']);});})._sort_(function (a, b) {return a._selector().__gt(b._selector());});}};}());
+        return self;
+    } catch (e) {
+        if (e.name === "stReturn" && e.selector === "_methods") {
+            return e.fn();
+        }
+        throw e;
+    }
+},
+source: unescape('methods%0A%20%20%20%20%7C%20klass%20%7C%0A%20%20%20%20selectedTab%20%3D%20%23comment%20ifTrue%3A%20%5B%5E%23%28%29%5D.%0A%20%20%20%20selectedClass%20ifNotNil%3A%20%5B%0A%09klass%20%3A%3D%20selectedTab%20%3D%20%23instance%0A%09%20%20%20%20ifTrue%3A%20%5BselectedClass%5D%0A%09%20%20%20%20ifFalse%3A%20%5BselectedClass%20class%5D%5D.%0A%20%20%20%20%5E%28selectedProtocol%20%0A%09ifNil%3A%20%5B%0A%09%20%20%20%20klass%20%0A%09%09ifNil%3A%20%5B%23%28%29%5D%20%0A%09%09ifNotNil%3A%20%5Bklass%20methodDictionary%20values%5D%5D%0A%09ifNotNil%3A%20%5B%0A%09%20%20%20%20klass%20methodDictionary%20values%20select%3A%20%5B%3Aeach%20%7C%0A%09%09each%20category%20%3D%20selectedProtocol%5D%5D%29%20sort%3A%20%5B%3Aa%20%3Ab%20%7C%20a%20selector%20%3E%20b%20selector%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_source',
+smalltalk.method({
+selector: 'source',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    try {
+        self['@selectedTab'].__eq("comment")._ifFalse_(function () {return function () {throw {name: "stReturn", selector: "_source", fn: function () {return self['@selectedProtocol']._notNil()._or_(function () {return self['@selectedMethod']._notNil();})._ifFalse_ifTrue_(function () {return self._declarationSource();}, function () {return self._methodSource();});}};}();});
+        (function () {throw {name: "stReturn", selector: "_source", fn: function () {return self['@selectedClass']._ifNil_ifNotNil_(function () {return "";}, function () {return self._classCommentSource();});}};}());
+        return self;
+    } catch (e) {
+        if (e.name === "stReturn" && e.selector === "_source") {
+            return e.fn();
+        }
+        throw e;
+    }
+},
+source: unescape('source%0A%20%20%20%20selectedTab%20%3D%20%23comment%20ifFalse%3A%20%5B%0A%09%5E%28selectedProtocol%20notNil%20or%3A%20%5BselectedMethod%20notNil%5D%29%0A%09%20%20%20%20ifFalse%3A%20%5Bself%20declarationSource%5D%0A%09%20%20%20%20ifTrue%3A%20%5Bself%20methodSource%5D%5D.%0A%20%20%20%20%5EselectedClass%0A%09ifNil%3A%20%5B%27%27%5D%0A%09ifNotNil%3A%20%5Bself%20classCommentSource%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_methodSource',
+smalltalk.method({
+selector: 'methodSource',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@selectedMethod']._ifNil_ifNotNil_(function () {return self._dummyMethodSource();}, function () {return self['@selectedMethod']._source();});
+    return self;
+},
+source: unescape('methodSource%0A%20%20%20%20%5EselectedMethod%0A%09ifNil%3A%20%5Bself%20dummyMethodSource%5D%0A%09ifNotNil%3A%20%5BselectedMethod%20source%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_dummyMethodSource',
+smalltalk.method({
+selector: 'dummyMethodSource',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return unescape("messageSelectorAndArgumentNames%0A%09%22comment%20stating%20purpose%20of%20message%22%0A%0A%09%7C%20temporary%20variable%20names%20%7C%0A%09statements");
+    return self;
+},
+source: unescape('dummyMethodSource%0A%20%20%20%20%5E%27messageSelectorAndArgumentNames%0A%09%22comment%20stating%20purpose%20of%20message%22%0A%0A%09%7C%20temporary%20variable%20names%20%7C%0A%09statements%27%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_declarationSource',
+smalltalk.method({
+selector: 'declarationSource',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@selectedTab'].__eq("instance")._ifTrue_ifFalse_(function () {return self._classDeclarationSource();}, function () {return self._metaclassDeclarationSource();});
+    return self;
+},
+source: unescape('declarationSource%0A%20%20%20%20%5EselectedTab%20%3D%20%23instance%0A%09ifTrue%3A%20%5Bself%20classDeclarationSource%5D%0A%09ifFalse%3A%20%5Bself%20metaclassDeclarationSource%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_classDeclarationSource',
+smalltalk.method({
+selector: 'classDeclarationSource',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    var stream = nil;
+    stream = ""._writeStream();
+    self['@selectedClass']._ifNotNil_(function () {(function ($rec) {$rec._nextPutAll_(self['@selectedClass']._superclass()._asString());$rec._nextPutAll_(unescape("%20subclass%3A%20%23"));$rec._nextPutAll_(self['@selectedClass']._name());$rec._nextPutAll_(smalltalk.String._cr().__comma(smalltalk.String._tab()));return $rec._nextPutAll_(unescape("instanceVariableNames%3A%20%27"));}(stream));self['@selectedClass']._instanceVariableNames()._do_separatedBy_(function (each) {return stream._nextPutAll_(each);}, function () {return stream._nextPutAll_(" ");});return function ($rec) {$rec._nextPutAll_(unescape("%27").__comma(smalltalk.String._cr()).__comma(smalltalk.String._tab()));$rec._nextPutAll_(unescape("category%3A%20%27"));$rec._nextPutAll_(self['@selectedClass']._category());return $rec._nextPutAll_(unescape("%27"));}(stream);});
+    return stream._contents();
+    return self;
+},
+source: unescape('classDeclarationSource%0A%20%20%20%20%7C%20stream%20%7C%0A%20%20%20%20stream%20%3A%3D%20%27%27%20writeStream.%0A%20%20%20%20selectedClass%20ifNotNil%3A%20%5B%0A%09stream%20%0A%09%20%20%20%20nextPutAll%3A%20selectedClass%20superclass%20asString%3B%0A%09%20%20%20%20nextPutAll%3A%20%27%20subclass%3A%20%23%27%3B%0A%09%20%20%20%20nextPutAll%3A%20selectedClass%20name%3B%0A%09%20%20%20%20nextPutAll%3A%20String%20cr%2C%20String%20tab%3B%0A%09%20%20%20%20nextPutAll%3A%20%27instanceVariableNames%3A%20%27%27%27.%0A%09selectedClass%20instanceVariableNames%20%0A%09%20%20%20%20do%3A%20%5B%3Aeach%20%7C%20stream%20nextPutAll%3A%20each%5D%20%0A%09%20%20%20%20separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%20%27%5D.%0A%09stream%0A%09%20%20%20%20nextPutAll%3A%20%27%27%27%27%2C%20String%20cr%2C%20String%20tab%3B%0A%09%20%20%20%20nextPutAll%3A%20%27category%3A%20%27%27%27%3B%0A%09%20%20%20%20nextPutAll%3A%20selectedClass%20category%3B%0A%09%20%20%20%20nextPutAll%3A%20%27%27%27%27%5D.%0A%20%20%20%20%5Estream%20contents%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_metaclassDeclarationSource',
+smalltalk.method({
+selector: 'metaclassDeclarationSource',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    var stream = nil;
+    stream = ""._writeStream();
+    self['@selectedClass']._ifNotNil_(function () {(function ($rec) {$rec._nextPutAll_(self['@selectedClass']._asString());$rec._nextPutAll_(" class ");return $rec._nextPutAll_(unescape("instanceVariableNames%3A%20%27"));}(stream));self['@selectedClass']._class()._instanceVariableNames()._do_separatedBy_(function (each) {return stream._nextPutAll_(each);}, function () {return stream._nextPutAll_(" ");});return stream._nextPutAll_(unescape("%27"));});
+    return stream._contents();
+    return self;
+},
+source: unescape('metaclassDeclarationSource%0A%20%20%20%20%7C%20stream%20%7C%0A%20%20%20%20stream%20%3A%3D%20%27%27%20writeStream.%0A%20%20%20%20selectedClass%20ifNotNil%3A%20%5B%0A%09stream%20%0A%09%20%20%20%20nextPutAll%3A%20selectedClass%20asString%3B%0A%09%20%20%20%20nextPutAll%3A%20%27%20class%20%27%3B%0A%09%20%20%20%20nextPutAll%3A%20%27instanceVariableNames%3A%20%27%27%27.%0A%09selectedClass%20class%20instanceVariableNames%0A%09%20%20%20%20do%3A%20%5B%3Aeach%20%7C%20stream%20nextPutAll%3A%20each%5D%0A%09%20%20%20%20separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%20%27%5D.%0A%09stream%20nextPutAll%3A%20%27%27%27%27%5D.%0A%20%20%20%20%5Estream%20contents%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_classCommentSource',
+smalltalk.method({
+selector: 'classCommentSource',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@selectedClass']._comment();
+    return self;
+},
+source: unescape('classCommentSource%0A%20%20%20%20%5EselectedClass%20comment%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_enableSaveButton',
+smalltalk.method({
+selector: 'enableSaveButton',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@saveButton']._removeAt_("disabled");
+    self['@unsavedChanges'] = true;
+    return self;
+},
+source: unescape('enableSaveButton%0A%20%20%20%20saveButton%20removeAt%3A%20%27disabled%27.%0A%20%20%20%20unsavedChanges%20%3A%3D%20true%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_disableSaveButton',
+smalltalk.method({
+selector: 'disableSaveButton',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@saveButton']._ifNotNil_(function () {return self['@saveButton']._at_put_("disabled", true);});
+    self['@unsavedChanges'] = false;
+    return self;
+},
+source: unescape('disableSaveButton%0A%20%20%20%20saveButton%20ifNotNil%3A%20%5B%0A%09saveButton%20at%3A%20%27disabled%27%20put%3A%20true%5D.%0A%20%20%20%20unsavedChanges%20%3A%3D%20false%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_hideClassButtons',
+smalltalk.method({
+selector: 'hideClassButtons',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@classButtons']._asJQuery()._hide();
+    return self;
+},
+source: unescape('hideClassButtons%0A%20%20%20%20classButtons%20asJQuery%20hide%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_showClassButtons',
+smalltalk.method({
+selector: 'showClassButtons',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@classButtons']._asJQuery()._show();
+    return self;
+},
+source: unescape('showClassButtons%0A%20%20%20%20classButtons%20asJQuery%20show%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_hideMethodButtons',
+smalltalk.method({
+selector: 'hideMethodButtons',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@methodButtons']._asJQuery()._hide();
+    return self;
+},
+source: unescape('hideMethodButtons%0A%20%20%20%20methodButtons%20asJQuery%20hide%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_showMethodButtons',
+smalltalk.method({
+selector: 'showMethodButtons',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@methodButtons']._asJQuery()._show();
+    return self;
+},
+source: unescape('showMethodButtons%0A%20%20%20%20methodButtons%20asJQuery%20show%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_compile',
+smalltalk.method({
+selector: 'compile',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self._disableSaveButton();
+    self['@selectedTab'].__eq("comment")._ifTrue_(function () {return self['@selectedClass']._ifNotNil_(function () {return self._compileClassComment();});});
+    self['@selectedProtocol']._notNil()._or_(function () {return self['@selectedMethod']._notNil();})._ifFalse_ifTrue_(function () {return self._compileDefinition();}, function () {return self._compileMethodDefinition();});
+    return self;
+},
+source: unescape('compile%0A%20%20%20%20self%20disableSaveButton.%0A%20%20%20%20selectedTab%20%3D%20%23comment%20ifTrue%3A%20%5B%0A%09selectedClass%20ifNotNil%3A%20%5B%0A%09%20%20%20%20self%20compileClassComment%5D%5D.%0A%20%20%20%20%28selectedProtocol%20notNil%20or%3A%20%5BselectedMethod%20notNil%5D%29%0A%09ifFalse%3A%20%5Bself%20compileDefinition%5D%0A%09ifTrue%3A%20%5Bself%20compileMethodDefinition%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_compileClassComment',
+smalltalk.method({
+selector: 'compileClassComment',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@selectedClass']._comment_(self['@sourceTextarea']._asJQuery()._val());
+    return self;
+},
+source: unescape('compileClassComment%0A%20%20%20%20selectedClass%20comment%3A%20sourceTextarea%20asJQuery%20val%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_compileMethodDefinition',
+smalltalk.method({
+selector: 'compileMethodDefinition',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@selectedTab'].__eq("instance")._ifTrue_ifFalse_(function () {return self._compileMethodDefinitionFor_(self['@selectedClass']);}, function () {return self._compileMethodDefinitionFor_(self['@selectedClass']._class());});
+    return self;
+},
+source: unescape('compileMethodDefinition%0A%20%20%20%20selectedTab%20%3D%20%23instance%0A%09ifTrue%3A%20%5Bself%20compileMethodDefinitionFor%3A%20selectedClass%5D%0A%09ifFalse%3A%20%5Bself%20compileMethodDefinitionFor%3A%20selectedClass%20class%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_compileMethodDefinitionFor_',
+smalltalk.method({
+selector: 'compileMethodDefinitionFor:',
+category: 'actions',
+fn: function (aClass) {
+    var self = this;
+    try {
+        var compiler = nil;
+        var method = nil;
+        var source = nil;
+        var node = nil;
+        source = self['@sourceTextarea']._asJQuery()._val();
+        self['@selectedProtocol']._ifNil_(function () {return self['@selectedProtocol'] = self['@selectedMethod']._category();});
+        compiler = smalltalk.Compiler._new();
+        node = compiler._parse_(source);
+        node._isParseFailure()._ifTrue_(function () {return function () {throw {name: "stReturn", selector: "_compileMethodDefinitionFor_", fn: function () {return self._alert_("PARSE ERROR: ".__comma(node._reason()).__comma(unescape("%2C%20position%3A%20")).__comma(node._position()._asString()));}};}();});
+        compiler._currentClass_(self['@selectedClass']);
+        method = compiler._eval_(compiler._compileNode_(node));
+        method._category_(self['@selectedProtocol']);
+        aClass._addCompiledMethod_(method);
+        self._updateMethodsList();
+        self._selectMethod_(method);
+        return self;
+    } catch (e) {
+        if (e.name === "stReturn" &&
+            e.selector === "_compileMethodDefinitionFor_") {
+            return e.fn();
+        }
+        throw e;
+    }
+},
+source: unescape('compileMethodDefinitionFor%3A%20aClass%0A%20%20%20%20%7C%20compiler%20method%20source%20node%20%7C%0A%20%20%20%20source%20%3A%3D%20sourceTextarea%20asJQuery%20val.%0A%20%20%20%20selectedProtocol%20ifNil%3A%20%5BselectedProtocol%20%3A%3D%20selectedMethod%20category%5D.%0A%20%20%20%20compiler%20%3A%3D%20Compiler%20new.%0A%20%20%20%20node%20%3A%3D%20compiler%20parse%3A%20source.%0A%20%20%20%20node%20isParseFailure%20ifTrue%3A%20%5B%0A%09%5Eself%20alert%3A%20%27PARSE%20ERROR%3A%20%27%2C%20node%20reason%2C%20%27%2C%20position%3A%20%27%2C%20node%20position%20asString%5D.%0A%20%20%20%20compiler%20currentClass%3A%20selectedClass.%0A%20%20%20%20method%20%3A%3D%20compiler%20eval%3A%20%28compiler%20compileNode%3A%20node%29.%0A%20%20%20%20method%20category%3A%20selectedProtocol.%0A%20%20%20%20aClass%20addCompiledMethod%3A%20method.%0A%20%20%20%20self%20updateMethodsList.%0A%20%20%20%20self%20selectMethod%3A%20method%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_compileDefinition',
+smalltalk.method({
+selector: 'compileDefinition',
+category: 'actions',
+fn: function () {
+    var self = this;
+    var newClass = nil;
+    newClass = smalltalk.Compiler._new()._loadExpression_(self['@sourceTextarea']._asJQuery()._val());
+    (function ($rec) {$rec._updateCategoriesList();return $rec._updateClassesList();}(self));
+    return self;
+},
+source: unescape('compileDefinition%0A%20%20%20%20%7C%20newClass%20%7C%0A%20%20%20%20newClass%20%3A%3D%20Compiler%20new%20loadExpression%3A%20sourceTextarea%20asJQuery%20val.%0A%20%20%20%20self%20%0A%09updateCategoriesList%3B%0A%09updateClassesList%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_commitCategory',
+smalltalk.method({
+selector: 'commitCategory',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self['@selectedCategory']._ifNotNil_(function () {return function ($rec) {$rec._at_put_("type", "PUT");$rec._at_put_("data", smalltalk.Exporter._new()._exportCategory_(self['@selectedCategory']));$rec._at_put_("error", function () {return self._alert_(unescape("Commit%20failed%21"));});return $rec._send();}(smalltalk.Ajax._url_(self._class()._commitPath().__comma(unescape("/")).__comma(self['@selectedCategory']).__comma(".js")));});
+    return self;
+},
+source: unescape('commitCategory%0A%20%20%20%20selectedCategory%20ifNotNil%3A%20%5B%0A%09%28Ajax%20url%3A%20self%20class%20commitPath%2C%20%27/%27%2C%20selectedCategory%2C%20%27.js%27%29%0A%09%20%20%20%20at%3A%20%27type%27%20put%3A%20%27PUT%27%3B%0A%09%20%20%20%20at%3A%20%27data%27%20put%3A%20%28Exporter%20new%20exportCategory%3A%20selectedCategory%29%3B%0A%09%20%20%20%20at%3A%20%27error%27%20put%3A%20%5Bself%20alert%3A%20%27Commit%20failed%21%27%5D%3B%0A%09%20%20%20%20send%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_cancelChanges',
+smalltalk.method({
+selector: 'cancelChanges',
+category: 'actions',
+fn: function () {
+    var self = this;
+    return self['@unsavedChanges']._ifTrue_ifFalse_(function () {return self._confirm_(unescape("Cancel%20changes%3F"));}, function () {return true;});
+    return self;
+},
+source: unescape('cancelChanges%0A%20%20%20%20%5EunsavedChanges%20%0A%09ifTrue%3A%20%5Bself%20confirm%3A%20%27Cancel%20changes%3F%27%5D%0A%09ifFalse%3A%20%5Btrue%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_removeClass',
+smalltalk.method({
+selector: 'removeClass',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self._confirm_("Do you really want to remove ".__comma(self['@selectedClass']._name()).__comma(unescape("%3F")))._ifTrue_(function () {smalltalk.Smalltalk._current()._basicDelete_(self['@selectedClass']._name());return self._selectClass_(nil);});
+    return self;
+},
+source: unescape('removeClass%0A%20%20%20%20%28self%20confirm%3A%20%27Do%20you%20really%20want%20to%20remove%20%27%2C%20selectedClass%20name%2C%20%27%3F%27%29%0A%09ifTrue%3A%20%5B%0A%09%20%20%20%20Smalltalk%20current%20basicDelete%3A%20selectedClass%20name.%0A%09%20%20%20%20self%20selectClass%3A%20nil%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_removeMethod',
+smalltalk.method({
+selector: 'removeMethod',
+category: 'actions',
+fn: function () {
+    var self = this;
+    self._cancelChanges()._ifTrue_(function () {return self._confirm_(unescape("Do%20you%20really%20want%20to%20remove%20%23").__comma(self['@selectedMethod']._selector()).__comma(unescape("%3F")))._ifTrue_(function () {self['@selectedTab'].__eq("instance")._ifTrue_ifFalse_(function () {return self['@selectedClass']._removeCompiledMethod_(self['@selectedMethod']);}, function () {return self['@selectedClass']._class()._removeCompiledMethod_(self['@selectedMethod']);});return self._selectMethod_(nil);});});
+    return self;
+},
+source: unescape('removeMethod%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09%28self%20confirm%3A%20%27Do%20you%20really%20want%20to%20remove%20%23%27%2C%20selectedMethod%20selector%2C%20%27%3F%27%29%0A%09%20%20%20%20ifTrue%3A%20%5B%0A%09%09selectedTab%20%3D%20%23instance%20%0A%09%09%09ifTrue%3A%20%5BselectedClass%20removeCompiledMethod%3A%20selectedMethod%5D%0A%09%09%09ifFalse%3A%20%5BselectedClass%20class%20removeCompiledMethod%3A%20selectedMethod%5D.%0A%09%09self%20selectMethod%3A%20nil%5D%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_setMethodProtocol_',
+smalltalk.method({
+selector: 'setMethodProtocol:',
+category: 'actions',
+fn: function (aString) {
+    var self = this;
+    self._cancelChanges()._ifTrue_(function () {return self._protocols()._includes_(aString)._ifFalse_ifTrue_(function () {return self._addNewProtocol();}, function () {self['@selectedMethod']._category_(aString);self['@selectedProtocol'] = aString;self['@selectedMethod'] = self['@selectedMethod'];return function ($rec) {$rec._updateProtocolsList();$rec._updateMethodsList();return $rec._updateSourceAndButtons();}(self);});});
+    return self;
+},
+source: unescape('setMethodProtocol%3A%20aString%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09%28self%20protocols%20includes%3A%20aString%29%0A%09%20%20%20%20ifFalse%3A%20%5Bself%20addNewProtocol%5D%0A%09%20%20%20%20ifTrue%3A%20%5B%0A%09%09selectedMethod%20category%3A%20aString.%0A%09%09selectedProtocol%20%3A%3D%20aString.%0A%09%09selectedMethod%20%3A%3D%20selectedMethod.%0A%09%09self%20%0A%09%09%20%20%20%20updateProtocolsList%3B%0A%09%09%20%20%20%20updateMethodsList%3B%0A%09%09%20%20%20%20updateSourceAndButtons%5D%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_addNewProtocol',
+smalltalk.method({
+selector: 'addNewProtocol',
+category: 'actions',
+fn: function () {
+    var self = this;
+    var newProtocol = nil;
+    newProtocol = self._prompt_("New method protocol");
+    newProtocol._notEmpty()._ifTrue_(function () {self['@selectedMethod']._category_(newProtocol);return self._setMethodProtocol_(newProtocol);});
+    return self;
+},
+source: unescape('addNewProtocol%0A%20%20%20%20%7C%20newProtocol%20%7C%0A%20%20%20%20newProtocol%20%3A%3D%20self%20prompt%3A%20%27New%20method%20protocol%27.%0A%20%20%20%20newProtocol%20notEmpty%20ifTrue%3A%20%5B%0A%09selectedMethod%20category%3A%20newProtocol.%0A%09self%20setMethodProtocol%3A%20newProtocol%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_selectCategory_',
+smalltalk.method({
+selector: 'selectCategory:',
+category: 'actions',
+fn: function (aCategory) {
+    var self = this;
+    self._cancelChanges()._ifTrue_(function () {self['@selectedCategory'] = aCategory;self['@selectedClass'] = self['@selectedProtocol'] = self['@selectedMethod'] = nil;return function ($rec) {$rec._updateCategoriesList();$rec._updateClassesList();$rec._updateProtocolsList();$rec._updateMethodsList();return $rec._updateSourceAndButtons();}(self);});
+    return self;
+},
+source: unescape('selectCategory%3A%20aCategory%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09selectedCategory%20%3A%3D%20aCategory.%0A%09selectedClass%20%3A%3D%20selectedProtocol%20%3A%3D%20selectedMethod%20%3A%3D%20%20nil.%0A%09self%20%0A%09%20%20%20%20updateCategoriesList%3B%0A%09%20%20%20%20updateClassesList%3B%0A%09%20%20%20%20updateProtocolsList%3B%0A%09%20%20%20%20updateMethodsList%3B%0A%09%20%20%20%20updateSourceAndButtons%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_selectClass_',
+smalltalk.method({
+selector: 'selectClass:',
+category: 'actions',
+fn: function (aClass) {
+    var self = this;
+    self._cancelChanges()._ifTrue_(function () {self['@selectedClass'] = aClass;self['@selectedProtocol'] = self['@selectedMethod'] = nil;return function ($rec) {$rec._updateClassesList();$rec._updateProtocolsList();$rec._updateMethodsList();return $rec._updateSourceAndButtons();}(self);});
+    return self;
+},
+source: unescape('selectClass%3A%20aClass%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09selectedClass%20%3A%3D%20aClass.%0A%09selectedProtocol%20%3A%3D%20selectedMethod%20%3A%3D%20nil.%0A%09self%20%0A%09%20%20%20%20updateClassesList%3B%0A%09%20%20%20%20updateProtocolsList%3B%0A%09%20%20%20%20updateMethodsList%3B%0A%09%20%20%20%20updateSourceAndButtons%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_selectProtocol_',
+smalltalk.method({
+selector: 'selectProtocol:',
+category: 'actions',
+fn: function (aString) {
+    var self = this;
+    self._cancelChanges()._ifTrue_(function () {self['@selectedProtocol'] = aString;self['@selectedMethod'] = nil;return function ($rec) {$rec._updateProtocolsList();$rec._updateMethodsList();return $rec._updateSourceAndButtons();}(self);});
+    return self;
+},
+source: unescape('selectProtocol%3A%20aString%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09selectedProtocol%20%3A%3D%20aString.%0A%09selectedMethod%20%3A%3D%20nil.%0A%09self%20%0A%09%20%20%20%20updateProtocolsList%3B%0A%09%20%20%20%20updateMethodsList%3B%0A%09%20%20%20%20updateSourceAndButtons%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_selectMethod_',
+smalltalk.method({
+selector: 'selectMethod:',
+category: 'actions',
+fn: function (aMethod) {
+    var self = this;
+    self._cancelChanges()._ifTrue_(function () {self['@selectedMethod'] = aMethod;return function ($rec) {$rec._updateProtocolsList();$rec._updateMethodsList();return $rec._updateSourceAndButtons();}(self);});
+    return self;
+},
+source: unescape('selectMethod%3A%20aMethod%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09selectedMethod%20%3A%3D%20aMethod.%0A%09self%20%0A%09%20%20%20%20updateProtocolsList%3B%0A%09%20%20%20%20updateMethodsList%3B%0A%09%20%20%20%20updateSourceAndButtons%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_selectTab_',
+smalltalk.method({
+selector: 'selectTab:',
+category: 'actions',
+fn: function (aString) {
+    var self = this;
+    self._cancelChanges()._ifTrue_(function () {self['@selectedTab'] = aString;self._selectProtocol_(nil);return self._updateTabsList();});
+    return self;
+},
+source: unescape('selectTab%3A%20aString%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09selectedTab%20%3A%3D%20aString.%0A%09self%20selectProtocol%3A%20nil.%0A%09self%20updateTabsList%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_renderBoxOn_',
+smalltalk.method({
+selector: 'renderBoxOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._renderTopPanelOn_(html);$rec._renderTabsOn_(html);return $rec._renderBottomPanelOn_(html);}(self));
+    return self;
+},
+source: unescape('renderBoxOn%3A%20html%0A%20%20%20%20self%20%0A%09renderTopPanelOn%3A%20html%3B%0A%09renderTabsOn%3A%20html%3B%0A%09renderBottomPanelOn%3A%20html%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_renderTopPanelOn_',
+smalltalk.method({
+selector: 'renderTopPanelOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._class_("top");return $rec._with_(function () {self['@categoriesList'] = html._ul()._class_("jt_column categories");self['@commitButton'] = function ($rec) {$rec._class_("jt_commit");$rec._title_("Commit classes in this category to disk");$rec._onClick_(function () {return self._commitCategory();});return $rec._with_("Commit category");}(html._button());self['@classesList'] = html._ul()._class_("jt_column classes");self['@protocolsList'] = html._ul()._class_("jt_column protocols");self['@methodsList'] = html._ul()._class_("jt_column methods");(function ($rec) {$rec._updateCategoriesList();$rec._updateClassesList();$rec._updateProtocolsList();return $rec._updateMethodsList();}(self));return html._div()._class_("jt_clear");});}(html._div()));
+    return self;
+},
+source: unescape('renderTopPanelOn%3A%20html%0A%20%20%20%20html%20div%20%0A%09class%3A%20%27top%27%3B%20%0A%09with%3A%20%5B%0A%09%20%20%20%20categoriesList%20%3A%3D%20html%20ul%20class%3A%20%27jt_column%20categories%27.%0A%09%20%20%20%20commitButton%20%3A%3D%20html%20button%20%0A%09%09class%3A%20%27jt_commit%27%3B%0A%09%09title%3A%20%27Commit%20classes%20in%20this%20category%20to%20disk%27%3B%0A%09%09onClick%3A%20%5Bself%20commitCategory%5D%3B%0A%09%09with%3A%20%27Commit%20category%27.%0A%09%20%20%20%20classesList%20%3A%3D%20html%20ul%20class%3A%20%27jt_column%20classes%27.%0A%09%20%20%20%20protocolsList%20%3A%3D%20html%20ul%20class%3A%20%27jt_column%20protocols%27.%0A%09%20%20%20%20methodsList%20%3A%3D%20html%20ul%20class%3A%20%27jt_column%20methods%27.%0A%09%20%20%20%20self%0A%09%09updateCategoriesList%3B%0A%09%09updateClassesList%3B%0A%09%09updateProtocolsList%3B%0A%09%09updateMethodsList.%0A%09%20%20%20%20html%20div%20class%3A%20%27jt_clear%27%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_renderTabsOn_',
+smalltalk.method({
+selector: 'renderTabsOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    self['@tabsList'] = html._ul()._class_("jt_tabs");
+    self._updateTabsList();
+    return self;
+},
+source: unescape('renderTabsOn%3A%20html%0A%20%20%20%20tabsList%20%3A%3D%20html%20ul%20class%3A%20%27jt_tabs%27.%0A%20%20%20%20self%20updateTabsList.%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_renderBottomPanelOn_',
+smalltalk.method({
+selector: 'renderBottomPanelOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._class_("jt_sourceCode");return $rec._with_(function () {self['@sourceTextarea'] = function ($rec) {$rec._onKeyPress_(function () {return self._enableSaveButton();});$rec._class_("source");return $rec._at_put_("spellcheck", "false");}(html._textarea());return self['@sourceTextarea']._asJQuery()._call_("tabby");});}(html._div()));
+    return self;
+},
+source: unescape('renderBottomPanelOn%3A%20html%0A%20%20%20%20html%20div%0A%09class%3A%20%27jt_sourceCode%27%3B%0A%09with%3A%20%5B%0A%09%20%20%20%20sourceTextarea%20%3A%3D%20html%20textarea%20%0A%09%09onKeyPress%3A%20%5Bself%20enableSaveButton%5D%3B%0A%09%09class%3A%20%27source%27%3B%0A%09%09at%3A%20%27spellcheck%27%20put%3A%20%27false%27.%0A%09%20%20%20%20sourceTextarea%20asJQuery%20call%3A%20%27tabby%27%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_renderButtonsOn_',
+smalltalk.method({
+selector: 'renderButtonsOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    self['@saveButton'] = html._button();
+    (function ($rec) {$rec._with_("Save");return $rec._onClick_(function () {return self._compile();});}(self['@saveButton']));
+    self['@methodButtons'] = html._span();
+    self['@classButtons'] = html._span();
+    self._updateSourceAndButtons();
+    return self;
+},
+source: unescape('renderButtonsOn%3A%20html%0A%20%20%20%20saveButton%20%3A%3D%20html%20button.%0A%20%20%20%20saveButton%20%0A%09with%3A%20%27Save%27%3B%0A%09onClick%3A%20%5Bself%20compile%5D.%0A%20%20%20%20methodButtons%20%3A%3D%20html%20span.%0A%20%20%20%20classButtons%20%3A%3D%20html%20span.%0A%20%20%20%20self%20updateSourceAndButtons%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_updateCategoriesList',
+smalltalk.method({
+selector: 'updateCategoriesList',
+category: 'updating',
+fn: function () {
+    var self = this;
+    self['@categoriesList']._contents_(function (html) {return self._categories()._do_(function (each) {var li = nil;li = html._li();self['@selectedCategory'].__eq(each)._ifTrue_(function () {return li._class_("selected");});return function ($rec) {$rec._with_(each);return $rec._onClick_(function () {return self._selectCategory_(each);});}(li);});});
+    return self;
+},
+source: unescape('updateCategoriesList%0A%20%20%20%20categoriesList%20contents%3A%20%5B%3Ahtml%20%7C%0A%09self%20categories%20do%3A%20%5B%3Aeach%20%7C%7C%20li%20%7C%0A%09%20%20%20%20li%20%3A%3D%20html%20li.%0A%09%20%20%20%20selectedCategory%20%3D%20each%20ifTrue%3A%20%5B%0A%09%09li%20class%3A%20%27selected%27%5D.%0A%09%20%20%20%20li%0A%09%09with%3A%20each%3B%0A%09%09onClick%3A%20%5Bself%20selectCategory%3A%20each%5D%5D%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_updateClassesList',
+smalltalk.method({
+selector: 'updateClassesList',
+category: 'updating',
+fn: function () {
+    var self = this;
+    smalltalk.TabManager._current()._update();
+    self['@classesList']._contents_(function (html) {return self._classes()._do_(function (each) {var li = nil;li = html._li();self['@selectedClass'].__eq(each)._ifTrue_(function () {return li._class_("selected");});return function ($rec) {$rec._with_(each._name());return $rec._onClick_(function () {return self._selectClass_(each);});}(li);});});
+    return self;
+},
+source: unescape('updateClassesList%0A%20%20%20%20TabManager%20current%20update.%0A%20%20%20%20classesList%20contents%3A%20%5B%3Ahtml%20%7C%0A%09self%20classes%20do%3A%20%5B%3Aeach%20%7C%7C%20li%20%7C%0A%09%20%20%20%20li%20%3A%3D%20html%20li.%0A%09%20%20%20%20selectedClass%20%3D%20each%20ifTrue%3A%20%5B%0A%09%09li%20class%3A%20%27selected%27%5D.%0A%09%20%20%20%20li%0A%09%09with%3A%20each%20name%3B%0A%09%09onClick%3A%20%5Bself%20selectClass%3A%20each%5D%5D%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_updateProtocolsList',
+smalltalk.method({
+selector: 'updateProtocolsList',
+category: 'updating',
+fn: function () {
+    var self = this;
+    self['@protocolsList']._contents_(function (html) {return self._protocols()._do_(function (each) {var li = nil;li = html._li();self['@selectedProtocol'].__eq(each)._ifTrue_(function () {return li._class_("selected");});return function ($rec) {$rec._with_(each);return $rec._onClick_(function () {return self._selectProtocol_(each);});}(li);});});
+    return self;
+},
+source: unescape('updateProtocolsList%0A%20%20%20%20protocolsList%20contents%3A%20%5B%3Ahtml%20%7C%0A%09self%20protocols%20do%3A%20%5B%3Aeach%20%7C%7C%20li%20%7C%0A%09%20%20%20%20li%20%3A%3D%20html%20li.%0A%09%20%20%20%20selectedProtocol%20%3D%20each%20ifTrue%3A%20%5B%0A%09%09li%20class%3A%20%27selected%27%5D.%0A%09%20%20%20%20li%20%0A%09%09with%3A%20each%3B%0A%09%09onClick%3A%20%5Bself%20selectProtocol%3A%20each%5D%5D%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_updateMethodsList',
+smalltalk.method({
+selector: 'updateMethodsList',
+category: 'updating',
+fn: function () {
+    var self = this;
+    self['@methodsList']._contents_(function (html) {return self._methods()._do_(function (each) {var li = nil;li = html._li();self['@selectedMethod'].__eq(each)._ifTrue_(function () {return li._class_("selected");});return function ($rec) {$rec._with_(each._selector());return $rec._onClick_(function () {return self._selectMethod_(each);});}(li);});});
+    return self;
+},
+source: unescape('updateMethodsList%0A%20%20%20%20methodsList%20contents%3A%20%5B%3Ahtml%20%7C%0A%09self%20methods%20do%3A%20%5B%3Aeach%20%7C%7C%20li%20%7C%0A%09%20%20%20%20li%20%3A%3D%20html%20li.%0A%09%20%20%20%20selectedMethod%20%3D%20each%20ifTrue%3A%20%5B%0A%09%09li%20class%3A%20%27selected%27%5D.%0A%09%20%20%20%20li%0A%09%09with%3A%20each%20selector%3B%0A%09%09onClick%3A%20%5Bself%20selectMethod%3A%20each%5D%5D%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_updateTabsList',
+smalltalk.method({
+selector: 'updateTabsList',
+category: 'updating',
+fn: function () {
+    var self = this;
+    self['@tabsList']._contents_(function (html) {var li = nil;li = html._li();self['@selectedTab'].__eq("instance")._ifTrue_(function () {return li._class_("selected");});(function ($rec) {$rec._with_("Instance");return $rec._onClick_(function () {return self._selectTab_("instance");});}(li));li = html._li();self['@selectedTab'].__eq("class")._ifTrue_(function () {return li._class_("selected");});(function ($rec) {$rec._with_("Class");return $rec._onClick_(function () {return self._selectTab_("class");});}(li));li = html._li();self['@selectedTab'].__eq("comment")._ifTrue_(function () {return li._class_("selected");});return function ($rec) {$rec._with_("Comment");return $rec._onClick_(function () {return self._selectTab_("comment");});}(li);});
+    return self;
+},
+source: unescape('updateTabsList%0A%20%20%20%20tabsList%20contents%3A%20%5B%3Ahtml%20%7C%7C%20li%20%7C%0A%09li%20%3A%3D%20html%20li.%0A%09selectedTab%20%3D%20%23instance%20ifTrue%3A%20%5Bli%20class%3A%20%27selected%27%5D.%0A%09li%0A%09%20%20%20%20with%3A%20%27Instance%27%3B%0A%09%20%20%20%20onClick%3A%20%5Bself%20selectTab%3A%20%23instance%5D.%0A%09li%20%3A%3D%20html%20li.%0A%09selectedTab%20%3D%20%23class%20ifTrue%3A%20%5Bli%20class%3A%20%27selected%27%5D.%0A%09li%0A%09%20%20%20%20with%3A%20%27Class%27%3B%0A%09%20%20%20%20onClick%3A%20%5Bself%20selectTab%3A%20%23class%5D.%0A%09li%20%3A%3D%20html%20li.%0A%09selectedTab%20%3D%20%23comment%20ifTrue%3A%20%5Bli%20class%3A%20%27selected%27%5D.%0A%09li%0A%09%20%20%20%20with%3A%20%27Comment%27%3B%0A%09%20%20%20%20onClick%3A%20%5Bself%20selectTab%3A%20%23comment%5D%5D%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_updateSourceAndButtons',
+smalltalk.method({
+selector: 'updateSourceAndButtons',
+category: 'updating',
+fn: function () {
+    var self = this;
+    self._disableSaveButton();
+    self['@classButtons']._contents_(function (html) {(function ($rec) {$rec._with_("Rename class");return $rec._onClick_(function () {return self._renameClass();});}(html._button()));return function ($rec) {$rec._with_("Remove class");return $rec._onClick_(function () {return self._removeClass();});}(html._button());});
+    self['@methodButtons']._contents_(function (html) {(function ($rec) {$rec._with_("Remove method");return $rec._onClick_(function () {return self._removeMethod();});}(html._button()));return function ($rec) {$rec._onChange_(function (s) {return self._setMethodProtocol_(s._val());});return $rec._with_(function () {(function ($rec) {$rec._with_("Method protocol");return $rec._at_put_("disabled", "disabled");}(html._option()));(function ($rec) {$rec._class_("important");return $rec._with_("New...");}(html._option()));return self._protocols()._do_(function (each) {return html._option()._with_(each);});});}(html._select());});
+    self['@selectedMethod']._ifNil_ifNotNil_(function () {self._hideMethodButtons();return self['@selectedClass']._ifNil_ifNotNil_(function () {return self._hideClassButtons();}, function () {return self._showClassButtons();});}, function () {self._hideClassButtons();return self._showMethodButtons();});
+    self['@sourceTextarea']._asJQuery()._val_(self._source());
+    return self;
+},
+source: unescape('updateSourceAndButtons%0A%09self%20disableSaveButton.%0A%09classButtons%20contents%3A%20%5B%3Ahtml%20%7C%0A%09%09html%20button%0A%09%09%09with%3A%20%27Rename%20class%27%3B%0A%09%09%09onClick%3A%20%5Bself%20renameClass%5D.%0A%09%09html%20button%0A%09%09with%3A%20%27Remove%20class%27%3B%0A%09%09onClick%3A%20%5Bself%20removeClass%5D%5D.%0A%09methodButtons%20contents%3A%20%5B%3Ahtml%20%7C%0A%09%09html%20button%0A%09%09%09with%3A%20%27Remove%20method%27%3B%0A%09%09%09onClick%3A%20%5Bself%20removeMethod%5D.%0A%09%09html%20select%20%0A%09%20%20%20%20%09%09onChange%3A%20%5B%3As%20%7C%20self%20setMethodProtocol%3A%20s%20val%5D%3B%0A%09%20%20%20%20%09%09with%3A%20%5B%0A%09%09%09%09html%20option%0A%09%09%20%20%20%20%09%09%09with%3A%20%27Method%20protocol%27%3B%0A%09%09%20%20%20%20%09%09%09at%3A%20%27disabled%27%20put%3A%20%27disabled%27.%0A%09%09%09%09html%20option%0A%09%09%20%20%20%20%09%09%09class%3A%20%27important%27%3B%0A%09%09%20%20%20%20%09%09%09with%3A%20%27New...%27.%0A%09%09%09%09self%20protocols%20do%3A%20%5B%3Aeach%20%7C%0A%09%09%20%20%20%20%09%09%09html%20option%20with%3A%20each%5D%5D%5D.%0A%20%20%20%20%09selectedMethod%20%0A%09%09ifNil%3A%20%5B%0A%09%20%20%20%20%09%09self%20hideMethodButtons.%0A%09%20%20%20%20%09%09%09selectedClass%20%0A%09%09%09%09%09ifNil%3A%20%5Bself%20hideClassButtons%5D%0A%09%20%20%20%20%09%09%09%09ifNotNil%3A%20%5Bself%20showClassButtons%5D%5D%0A%09%09ifNotNil%3A%20%5B%0A%09%20%20%20%20%09%09self%20hideClassButtons.%0A%09%20%20%20%20%09%09self%20showMethodButtons%5D.%0A%20%20%20%20%09sourceTextarea%20asJQuery%20val%3A%20self%20source%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_canBeClosed',
+smalltalk.method({
+selector: 'canBeClosed',
+category: 'testing',
+fn: function () {
+    var self = this;
+    return true;
+    return self;
+},
+source: unescape('canBeClosed%0A%20%20%20%20%5Etrue%0A')}),
+smalltalk.Browser);
+
+smalltalk.addMethod(
+'_renameClass',
+smalltalk.method({
+selector: 'renameClass',
+category: 'actions',
+fn: function () {
+    var self = this;
+    var newName = nil;
+    newName = self._prompt_("Rename class ".__comma(self['@selectedClass']._name()));
+    newName._notEmpty()._ifTrue_(function () {self['@selectedClass']._rename_(newName);return function ($rec) {$rec._updateClassesList();return $rec._updateSourceAndButtons();}(self);});
+    return self;
+},
+source: unescape('renameClass%0A%20%20%20%20%7C%20newName%20%7C%0A%20%20%20%20newName%20%3A%3D%20self%20prompt%3A%20%27Rename%20class%20%27%2C%20selectedClass%20name.%0A%20%20%20%20newName%20notEmpty%20ifTrue%3A%20%5B%0A%09selectedClass%20rename%3A%20newName.%0A%09self%20%0A%09%09updateClassesList%3B%0A%09%09updateSourceAndButtons%5D%0A')}),
+smalltalk.Browser);
+
+
+smalltalk.addMethod(
+'_openOn_',
+smalltalk.method({
+selector: 'openOn:',
+category: 'convenience',
+fn: function (aClass) {
+    var self = this;
+    (function ($rec) {$rec._open();$rec._selectCategory_(aClass._category());return $rec._selectClass_(aClass);}(self._new()));
+    return self;
+},
+source: unescape('openOn%3A%20aClass%0A%20%20%20%20self%20new%0A%09open%3B%0A%09selectCategory%3A%20aClass%20category%3B%0A%09selectClass%3A%20aClass%0A')}),
+smalltalk.Browser.klass);
+
+smalltalk.addMethod(
+'_open',
+smalltalk.method({
+selector: 'open',
+category: 'convenience',
+fn: function () {
+    var self = this;
+    self._new()._open();
+    return self;
+},
+source: unescape('open%0A%20%20%20%20self%20new%20open%0A')}),
+smalltalk.Browser.klass);
+
+smalltalk.addMethod(
+'_commitPath',
+smalltalk.method({
+selector: 'commitPath',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return "js";
+    return self;
+},
+source: unescape('commitPath%0A%09%5E%27js%27')}),
+smalltalk.Browser.klass);
+
+
+smalltalk.addClass('Inspector', smalltalk.TabWidget, ['label', 'variables', 'selectedVariable', 'variablesList', 'valueTextarea', 'workspaceTextarea'], 'IDE');
+smalltalk.addMethod(
+'_label',
+smalltalk.method({
+selector: 'label',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@label']._ifNil_(function () {return unescape("Inspector%20%28nil%29");});
+    return self;
+},
+source: unescape('label%0A%09%5Elabel%20ifNil%3A%20%5B%27Inspector%20%28nil%29%27%5D')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_canBeClosed',
+smalltalk.method({
+selector: 'canBeClosed',
+category: 'testing',
+fn: function () {
+    var self = this;
+    return true;
+    return self;
+},
+source: unescape('canBeClosed%0A%09%5Etrue')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_inspect_',
+smalltalk.method({
+selector: 'inspect:',
+category: 'accessing',
+fn: function (anObject) {
+    var self = this;
+    anObject._inspectOn_(self);
+    return self;
+},
+source: unescape('inspect%3A%20anObject%0A%09anObject%20inspectOn%3A%20self')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_initialize',
+smalltalk.method({
+selector: 'initialize',
+category: 'initialization',
+fn: function () {
+    var self = this;
+    self.klass.superclass.fn.prototype._initialize.apply(self, []);
+    self['@variables'] = [];
+    return self;
+},
+source: unescape('initialize%0A%09super%20initialize.%0A%09variables%20%3A%3D%20%23%28%29')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_variables',
+smalltalk.method({
+selector: 'variables',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@variables'];
+    return self;
+},
+source: unescape('variables%0A%09%5Evariables')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_setVariables_',
+smalltalk.method({
+selector: 'setVariables:',
+category: 'accessing',
+fn: function (aCollection) {
+    var self = this;
+    self['@variables'] = aCollection;
+    return self;
+},
+source: unescape('setVariables%3A%20aCollection%0A%09variables%20%3A%3D%20aCollection')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_setLabel_',
+smalltalk.method({
+selector: 'setLabel:',
+category: 'accessing',
+fn: function (aString) {
+    var self = this;
+    self['@label'] = aString;
+    return self;
+},
+source: unescape('setLabel%3A%20aString%0A%09label%20%3A%3D%20aString')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_renderBoxOn_',
+smalltalk.method({
+selector: 'renderBoxOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._renderTopPanelOn_(html);return $rec._renderBottomPanelOn_(html);}(self));
+    return self;
+},
+source: unescape('renderBoxOn%3A%20html%0A%09self%20%0A%09%09renderTopPanelOn%3A%20html%3B%0A%09%09renderBottomPanelOn%3A%20html')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_renderTopPanelOn_',
+smalltalk.method({
+selector: 'renderTopPanelOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._class_("top");return $rec._with_(function () {self['@variablesList'] = html._ul()._class_("jt_column variables");self['@valueTextarea'] = function ($rec) {$rec._class_("jt_column value");return $rec._at_put_("readonly", "readonly");}(html._textarea());(function ($rec) {$rec._updateVariablesList();return $rec._updateValueTextarea();}(self));return html._div()._class_("jt_clear");});}(html._div()));
+    return self;
+},
+source: unescape('renderTopPanelOn%3A%20html%0A%20%20%20%20html%20div%20%0A%09class%3A%20%27top%27%3B%20%0A%09with%3A%20%5B%0A%09%20%20%20%20variablesList%20%3A%3D%20html%20ul%20class%3A%20%27jt_column%20variables%27.%0A%09%20%20%20%20valueTextarea%20%3A%3D%20html%20textarea%20class%3A%20%27jt_column%20value%27%3B%20at%3A%20%27readonly%27%20put%3A%20%27readonly%27.%0A%09%20%20%20%20self%0A%09%09updateVariablesList%3B%0A%09%09updateValueTextarea.%0A%09%20%20%20%20html%20div%20class%3A%20%27jt_clear%27%5D%0A')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_renderBottomPanelOn_',
+smalltalk.method({
+selector: 'renderBottomPanelOn:',
+category: 'rendering',
+fn: function (html) {
+    var self = this;
+    (function ($rec) {$rec._class_("jt_sourceCode");return $rec._with_(function () {self['@workspaceTextarea'] = function ($rec) {$rec._class_("source");return $rec._at_put_("spellcheck", "false");}(html._textarea());return self['@workspaceTextarea']._asJQuery()._call_("tabby");});}(html._div()));
+    return self;
+},
+source: unescape('renderBottomPanelOn%3A%20html%0A%20%20%20%20html%20div%0A%09class%3A%20%27jt_sourceCode%27%3B%0A%09with%3A%20%5B%0A%09%20%20%20%20workspaceTextarea%20%3A%3D%20html%20textarea%20%0A%09%09class%3A%20%27source%27%3B%0A%09%09at%3A%20%27spellcheck%27%20put%3A%20%27false%27.%0A%09%20%20%20%20workspaceTextarea%20asJQuery%20call%3A%20%27tabby%27%5D%0A')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_updateVariablesList',
+smalltalk.method({
+selector: 'updateVariablesList',
+category: 'updating',
+fn: function () {
+    var self = this;
+    self['@variablesList']._contents_(function (html) {return self._variables()._keys()._do_(function (each) {var li = nil;li = html._li();(function ($rec) {$rec._with_(each);return $rec._onClick_(function () {return self._selectVariable_(each);});}(li));return self._selectedVariable().__eq(each)._ifTrue_(function () {return li._class_("selected");});});});
+    return self;
+},
+source: unescape('updateVariablesList%0A%09variablesList%20contents%3A%20%5B%3Ahtml%20%7C%0A%09%09self%20variables%20keys%20do%3A%20%5B%3Aeach%20%7C%7C%20li%20%7C%0A%09%09%09li%20%3A%3D%20html%20li.%0A%09%09%09li%0A%09%09%09%09with%3A%20each%3B%0A%09%09%09%09onClick%3A%20%5Bself%20selectVariable%3A%20each%5D.%0A%09%09%09self%20selectedVariable%20%3D%20each%20ifTrue%3A%20%5B%0A%09%09%09%09li%20class%3A%20%27selected%27%5D%5D%5D')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_selectedVariable',
+smalltalk.method({
+selector: 'selectedVariable',
+category: 'accessing',
+fn: function () {
+    var self = this;
+    return self['@selectedVariable'];
+    return self;
+},
+source: unescape('selectedVariable%0A%09%5EselectedVariable')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_selectedVariable_',
+smalltalk.method({
+selector: 'selectedVariable:',
+category: 'accessing',
+fn: function (aString) {
+    var self = this;
+    self['@selectedVariable'] = aString;
+    return self;
+},
+source: unescape('selectedVariable%3A%20aString%0A%09selectedVariable%20%3A%3D%20aString')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_selectVariable_',
+smalltalk.method({
+selector: 'selectVariable:',
+category: 'updating',
+fn: function (aString) {
+    var self = this;
+    self._selectedVariable_(aString);
+    (function ($rec) {$rec._updateVariablesList();return $rec._updateValueTextarea();}(self));
+    return self;
+},
+source: unescape('selectVariable%3A%20aString%0A%09self%20selectedVariable%3A%20aString.%0A%09self%20%0A%09%09updateVariablesList%3B%0A%09%09updateValueTextarea')}),
+smalltalk.Inspector);
+
+smalltalk.addMethod(
+'_updateValueTextarea',
+smalltalk.method({
+selector: 'updateValueTextarea',
+category: 'updating',
+fn: function () {
+    var self = this;
+    self['@valueTextarea']._asJQuery()._val_(self._selectedVariable()._isNil()._ifTrue_ifFalse_(function () {return "";}, function () {return self._variables()._at_(self._selectedVariable())._printString();}));
+    return self;
+},
+source: unescape('updateValueTextarea%0A%09valueTextarea%20asJQuery%20val%3A%20%28self%20selectedVariable%20isNil%0A%09%09ifTrue%3A%20%5B%27%27%5D%0A%09%09ifFalse%3A%20%5B%28self%20variables%20at%3A%20self%20selectedVariable%29%20printString%5D%29')}),
+smalltalk.Inspector);
+
+
+smalltalk.addMethod(
+'_on_',
+smalltalk.method({
+selector: 'on:',
+category: 'instance creation',
+fn: function (anObject) {
+    var self = this;
+    return function ($rec) {$rec._inspect_(anObject);return $rec._yourself();}(self._new());
+    return self;
+},
+source: unescape('on%3A%20anObject%0A%09%5Eself%20new%0A%09%09inspect%3A%20anObject%3B%0A%09%09yourself')}),
+smalltalk.Inspector.klass);
+
+

js/boot.js

@@ -142,3 +142,7 @@ smalltalk.mapClassName("String", "Kernel", String, smalltalk.Collection);
 smalltalk.mapClassName("RegularExpression", "Kernel", RegExp, smalltalk.String);
 smalltalk.mapClassName("Array", "Kernel", Array, smalltalk.Collection);
 
+if(CanvasRenderingContext2D) {
+    smalltalk.mapClassName("CanvasRenderingContext", "Canvas", CanvasRenderingContext2D, smalltalk.Object);
+}
+

js/ide.js

@@ -1,1359 +0,0 @@
-smalltalk.addClass('TabManager', smalltalk.Widget, ['selectedTab', 'tabs', 'opened'], 'IDE');
-smalltalk.addMethod(
-'_initialize',
-smalltalk.method({
-selector: 'initialize',
-category: 'initialization',
-fn: function (){
-var self=this;
-self.klass.superclass.fn.prototype['_initialize'].apply(self, []);
-self['@opened']=true;
-(function($rec){$rec._append_(self);$rec._append_((function(html){return html._div()._id_("jtalk");}));return $rec._addClass_("jtalkBody");})("body"._asJQuery());
-(function($rec){$rec._addTab_(smalltalk.Transcript._current());return $rec._addTab_(smalltalk.Workspace._new());})(self);
-self._selectTab_(self._tabs()._last());
-(function($rec){$rec._onResize_((function(){return (function($rec){$rec._updateBodyMargin();return $rec._updatePosition();})(self);}));return $rec._onWindowResize_((function(){return self._updatePosition();}));})(self);
-return self;},
-source: unescape('initialize%0A%20%20%20%20super%20initialize.%0A%20%20%20%20opened%20%3A%3D%20true.%0A%20%20%20%20%27body%27%20asJQuery%20%0A%09append%3A%20self%3B%0A%09append%3A%20%5B%3Ahtml%20%7C%20html%20div%20id%3A%20%27jtalk%27%5D%3B%0A%09addClass%3A%20%27jtalkBody%27.%0A%20%20%20%20self%20%0A%09addTab%3A%20Transcript%20current%3B%0A%09addTab%3A%20Workspace%20new.%0A%20%20%20%20self%20selectTab%3A%20self%20tabs%20last.%0A%20%20%20%20self%20%0A%09onResize%3A%20%5Bself%20updateBodyMargin%3B%20updatePosition%5D%3B%0A%09onWindowResize%3A%20%5Bself%20updatePosition%5D%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_tabs',
-smalltalk.method({
-selector: 'tabs',
-category: 'accessing',
-fn: function (){
-var self=this;
-return self['@tabs']._ifNil_((function(){return self['@tabs']=smalltalk.Array._new();}));
-return self;},
-source: unescape('tabs%0A%20%20%20%20%5Etabs%20ifNil%3A%20%5Btabs%20%3A%3D%20Array%20new%5D%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_addTab_',
-smalltalk.method({
-selector: 'addTab:',
-category: 'adding/Removing',
-fn: function (aWidget){
-var self=this;
-self._tabs()._add_(aWidget);
-unescape("%23jtalk")._asJQuery()._append_(aWidget);
-aWidget._root()._asJQuery()._hide();
-return self;},
-source: unescape('addTab%3A%20aWidget%0A%20%20%20%20self%20tabs%20add%3A%20aWidget.%0A%20%20%20%20%27%23jtalk%27%20asJQuery%20append%3A%20aWidget.%0A%20%20%20%20aWidget%20root%20asJQuery%20hide%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_removeTab_',
-smalltalk.method({
-selector: 'removeTab:',
-category: 'adding/Removing',
-fn: function (aWidget){
-var self=this;
-self._tabs()._remove_(aWidget);
-self._update();
-return self;},
-source: unescape('removeTab%3A%20aWidget%0A%20%20%20%20self%20tabs%20remove%3A%20aWidget.%0A%20%20%20%20self%20update%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_updateBodyMargin',
-smalltalk.method({
-selector: 'updateBodyMargin',
-category: 'actions',
-fn: function (){
-var self=this;
-self._setBodyMargin_(unescape("%23jtalk")._asJQuery()._height().__plus((27)));
-return self;},
-source: unescape('updateBodyMargin%0A%20%20%20%20self%20setBodyMargin%3A%20%27%23jtalk%27%20asJQuery%20height%20+%2027%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_updatePosition',
-smalltalk.method({
-selector: 'updatePosition',
-category: 'actions',
-fn: function (){
-var self=this;
-(function(){jQuery('#jtalk').css('top', '').css('bottom', '27px');})();
-return self;},
-source: unescape('updatePosition%0A%20%20%20%20%7B%27jQuery%28%27%27%23jtalk%27%27%29.css%28%27%27top%27%27%2C%20%27%27%27%27%27%27%29.css%28%27%27bottom%27%27%2C%20%27%2727px%27%27%29%3B%27%7D%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_removeBodyMargin',
-smalltalk.method({
-selector: 'removeBodyMargin',
-category: 'actions',
-fn: function (){
-var self=this;
-self._setBodyMargin_((0));
-return self;},
-source: unescape('removeBodyMargin%0A%20%20%20%20self%20setBodyMargin%3A%200%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_setBodyMargin_',
-smalltalk.method({
-selector: 'setBodyMargin:',
-category: 'actions',
-fn: function (anInteger){
-var self=this;
-".jtalkBody"._asJQuery()._cssAt_put_(unescape("margin-bottom"),anInteger._asString().__comma("px"));
-return self;},
-source: unescape('setBodyMargin%3A%20anInteger%0A%20%20%20%20%27.jtalkBody%27%20asJQuery%20cssAt%3A%20%27margin-bottom%27%20put%3A%20anInteger%20asString%2C%20%27px%27%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_onResize_',
-smalltalk.method({
-selector: 'onResize:',
-category: 'actions',
-fn: function (aBlock){
-var self=this;
-(function(){jQuery('#jtalk').resizable({
-	handles: 'n', 
-	resize: aBlock,
-	minHeight: 230
-});})();
-return self;},
-source: unescape('onResize%3A%20aBlock%0A%20%20%20%20%7B%27jQuery%28%27%27%23jtalk%27%27%29.resizable%28%7B%0A%09handles%3A%20%27%27n%27%27%2C%20%0A%09resize%3A%20aBlock%2C%0A%09minHeight%3A%20230%0A%7D%29%3B%27%7D%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_onWindowResize_',
-smalltalk.method({
-selector: 'onWindowResize:',
-category: 'actions',
-fn: function (aBlock){
-var self=this;
-(function(){jQuery(window).resize(aBlock)})();
-return self;},
-source: unescape('onWindowResize%3A%20aBlock%0A%20%20%20%20%7B%27jQuery%28window%29.resize%28aBlock%29%27%7D%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_open',
-smalltalk.method({
-selector: 'open',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@opened']._ifFalse_((function(){self._root()._asJQuery()._show();"body"._asJQuery()._addClass_("jtalkBody");unescape("%23jtalk")._asJQuery()._show();self._updateBodyMargin();self['@selectedTab']._root()._asJQuery()._show();return self['@opened']=true;}));
-return self;},
-source: unescape('open%0A%20%20%20%20opened%20ifFalse%3A%20%5B%0A%09self%20root%20asJQuery%20show.%0A%09%27body%27%20asJQuery%20addClass%3A%20%27jtalkBody%27.%0A%09%27%23jtalk%27%20asJQuery%20show.%0A%09self%20updateBodyMargin.%0A%09selectedTab%20root%20asJQuery%20show.%0A%09opened%20%3A%3D%20true%5D%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_close',
-smalltalk.method({
-selector: 'close',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@opened']._ifTrue_((function(){self._root()._asJQuery()._hide();unescape("%23jtalk")._asJQuery()._hide();self._removeBodyMargin();"body"._asJQuery()._removeClass_("jtalkBody");return self['@opened']=false;}));
-return self;},
-source: unescape('close%0A%20%20%20%20opened%20ifTrue%3A%20%5B%0A%09self%20root%20asJQuery%20hide.%0A%09%27%23jtalk%27%20asJQuery%20hide.%0A%09self%20removeBodyMargin.%0A%09%27body%27%20asJQuery%20removeClass%3A%20%27jtalkBody%27.%0A%09opened%20%3A%3D%20false%5D%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_newBrowserTab',
-smalltalk.method({
-selector: 'newBrowserTab',
-category: 'actions',
-fn: function (){
-var self=this;
-smalltalk.Browser._open();
-return self;},
-source: unescape('newBrowserTab%0A%20%20%20%20Browser%20open%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_selectTab_',
-smalltalk.method({
-selector: 'selectTab:',
-category: 'actions',
-fn: function (aWidget){
-var self=this;
-self._open();
-self['@selectedTab']=aWidget;
-self._tabs()._do_((function(each){return each._root()._asJQuery()._hide();}));
-aWidget._root()._asJQuery()._show();
-self._update();
-return self;},
-source: unescape('selectTab%3A%20aWidget%0A%20%20%20%20self%20open.%0A%20%20%20%20selectedTab%20%3A%3D%20aWidget.%0A%20%20%20%20self%20tabs%20do%3A%20%5B%3Aeach%20%7C%0A%09each%20root%20asJQuery%20hide%5D.%0A%20%20%20%20aWidget%20root%20asJQuery%20show.%0A%20%20%20%20self%20update%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_closeTab_',
-smalltalk.method({
-selector: 'closeTab:',
-category: 'actions',
-fn: function (aWidget){
-var self=this;
-self._removeTab_(aWidget);
-self._selectTab_(self._tabs()._last());
-aWidget._root()._asJQuery()._remove();
-self._update();
-return self;},
-source: unescape('closeTab%3A%20aWidget%0A%20%20%20%20self%20removeTab%3A%20aWidget.%0A%20%20%20%20self%20selectTab%3A%20self%20tabs%20last.%0A%20%20%20%20aWidget%20root%20asJQuery%20remove.%0A%20%20%20%20self%20update%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_renderOn_',
-smalltalk.method({
-selector: 'renderOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-(function($rec){$rec._id_("jtalkTabs");return $rec._with_((function(){(function($rec){$rec._class_("closeAll");$rec._with_("x");return $rec._onClick_((function(){return self._close();}));})(html._li());self._tabs()._do_((function(each){return self._renderTabFor_on_(each,html);}));return (function($rec){$rec._class_("newtab");$rec._with_(unescape("%20+%20"));return $rec._onClick_((function(){return self._newBrowserTab();}));})(html._li());}));})(html._ul());
-return self;},
-source: unescape('renderOn%3A%20html%0A%20%20%20%20html%20ul%0A%09id%3A%20%27jtalkTabs%27%3B%0A%09with%3A%20%5B%0A%09%20%20%20%20html%20li%20%0A%09%09class%3A%20%27closeAll%27%3B%0A%09%09with%3A%20%27x%27%3B%0A%09%09onClick%3A%20%5Bself%20close%5D.%0A%09%20%20%20%20self%20tabs%20do%3A%20%5B%3Aeach%20%7C%0A%09%09self%20renderTabFor%3A%20each%20on%3A%20html%5D.%0A%09%20%20%20%20html%20li%0A%09%09class%3A%20%27newtab%27%3B%0A%09%09with%3A%20%27%20+%20%27%3B%0A%09%09onClick%3A%20%5Bself%20newBrowserTab%5D%5D%0A')}),
-smalltalk.TabManager);
-
-smalltalk.addMethod(
-'_renderTabFor_on_',
-smalltalk.method({
-selector: 'renderTabFor:on:',
-category: 'rendering',
-fn: function (aWidget, html){
-var self=this;
-var li=nil;
-li=html._li();
-self['@selectedTab'].__eq(aWidget)._ifTrue_((function(){return li._class_("selected");}));
-li._with_((function(){(function($rec){$rec._with_(aWidget._label());return $rec._onClick_((function(){return self._selectTab_(aWidget);}));})(html._span());return aWidget._canBeClosed()._ifTrue_((function(){return (function($rec){$rec._class_("close");$rec._with_("x");return $rec._onClick_((function(){return self._closeTab_(aWidget);}));})(html._span());}));}));
-return self;},
-source: unescape('renderTabFor%3A%20aWidget%20on%3A%20html%0A%20%20%20%20%7C%20li%20%7C%0A%20%20%20%20li%20%3A%3D%20html%20li.%0A%20%20%20%20selectedTab%20%3D%20aWidget%20ifTrue%3A%20%5B%0A%09li%20class%3A%20%27selected%27%5D.%0A%20%20%20%20li%20with%3A%20%5B%0A%09html%20span%0A%09%20%20%20%20with%3A%20aWidget%20label%3B%0A%09%20%20%20%20onClick%3A%20%5Bself%20selectTab%3A%20aWidget%5D.%0A%09aWidget%20canBeClosed%20ifTrue%3A%20%5B%0A%09%20%20%20%20html%20span%20%0A%09%09class%3A%20%27close%27%3B%0A%09%09with%3A%20%27x%27%3B%0A%09%09onClick%3A%20%5Bself%20closeTab%3A%20aWidget%5D%5D%5D%0A')}),
-smalltalk.TabManager);
-
-
-smalltalk.TabManager.klass.iVarNames = ['current'];
-smalltalk.addMethod(
-'_current',
-smalltalk.method({
-selector: 'current',
-category: 'instance creation',
-fn: function (){
-var self=this;
-return self['@current']._ifNil_((function(){return self['@current']=self.klass.superclass.fn.prototype['_new'].apply(self, []);}));
-return self;},
-source: unescape('current%0A%20%20%20%20%5Ecurrent%20ifNil%3A%20%5Bcurrent%20%3A%3D%20super%20new%5D%0A')}),
-smalltalk.TabManager.klass);
-
-smalltalk.addMethod(
-'_new',
-smalltalk.method({
-selector: 'new',
-category: 'instance creation',
-fn: function (){
-var self=this;
-self._shouldNotImplement();
-return self;},
-source: unescape('new%0A%20%20%20%20self%20shouldNotImplement%0A')}),
-smalltalk.TabManager.klass);
-
-
-smalltalk.addClass('TabWidget', smalltalk.Widget, [], 'IDE');
-smalltalk.addMethod(
-'_label',
-smalltalk.method({
-selector: 'label',
-category: 'accessing',
-fn: function (){
-var self=this;
-self._subclassResponsibility();
-return self;},
-source: unescape('label%0A%20%20%20%20self%20subclassResponsibility%0A')}),
-smalltalk.TabWidget);
-
-smalltalk.addMethod(
-'_open',
-smalltalk.method({
-selector: 'open',
-category: 'actions',
-fn: function (){
-var self=this;
-(function($rec){$rec._addTab_(self);return $rec._selectTab_(self);})(smalltalk.TabManager._current());
-return self;},
-source: unescape('open%0A%20%20%20%20TabManager%20current%0A%09addTab%3A%20self%3B%0A%09selectTab%3A%20self%0A')}),
-smalltalk.TabWidget);
-
-smalltalk.addMethod(
-'_canBeClosed',
-smalltalk.method({
-selector: 'canBeClosed',
-category: 'testing',
-fn: function (){
-var self=this;
-return false;
-return self;},
-source: unescape('canBeClosed%0A%20%20%20%20%5Efalse%0A')}),
-smalltalk.TabWidget);
-
-smalltalk.addMethod(
-'_renderOn_',
-smalltalk.method({
-selector: 'renderOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-(function($rec){$rec._class_("jtalkTool");return $rec._with_((function(){(function($rec){$rec._class_("jt_box");return $rec._with_((function(){return self._renderBoxOn_(html);}));})(html._div());return (function($rec){$rec._class_("jt_buttons");return $rec._with_((function(){return self._renderButtonsOn_(html);}));})(html._div());}));})(html._root());
-return self;},
-source: unescape('renderOn%3A%20html%0A%20%20%20%20html%20root%0A%09class%3A%20%27jtalkTool%27%3B%0A%09with%3A%20%5B%0A%09%20%20%20%20html%20div%0A%09%09class%3A%20%27jt_box%27%3B%0A%09%09with%3A%20%5Bself%20renderBoxOn%3A%20html%5D.%0A%09%20%20%20%20html%20div%0A%09%09class%3A%20%27jt_buttons%27%3B%0A%09%09with%3A%20%5Bself%20renderButtonsOn%3A%20html%5D%5D%0A')}),
-smalltalk.TabWidget);
-
-smalltalk.addMethod(
-'_renderBoxOn_',
-smalltalk.method({
-selector: 'renderBoxOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-
-return self;},
-source: unescape('renderBoxOn%3A%20html%0A')}),
-smalltalk.TabWidget);
-
-smalltalk.addMethod(
-'_renderButtonsOn_',
-smalltalk.method({
-selector: 'renderButtonsOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-
-return self;},
-source: unescape('renderButtonsOn%3A%20html%0A')}),
-smalltalk.TabWidget);
-
-
-smalltalk.addMethod(
-'_open',
-smalltalk.method({
-selector: 'open',
-category: 'instance creation',
-fn: function (){
-var self=this;
-return self._new()._open();
-return self;},
-source: unescape('open%0A%20%20%20%20%5Eself%20new%20open%0A')}),
-smalltalk.TabWidget.klass);
-
-
-smalltalk.addClass('Workspace', smalltalk.TabWidget, ['textarea'], 'IDE');
-smalltalk.addMethod(
-'_label',
-smalltalk.method({
-selector: 'label',
-category: 'accessing',
-fn: function (){
-var self=this;
-return unescape("%5BWorkspace%5D");
-return self;},
-source: unescape('label%0A%20%20%20%20%5E%27%5BWorkspace%5D%27%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_selection',
-smalltalk.method({
-selector: 'selection',
-category: 'accessing',
-fn: function (){
-var self=this;
-return (function(){return document.selection})();
-return self;},
-source: unescape('selection%0A%20%20%20%20%5E%7B%27return%20document.selection%27%7D%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_selectionStart',
-smalltalk.method({
-selector: 'selectionStart',
-category: 'accessing',
-fn: function (){
-var self=this;
-return (function(){return jQuery('.jt_workspace')[0].selectionStart})();
-return self;},
-source: unescape('selectionStart%0A%20%20%20%20%5E%7B%27return%20jQuery%28%27%27.jt_workspace%27%27%29%5B0%5D.selectionStart%27%7D%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_selectionEnd',
-smalltalk.method({
-selector: 'selectionEnd',
-category: 'accessing',
-fn: function (){
-var self=this;
-return (function(){return jQuery('.jt_workspace')[0].selectionEnd})();
-return self;},
-source: unescape('selectionEnd%0A%20%20%20%20%5E%7B%27return%20jQuery%28%27%27.jt_workspace%27%27%29%5B0%5D.selectionEnd%27%7D%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_selectionStart_',
-smalltalk.method({
-selector: 'selectionStart:',
-category: 'accessing',
-fn: function (anInteger){
-var self=this;
-(function(){jQuery('.jt_workspace')[0].selectionStart = anInteger})();
-return self;},
-source: unescape('selectionStart%3A%20anInteger%0A%20%20%20%20%7B%27jQuery%28%27%27.jt_workspace%27%27%29%5B0%5D.selectionStart%20%3D%20anInteger%27%7D%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_selectionEnd_',
-smalltalk.method({
-selector: 'selectionEnd:',
-category: 'accessing',
-fn: function (anInteger){
-var self=this;
-(function(){jQuery('.jt_workspace')[0].selectionEnd = anInteger})();
-return self;},
-source: unescape('selectionEnd%3A%20anInteger%0A%20%20%20%20%7B%27jQuery%28%27%27.jt_workspace%27%27%29%5B0%5D.selectionEnd%20%3D%20anInteger%27%7D%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_currentLine',
-smalltalk.method({
-selector: 'currentLine',
-category: 'accessing',
-fn: function (){
-var self=this;
-try{var lines=nil;
-var startLine=nil;
-var endLine=nil;
-lines=self['@textarea']._asJQuery()._val()._tokenize_(smalltalk.String._cr());
-startLine=endLine=(0);
-lines._do_((function(each){endLine=startLine.__plus(each._size());startLine=endLine.__plus((1));return endLine.__gt_eq(self._selectionStart())._ifTrue_((function(){self._selectionEnd_(endLine);return (function(){throw({name: 'stReturn', selector: '_currentLine', fn: function(){return each}})})();}));}));
-return self;
-} catch(e) {if(e.name === 'stReturn' && e.selector === '_currentLine'){return e.fn()} throw(e)}},
-source: unescape('currentLine%0A%20%20%20%20%7C%20lines%20startLine%20endLine%7C%0A%20%20%20%20lines%20%3A%3D%20textarea%20asJQuery%20val%20tokenize%3A%20String%20cr.%0A%20%20%20%20startLine%20%3A%3D%20endLine%20%3A%3D%200.%0A%20%20%20%20lines%20do%3A%20%5B%3Aeach%20%7C%0A%09endLine%20%3A%3D%20startLine%20+%20each%20size.%0A%09startLine%20%3A%3D%20endLine%20+%201.%0A%09endLine%20%3E%3D%20self%20selectionStart%20ifTrue%3A%20%5B%0A%09%20%20%20%20self%20selectionEnd%3A%20endLine.%0A%09%20%20%20%20%5Eeach%5D%5D%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_handleKeyDown_',
-smalltalk.method({
-selector: 'handleKeyDown:',
-category: 'actions',
-fn: function (anEvent){
-var self=this;
-return (function(){if(anEvent.ctrlKey) {
-		if(anEvent.keyCode === 68) { //ctrl+p
-			self._printIt();
-			return false;
-		}
-		if(anEvent.keyCode === 80) { //ctrl+d
-			self._doIt();
-			return false;
-		}
-	}})();
-return self;},
-source: unescape('handleKeyDown%3A%20anEvent%0A%20%20%20%20%5E%7B%27if%28anEvent.ctrlKey%29%20%7B%0A%09%09if%28anEvent.keyCode%20%3D%3D%3D%2068%29%20%7B%20//ctrl+p%0A%09%09%09self._printIt%28%29%3B%0A%09%09%09return%20false%3B%0A%09%09%7D%0A%09%09if%28anEvent.keyCode%20%3D%3D%3D%2080%29%20%7B%20//ctrl+d%0A%09%09%09self._doIt%28%29%3B%0A%09%09%09return%20false%3B%0A%09%09%7D%0A%09%7D%27%7D%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_clearWorkspace',
-smalltalk.method({
-selector: 'clearWorkspace',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@textarea']._asJQuery()._val_("");
-return self;},
-source: unescape('clearWorkspace%0A%20%20%20%20textarea%20asJQuery%20val%3A%20%27%27%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_doIt',
-smalltalk.method({
-selector: 'doIt',
-category: 'actions',
-fn: function (){
-var self=this;
-self._printIt();
-return self;},
-source: unescape('doIt%0A%20%20%20%20self%20printIt%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_printIt',
-smalltalk.method({
-selector: 'printIt',
-category: 'actions',
-fn: function (){
-var self=this;
-var selection=nil;
-self['@textarea']._asJQuery()._focus();
-self._selectionStart().__eq(self._selectionEnd())._ifTrue_ifFalse_((function(){return selection=self._currentLine();}),(function(){return selection=self['@textarea']._asJQuery()._val()._copyFrom_to_(self._selectionStart().__plus((1)),self._selectionEnd().__plus((1)));}));
-self._print_(self._eval_(selection)._printString());
-return self;},
-source: unescape('printIt%0A%20%20%20%20%7C%20selection%20%7C%0A%20%20%20%20textarea%20asJQuery%20focus.%0A%20%20%20%20self%20selectionStart%20%3D%20self%20selectionEnd%0A%09ifTrue%3A%20%5Bselection%20%3A%3D%20self%20currentLine%5D%0A%09ifFalse%3A%20%5B%0A%09%20%20%20%20selection%20%3A%3D%20textarea%20asJQuery%20val%20copyFrom%3A%20self%20selectionStart%20+%201%20to%3A%20self%20selectionEnd%20+%201%5D.%0A%20%20%20%20self%20print%3A%20%28self%20eval%3A%20selection%29%20printString%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_print_',
-smalltalk.method({
-selector: 'print:',
-category: 'actions',
-fn: function (aString){
-var self=this;
-var start=nil;
-start=self._selectionEnd();
-self['@textarea']._asJQuery()._val_(self['@textarea']._asJQuery()._val()._copyFrom_to_((1),start).__comma(" ").__comma(aString).__comma(" ").__comma(self['@textarea']._asJQuery()._val()._copyFrom_to_(start.__plus((1)),self['@textarea']._asJQuery()._val()._size())));
-self._selectionStart_(start);
-self._selectionEnd_(start.__plus(aString._size()).__plus((2)));
-return self;},
-source: unescape('print%3A%20aString%0A%20%20%20%20%7C%20start%20%7C%0A%20%20%20%20start%20%3A%3D%20self%20selectionEnd.%0A%20%20%20%20textarea%20asJQuery%20val%3A%20%28%0A%09%28textarea%20asJQuery%20val%20copyFrom%3A%201%20to%3A%20start%29%2C%0A%09%27%20%27%2C%20aString%2C%20%27%20%27%2C%0A%09%28textarea%20asJQuery%20val%20copyFrom%3A%20start%20+%201%20to%3A%20textarea%20asJQuery%20val%20size%29%29.%0A%20%20%20%20self%20selectionStart%3A%20start.%0A%20%20%20%20self%20selectionEnd%3A%20start%20+%20aString%20size%20+%202%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_eval_',
-smalltalk.method({
-selector: 'eval:',
-category: 'actions',
-fn: function (aString){
-var self=this;
-try{var compiler=nil;
-var node=nil;
-compiler=smalltalk.Compiler._new();
-node=compiler._parseExpression_(aString);
-node._isParseFailure()._ifTrue_((function(){return (function(){throw({name: 'stReturn', selector: '_eval_', fn: function(){return self._alert_(node._reason().__comma(unescape("%2C%20position%3A%20")).__comma(node._position()))}})})();}));
-(function(){throw({name: 'stReturn', selector: '_eval_', fn: function(){return compiler._loadExpression_(aString)}})})();
-return self;
-} catch(e) {if(e.name === 'stReturn' && e.selector === '_eval_'){return e.fn()} throw(e)}},
-source: unescape('eval%3A%20aString%0A%20%20%20%20%7C%20compiler%20node%20%7C%0A%20%20%20%20compiler%20%3A%3D%20Compiler%20new.%0A%20%20%20%20node%20%3A%3D%20compiler%20parseExpression%3A%20aString.%0A%20%20%20%20node%20isParseFailure%20ifTrue%3A%20%5B%0A%09%5Eself%20alert%3A%20node%20reason%2C%20%27%2C%20position%3A%20%27%2C%20node%20position%5D.%0A%20%20%20%20%5Ecompiler%20loadExpression%3A%20aString%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_renderBoxOn_',
-smalltalk.method({
-selector: 'renderBoxOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-self['@textarea']=html._textarea();
-self['@textarea']._asJQuery()._call_("tabby");
-self['@textarea']._onKeyDown_((function(e){return self._handleKeyDown_(e);}));
-(function($rec){$rec._class_("jt_workspace");return $rec._at_put_("spellcheck","false");})(self['@textarea']);
-return self;},
-source: unescape('renderBoxOn%3A%20html%0A%20%20%20%20textarea%20%3A%3D%20html%20textarea.%0A%20%20%20%20textarea%20asJQuery%20call%3A%20%27tabby%27.%0A%20%20%20%20textarea%20onKeyDown%3A%20%5B%3Ae%20%7C%20self%20handleKeyDown%3A%20e%5D.%0A%20%20%20%20textarea%20%0A%09class%3A%20%27jt_workspace%27%3B%0A%09at%3A%20%27spellcheck%27%20put%3A%20%27false%27%0A')}),
-smalltalk.Workspace);
-
-smalltalk.addMethod(
-'_renderButtonsOn_',
-smalltalk.method({
-selector: 'renderButtonsOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-(function($rec){$rec._with_("DoIt");$rec._title_(unescape("ctrl+d"));return $rec._onClick_((function(){return self._doIt();}));})(html._button());
-(function($rec){$rec._with_("PrintIt");$rec._title_(unescape("ctrl+p"));return $rec._onClick_((function(){return self._printIt();}));})(html._button());
-(function($rec){$rec._with_("Clear workspace");return $rec._onClick_((function(){return self._clearWorkspace();}));})(html._button());
-return self;},
-source: unescape('renderButtonsOn%3A%20html%0A%20%20%20%20html%20button%0A%09with%3A%20%27DoIt%27%3B%0A%09title%3A%20%27ctrl+d%27%3B%0A%09onClick%3A%20%5Bself%20doIt%5D.%0A%20%20%20%20html%20button%0A%09with%3A%20%27PrintIt%27%3B%0A%09title%3A%20%27ctrl+p%27%3B%0A%09onClick%3A%20%5Bself%20printIt%5D.%0A%20%20%20%20html%20button%0A%09with%3A%20%27Clear%20workspace%27%3B%0A%09onClick%3A%20%5Bself%20clearWorkspace%5D%0A')}),
-smalltalk.Workspace);
-
-
-
-smalltalk.addClass('Transcript', smalltalk.TabWidget, ['textarea'], 'IDE');
-smalltalk.addMethod(
-'_label',
-smalltalk.method({
-selector: 'label',
-category: 'accessing',
-fn: function (){
-var self=this;
-return unescape("%5BTranscript%5D");
-return self;},
-source: unescape('label%0A%20%20%20%20%5E%27%5BTranscript%5D%27%0A')}),
-smalltalk.Transcript);
-
-smalltalk.addMethod(
-'_show_',
-smalltalk.method({
-selector: 'show:',
-category: 'actions',
-fn: function (anObject){
-var self=this;
-self['@textarea']._asJQuery()._val_(self['@textarea']._asJQuery()._val().__comma(anObject._asString()));
-return self;},
-source: unescape('show%3A%20anObject%0A%20%20%20%20textarea%20asJQuery%20val%3A%20textarea%20asJQuery%20val%2C%20anObject%20asString.%0A%0A')}),
-smalltalk.Transcript);
-
-smalltalk.addMethod(
-'_cr',
-smalltalk.method({
-selector: 'cr',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@textarea']._asJQuery()._val_(self['@textarea']._asJQuery()._val().__comma(smalltalk.String._cr()));
-return self;},
-source: unescape('cr%0A%20%20%20%20textarea%20asJQuery%20val%3A%20textarea%20asJQuery%20val%2C%20String%20cr.%0A')}),
-smalltalk.Transcript);
-
-smalltalk.addMethod(
-'_clear',
-smalltalk.method({
-selector: 'clear',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@textarea']._asJQuery()._val_("");
-return self;},
-source: unescape('clear%0A%20%20%20%20textarea%20asJQuery%20val%3A%20%27%27%0A')}),
-smalltalk.Transcript);
-
-smalltalk.addMethod(
-'_renderBoxOn_',
-smalltalk.method({
-selector: 'renderBoxOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-self['@textarea']=html._textarea();
-self['@textarea']._asJQuery()._call_("tabby");
-(function($rec){$rec._class_("jt_transcript");return $rec._at_put_("spellcheck","false");})(self['@textarea']);
-return self;},
-source: unescape('renderBoxOn%3A%20html%0A%20%20%20%20textarea%20%3A%3D%20html%20textarea.%0A%20%20%20%20textarea%20asJQuery%20call%3A%20%27tabby%27.%0A%20%20%20%20textarea%20%0A%09class%3A%20%27jt_transcript%27%3B%0A%09at%3A%20%27spellcheck%27%20put%3A%20%27false%27%0A')}),
-smalltalk.Transcript);
-
-smalltalk.addMethod(
-'_renderButtonsOn_',
-smalltalk.method({
-selector: 'renderButtonsOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-(function($rec){$rec._with_("Clear transcript");return $rec._onClick_((function(){return self._clear();}));})(html._button());
-return self;},
-source: unescape('renderButtonsOn%3A%20html%0A%20%20%20%20html%20button%0A%09with%3A%20%27Clear%20transcript%27%3B%0A%09onClick%3A%20%5Bself%20clear%5D%0A')}),
-smalltalk.Transcript);
-
-
-smalltalk.Transcript.klass.iVarNames = ['current'];
-smalltalk.addMethod(
-'_open',
-smalltalk.method({
-selector: 'open',
-category: 'instance creation',
-fn: function (){
-var self=this;
-self._current()._open();
-return self;},
-source: unescape('open%0A%20%20%20%20self%20current%20open%0A')}),
-smalltalk.Transcript.klass);
-
-smalltalk.addMethod(
-'_new',
-smalltalk.method({
-selector: 'new',
-category: 'instance creation',
-fn: function (){
-var self=this;
-self._shouldNotImplement();
-return self;},
-source: unescape('new%0A%20%20%20%20self%20shouldNotImplement%0A')}),
-smalltalk.Transcript.klass);
-
-smalltalk.addMethod(
-'_current',
-smalltalk.method({
-selector: 'current',
-category: 'instance creation',
-fn: function (){
-var self=this;
-return self['@current']._ifNil_((function(){return self['@current']=self.klass.superclass.fn.prototype['_new'].apply(self, []);}));
-return self;},
-source: unescape('current%0A%20%20%20%20%5Ecurrent%20ifNil%3A%20%5Bcurrent%20%3A%3D%20super%20new%5D%0A')}),
-smalltalk.Transcript.klass);
-
-smalltalk.addMethod(
-'_show_',
-smalltalk.method({
-selector: 'show:',
-category: 'printing',
-fn: function (anObject){
-var self=this;
-self._current()._show_(anObject);
-return self;},
-source: unescape('show%3A%20anObject%0A%20%20%20%20self%20current%20show%3A%20anObject%0A')}),
-smalltalk.Transcript.klass);
-
-smalltalk.addMethod(
-'_cr',
-smalltalk.method({
-selector: 'cr',
-category: 'printing',
-fn: function (){
-var self=this;
-self._current()._show_(smalltalk.String._cr());
-return self;},
-source: unescape('cr%0A%20%20%20%20self%20current%20show%3A%20String%20cr%0A')}),
-smalltalk.Transcript.klass);
-
-smalltalk.addMethod(
-'_clear',
-smalltalk.method({
-selector: 'clear',
-category: 'printing',
-fn: function (){
-var self=this;
-self._current()._clear();
-return self;},
-source: unescape('clear%0A%20%20%20%20self%20current%20clear%0A')}),
-smalltalk.Transcript.klass);
-
-
-smalltalk.addClass('Browser', smalltalk.TabWidget, ['selectedCategory', 'selectedClass', 'selectedProtocol', 'selectedMethod', 'commitButton', 'categoriesList', 'classesList', 'protocolsList', 'methodsList', 'sourceTextarea', 'tabsList', 'selectedTab', 'saveButton', 'classButtons', 'methodButtons', 'unsavedChanges'], 'IDE');
-smalltalk.addMethod(
-'_initialize',
-smalltalk.method({
-selector: 'initialize',
-category: 'initialization',
-fn: function (){
-var self=this;
-self.klass.superclass.fn.prototype['_initialize'].apply(self, []);
-self['@selectedTab']="instance";
-self['@unsavedChanges']=false;
-return self;},
-source: unescape('initialize%0A%20%20%20%20super%20initialize.%0A%20%20%20%20selectedTab%20%3A%3D%20%23instance.%0A%20%20%20%20unsavedChanges%20%3A%3D%20false%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_label',
-smalltalk.method({
-selector: 'label',
-category: 'accessing',
-fn: function (){
-var self=this;
-return self['@selectedClass']._ifNil_ifNotNil_((function(){return unescape("Browser%20%28nil%29");}),(function(){return self['@selectedClass']._name();}));
-return self;},
-source: unescape('label%0A%20%20%20%20%5EselectedClass%20%0A%09ifNil%3A%20%5B%27Browser%20%28nil%29%27%5D%0A%09ifNotNil%3A%20%5BselectedClass%20name%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_categories',
-smalltalk.method({
-selector: 'categories',
-category: 'accessing',
-fn: function (){
-var self=this;
-var categories=nil;
-categories=smalltalk.Array._new();
-smalltalk.Smalltalk._current()._classes()._do_((function(each){return categories._includes_(each._category())._ifFalse_((function(){return categories._add_(each._category());}));}));
-return categories._sort();
-return self;},
-source: unescape('categories%0A%20%20%20%20%7C%20categories%20%7C%0A%20%20%20%20categories%20%3A%3D%20Array%20new.%0A%20%20%20%20Smalltalk%20current%20classes%20do%3A%20%5B%3Aeach%20%7C%0A%09%28categories%20includes%3A%20each%20category%29%20ifFalse%3A%20%5B%0A%09%20%20%20%20categories%20add%3A%20each%20category%5D%5D.%0A%20%20%20%20%5Ecategories%20sort%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_classes',
-smalltalk.method({
-selector: 'classes',
-category: 'accessing',
-fn: function (){
-var self=this;
-return smalltalk.Smalltalk._current()._classes()._select_((function(each){return each._category().__eq(self['@selectedCategory']);}))._sort_((function(a, b){return a._name().__gt(b._name());}));
-return self;},
-source: unescape('classes%0A%20%20%20%20%5E%28Smalltalk%20current%20classes%20%0A%09select%3A%20%5B%3Aeach%20%7C%20each%20category%20%3D%20selectedCategory%5D%29%0A%09sort%3A%20%5B%3Aa%20%3Ab%20%7C%20a%20name%20%3E%20b%20name%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_protocols',
-smalltalk.method({
-selector: 'protocols',
-category: 'accessing',
-fn: function (){
-var self=this;
-try{var klass=nil;
-var protocols=nil;
-protocols=smalltalk.Array._new();
-self['@selectedClass']._ifNotNil_((function(){self['@selectedTab'].__eq("comment")._ifTrue_((function(){return (function(){throw({name: 'stReturn', selector: '_protocols', fn: function(){return []}})})();}));klass=self['@selectedTab'].__eq("instance")._ifTrue_ifFalse_((function(){return self['@selectedClass'];}),(function(){return self['@selectedClass']._class();}));klass._methodDictionary()._isEmpty()._ifTrue_((function(){return protocols._add_("not yet classified");}));return klass._methodDictionary()._do_((function(each){return protocols._includes_(each._category())._ifFalse_((function(){return protocols._add_(each._category());}));}));}));
-(function(){throw({name: 'stReturn', selector: '_protocols', fn: function(){return protocols._sort()}})})();
-return self;
-} catch(e) {if(e.name === 'stReturn' && e.selector === '_protocols'){return e.fn()} throw(e)}},
-source: unescape('protocols%0A%20%20%20%20%7C%20klass%20protocols%20%7C%0A%20%20%20%20protocols%20%3A%3D%20Array%20new.%0A%20%20%20%20selectedClass%20ifNotNil%3A%20%5B%0A%09selectedTab%20%3D%20%23comment%20ifTrue%3A%20%5B%5E%23%28%29%5D.%0A%09klass%20%3A%3D%20selectedTab%20%3D%20%23instance%0A%09%20%20%20%20ifTrue%3A%20%5BselectedClass%5D%0A%09%20%20%20%20ifFalse%3A%20%5BselectedClass%20class%5D.%0A%09klass%20methodDictionary%20isEmpty%20ifTrue%3A%20%5B%0A%09%20%20%20%20protocols%20add%3A%20%27not%20yet%20classified%27%5D.%0A%09klass%20methodDictionary%20do%3A%20%5B%3Aeach%20%7C%0A%09%20%20%20%20%28protocols%20includes%3A%20each%20category%29%20ifFalse%3A%20%5B%0A%09%09protocols%20add%3A%20each%20category%5D%5D%5D.%0A%20%20%20%20%5Eprotocols%20sort%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_methods',
-smalltalk.method({
-selector: 'methods',
-category: 'accessing',
-fn: function (){
-var self=this;
-try{var klass=nil;
-self['@selectedTab'].__eq("comment")._ifTrue_((function(){return (function(){throw({name: 'stReturn', selector: '_methods', fn: function(){return []}})})();}));
-self['@selectedClass']._ifNotNil_((function(){return klass=self['@selectedTab'].__eq("instance")._ifTrue_ifFalse_((function(){return self['@selectedClass'];}),(function(){return self['@selectedClass']._class();}));}));
-(function(){throw({name: 'stReturn', selector: '_methods', fn: function(){return self['@selectedProtocol']._ifNil_ifNotNil_((function(){return klass._ifNil_ifNotNil_((function(){return [];}),(function(){return klass._methodDictionary()._values();}));}),(function(){return klass._methodDictionary()._values()._select_((function(each){return each._category().__eq(self['@selectedProtocol']);}));}))._sort_((function(a, b){return a._selector().__gt(b._selector());}))}})})();
-return self;
-} catch(e) {if(e.name === 'stReturn' && e.selector === '_methods'){return e.fn()} throw(e)}},
-source: unescape('methods%0A%20%20%20%20%7C%20klass%20%7C%0A%20%20%20%20selectedTab%20%3D%20%23comment%20ifTrue%3A%20%5B%5E%23%28%29%5D.%0A%20%20%20%20selectedClass%20ifNotNil%3A%20%5B%0A%09klass%20%3A%3D%20selectedTab%20%3D%20%23instance%0A%09%20%20%20%20ifTrue%3A%20%5BselectedClass%5D%0A%09%20%20%20%20ifFalse%3A%20%5BselectedClass%20class%5D%5D.%0A%20%20%20%20%5E%28selectedProtocol%20%0A%09ifNil%3A%20%5B%0A%09%20%20%20%20klass%20%0A%09%09ifNil%3A%20%5B%23%28%29%5D%20%0A%09%09ifNotNil%3A%20%5Bklass%20methodDictionary%20values%5D%5D%0A%09ifNotNil%3A%20%5B%0A%09%20%20%20%20klass%20methodDictionary%20values%20select%3A%20%5B%3Aeach%20%7C%0A%09%09each%20category%20%3D%20selectedProtocol%5D%5D%29%20sort%3A%20%5B%3Aa%20%3Ab%20%7C%20a%20selector%20%3E%20b%20selector%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_source',
-smalltalk.method({
-selector: 'source',
-category: 'accessing',
-fn: function (){
-var self=this;
-try{self['@selectedTab'].__eq("comment")._ifFalse_((function(){return (function(){throw({name: 'stReturn', selector: '_source', fn: function(){return self['@selectedProtocol']._notNil()._or_((function(){return self['@selectedMethod']._notNil();}))._ifFalse_ifTrue_((function(){return self._declarationSource();}),(function(){return self._methodSource();}))}})})();}));
-(function(){throw({name: 'stReturn', selector: '_source', fn: function(){return self['@selectedClass']._ifNil_ifNotNil_((function(){return "";}),(function(){return self._classCommentSource();}))}})})();
-return self;
-} catch(e) {if(e.name === 'stReturn' && e.selector === '_source'){return e.fn()} throw(e)}},
-source: unescape('source%0A%20%20%20%20selectedTab%20%3D%20%23comment%20ifFalse%3A%20%5B%0A%09%5E%28selectedProtocol%20notNil%20or%3A%20%5BselectedMethod%20notNil%5D%29%0A%09%20%20%20%20ifFalse%3A%20%5Bself%20declarationSource%5D%0A%09%20%20%20%20ifTrue%3A%20%5Bself%20methodSource%5D%5D.%0A%20%20%20%20%5EselectedClass%0A%09ifNil%3A%20%5B%27%27%5D%0A%09ifNotNil%3A%20%5Bself%20classCommentSource%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_methodSource',
-smalltalk.method({
-selector: 'methodSource',
-category: 'accessing',
-fn: function (){
-var self=this;
-return self['@selectedMethod']._ifNil_ifNotNil_((function(){return self._dummyMethodSource();}),(function(){return self['@selectedMethod']._source();}));
-return self;},
-source: unescape('methodSource%0A%20%20%20%20%5EselectedMethod%0A%09ifNil%3A%20%5Bself%20dummyMethodSource%5D%0A%09ifNotNil%3A%20%5BselectedMethod%20source%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_dummyMethodSource',
-smalltalk.method({
-selector: 'dummyMethodSource',
-category: 'accessing',
-fn: function (){
-var self=this;
-return unescape("messageSelectorAndArgumentNames%0A%09%22comment%20stating%20purpose%20of%20message%22%0A%0A%09%7C%20temporary%20variable%20names%20%7C%0A%09statements");
-return self;},
-source: unescape('dummyMethodSource%0A%20%20%20%20%5E%27messageSelectorAndArgumentNames%0A%09%22comment%20stating%20purpose%20of%20message%22%0A%0A%09%7C%20temporary%20variable%20names%20%7C%0A%09statements%27%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_declarationSource',
-smalltalk.method({
-selector: 'declarationSource',
-category: 'accessing',
-fn: function (){
-var self=this;
-return self['@selectedTab'].__eq("instance")._ifTrue_ifFalse_((function(){return self._classDeclarationSource();}),(function(){return self._metaclassDeclarationSource();}));
-return self;},
-source: unescape('declarationSource%0A%20%20%20%20%5EselectedTab%20%3D%20%23instance%0A%09ifTrue%3A%20%5Bself%20classDeclarationSource%5D%0A%09ifFalse%3A%20%5Bself%20metaclassDeclarationSource%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_classDeclarationSource',
-smalltalk.method({
-selector: 'classDeclarationSource',
-category: 'accessing',
-fn: function (){
-var self=this;
-var stream=nil;
-stream=""._writeStream();
-self['@selectedClass']._ifNotNil_((function(){(function($rec){$rec._nextPutAll_(self['@selectedClass']._superclass()._asString());$rec._nextPutAll_(unescape("%20subclass%3A%20%23"));$rec._nextPutAll_(self['@selectedClass']._name());$rec._nextPutAll_(smalltalk.String._cr().__comma(smalltalk.String._tab()));return $rec._nextPutAll_(unescape("instanceVariableNames%3A%20%27"));})(stream);self['@selectedClass']._instanceVariableNames()._do_separatedBy_((function(each){return stream._nextPutAll_(each);}),(function(){return stream._nextPutAll_(" ");}));return (function($rec){$rec._nextPutAll_(unescape("%27").__comma(smalltalk.String._cr()).__comma(smalltalk.String._tab()));$rec._nextPutAll_(unescape("category%3A%20%27"));$rec._nextPutAll_(self['@selectedClass']._category());return $rec._nextPutAll_(unescape("%27"));})(stream);}));
-return stream._contents();
-return self;},
-source: unescape('classDeclarationSource%0A%20%20%20%20%7C%20stream%20%7C%0A%20%20%20%20stream%20%3A%3D%20%27%27%20writeStream.%0A%20%20%20%20selectedClass%20ifNotNil%3A%20%5B%0A%09stream%20%0A%09%20%20%20%20nextPutAll%3A%20selectedClass%20superclass%20asString%3B%0A%09%20%20%20%20nextPutAll%3A%20%27%20subclass%3A%20%23%27%3B%0A%09%20%20%20%20nextPutAll%3A%20selectedClass%20name%3B%0A%09%20%20%20%20nextPutAll%3A%20String%20cr%2C%20String%20tab%3B%0A%09%20%20%20%20nextPutAll%3A%20%27instanceVariableNames%3A%20%27%27%27.%0A%09selectedClass%20instanceVariableNames%20%0A%09%20%20%20%20do%3A%20%5B%3Aeach%20%7C%20stream%20nextPutAll%3A%20each%5D%20%0A%09%20%20%20%20separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%20%27%5D.%0A%09stream%0A%09%20%20%20%20nextPutAll%3A%20%27%27%27%27%2C%20String%20cr%2C%20String%20tab%3B%0A%09%20%20%20%20nextPutAll%3A%20%27category%3A%20%27%27%27%3B%0A%09%20%20%20%20nextPutAll%3A%20selectedClass%20category%3B%0A%09%20%20%20%20nextPutAll%3A%20%27%27%27%27%5D.%0A%20%20%20%20%5Estream%20contents%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_metaclassDeclarationSource',
-smalltalk.method({
-selector: 'metaclassDeclarationSource',
-category: 'accessing',
-fn: function (){
-var self=this;
-var stream=nil;
-stream=""._writeStream();
-self['@selectedClass']._ifNotNil_((function(){(function($rec){$rec._nextPutAll_(self['@selectedClass']._asString());$rec._nextPutAll_(" class ");return $rec._nextPutAll_(unescape("instanceVariableNames%3A%20%27"));})(stream);self['@selectedClass']._class()._instanceVariableNames()._do_separatedBy_((function(each){return stream._nextPutAll_(each);}),(function(){return stream._nextPutAll_(" ");}));return stream._nextPutAll_(unescape("%27"));}));
-return stream._contents();
-return self;},
-source: unescape('metaclassDeclarationSource%0A%20%20%20%20%7C%20stream%20%7C%0A%20%20%20%20stream%20%3A%3D%20%27%27%20writeStream.%0A%20%20%20%20selectedClass%20ifNotNil%3A%20%5B%0A%09stream%20%0A%09%20%20%20%20nextPutAll%3A%20selectedClass%20asString%3B%0A%09%20%20%20%20nextPutAll%3A%20%27%20class%20%27%3B%0A%09%20%20%20%20nextPutAll%3A%20%27instanceVariableNames%3A%20%27%27%27.%0A%09selectedClass%20class%20instanceVariableNames%0A%09%20%20%20%20do%3A%20%5B%3Aeach%20%7C%20stream%20nextPutAll%3A%20each%5D%0A%09%20%20%20%20separatedBy%3A%20%5Bstream%20nextPutAll%3A%20%27%20%27%5D.%0A%09stream%20nextPutAll%3A%20%27%27%27%27%5D.%0A%20%20%20%20%5Estream%20contents%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_classCommentSource',
-smalltalk.method({
-selector: 'classCommentSource',
-category: 'accessing',
-fn: function (){
-var self=this;
-return self['@selectedClass']._comment();
-return self;},
-source: unescape('classCommentSource%0A%20%20%20%20%5EselectedClass%20comment%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_enableSaveButton',
-smalltalk.method({
-selector: 'enableSaveButton',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@saveButton']._removeAt_("disabled");
-self['@unsavedChanges']=true;
-return self;},
-source: unescape('enableSaveButton%0A%20%20%20%20saveButton%20removeAt%3A%20%27disabled%27.%0A%20%20%20%20unsavedChanges%20%3A%3D%20true%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_disableSaveButton',
-smalltalk.method({
-selector: 'disableSaveButton',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@saveButton']._ifNotNil_((function(){return self['@saveButton']._at_put_("disabled",true);}));
-self['@unsavedChanges']=false;
-return self;},
-source: unescape('disableSaveButton%0A%20%20%20%20saveButton%20ifNotNil%3A%20%5B%0A%09saveButton%20at%3A%20%27disabled%27%20put%3A%20true%5D.%0A%20%20%20%20unsavedChanges%20%3A%3D%20false%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_hideClassButtons',
-smalltalk.method({
-selector: 'hideClassButtons',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@classButtons']._asJQuery()._hide();
-return self;},
-source: unescape('hideClassButtons%0A%20%20%20%20classButtons%20asJQuery%20hide%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_showClassButtons',
-smalltalk.method({
-selector: 'showClassButtons',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@classButtons']._asJQuery()._show();
-return self;},
-source: unescape('showClassButtons%0A%20%20%20%20classButtons%20asJQuery%20show%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_hideMethodButtons',
-smalltalk.method({
-selector: 'hideMethodButtons',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@methodButtons']._asJQuery()._hide();
-return self;},
-source: unescape('hideMethodButtons%0A%20%20%20%20methodButtons%20asJQuery%20hide%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_showMethodButtons',
-smalltalk.method({
-selector: 'showMethodButtons',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@methodButtons']._asJQuery()._show();
-return self;},
-source: unescape('showMethodButtons%0A%20%20%20%20methodButtons%20asJQuery%20show%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_compile',
-smalltalk.method({
-selector: 'compile',
-category: 'actions',
-fn: function (){
-var self=this;
-self._disableSaveButton();
-self['@selectedTab'].__eq("comment")._ifTrue_((function(){return self['@selectedClass']._ifNotNil_((function(){return self._compileClassComment();}));}));
-self['@selectedProtocol']._notNil()._or_((function(){return self['@selectedMethod']._notNil();}))._ifFalse_ifTrue_((function(){return self._compileDefinition();}),(function(){return self._compileMethodDefinition();}));
-return self;},
-source: unescape('compile%0A%20%20%20%20self%20disableSaveButton.%0A%20%20%20%20selectedTab%20%3D%20%23comment%20ifTrue%3A%20%5B%0A%09selectedClass%20ifNotNil%3A%20%5B%0A%09%20%20%20%20self%20compileClassComment%5D%5D.%0A%20%20%20%20%28selectedProtocol%20notNil%20or%3A%20%5BselectedMethod%20notNil%5D%29%0A%09ifFalse%3A%20%5Bself%20compileDefinition%5D%0A%09ifTrue%3A%20%5Bself%20compileMethodDefinition%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_compileClassComment',
-smalltalk.method({
-selector: 'compileClassComment',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@selectedClass']._comment_(self['@sourceTextarea']._asJQuery()._val());
-return self;},
-source: unescape('compileClassComment%0A%20%20%20%20selectedClass%20comment%3A%20sourceTextarea%20asJQuery%20val%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_compileMethodDefinition',
-smalltalk.method({
-selector: 'compileMethodDefinition',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@selectedTab'].__eq("instance")._ifTrue_ifFalse_((function(){return self._compileMethodDefinitionFor_(self['@selectedClass']);}),(function(){return self._compileMethodDefinitionFor_(self['@selectedClass']._class());}));
-return self;},
-source: unescape('compileMethodDefinition%0A%20%20%20%20selectedTab%20%3D%20%23instance%0A%09ifTrue%3A%20%5Bself%20compileMethodDefinitionFor%3A%20selectedClass%5D%0A%09ifFalse%3A%20%5Bself%20compileMethodDefinitionFor%3A%20selectedClass%20class%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_compileMethodDefinitionFor_',
-smalltalk.method({
-selector: 'compileMethodDefinitionFor:',
-category: 'actions',
-fn: function (aClass){
-var self=this;
-try{var compiler=nil;
-var method=nil;
-var source=nil;
-var node=nil;
-source=self['@sourceTextarea']._asJQuery()._val();
-self['@selectedProtocol']._ifNil_((function(){return self['@selectedProtocol']=self['@selectedMethod']._category();}));
-compiler=smalltalk.Compiler._new();
-node=compiler._parse_(source);
-node._isParseFailure()._ifTrue_((function(){return (function(){throw({name: 'stReturn', selector: '_compileMethodDefinitionFor_', fn: function(){return self._alert_("PARSE ERROR: ".__comma(node._reason()).__comma(unescape("%2C%20position%3A%20")).__comma(node._position()._asString()))}})})();}));
-compiler._currentClass_(self['@selectedClass']);
-method=compiler._eval_(compiler._compileNode_(node));
-method._category_(self['@selectedProtocol']);
-aClass._addCompiledMethod_(method);
-self._updateMethodsList();
-self._selectMethod_(method);
-return self;
-} catch(e) {if(e.name === 'stReturn' && e.selector === '_compileMethodDefinitionFor_'){return e.fn()} throw(e)}},
-source: unescape('compileMethodDefinitionFor%3A%20aClass%0A%20%20%20%20%7C%20compiler%20method%20source%20node%20%7C%0A%20%20%20%20source%20%3A%3D%20sourceTextarea%20asJQuery%20val.%0A%20%20%20%20selectedProtocol%20ifNil%3A%20%5BselectedProtocol%20%3A%3D%20selectedMethod%20category%5D.%0A%20%20%20%20compiler%20%3A%3D%20Compiler%20new.%0A%20%20%20%20node%20%3A%3D%20compiler%20parse%3A%20source.%0A%20%20%20%20node%20isParseFailure%20ifTrue%3A%20%5B%0A%09%5Eself%20alert%3A%20%27PARSE%20ERROR%3A%20%27%2C%20node%20reason%2C%20%27%2C%20position%3A%20%27%2C%20node%20position%20asString%5D.%0A%20%20%20%20compiler%20currentClass%3A%20selectedClass.%0A%20%20%20%20method%20%3A%3D%20compiler%20eval%3A%20%28compiler%20compileNode%3A%20node%29.%0A%20%20%20%20method%20category%3A%20selectedProtocol.%0A%20%20%20%20aClass%20addCompiledMethod%3A%20method.%0A%20%20%20%20self%20updateMethodsList.%0A%20%20%20%20self%20selectMethod%3A%20method%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_compileDefinition',
-smalltalk.method({
-selector: 'compileDefinition',
-category: 'actions',
-fn: function (){
-var self=this;
-var newClass=nil;
-newClass=smalltalk.Compiler._new()._loadExpression_(self['@sourceTextarea']._asJQuery()._val());
-(function($rec){$rec._updateCategoriesList();return $rec._updateClassesList();})(self);
-return self;},
-source: unescape('compileDefinition%0A%20%20%20%20%7C%20newClass%20%7C%0A%20%20%20%20newClass%20%3A%3D%20Compiler%20new%20loadExpression%3A%20sourceTextarea%20asJQuery%20val.%0A%20%20%20%20self%20%0A%09updateCategoriesList%3B%0A%09updateClassesList%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_commitCategory',
-smalltalk.method({
-selector: 'commitCategory',
-category: 'actions',
-fn: function (){
-var self=this;
-self['@selectedCategory']._ifNotNil_((function(){return (function($rec){$rec._at_put_("type","PUT");$rec._at_put_("data",smalltalk.Exporter._new()._exportCategory_(self['@selectedCategory']));$rec._at_put_("error",(function(){return self._alert_(unescape("Commit%20failed%21"));}));return $rec._send();})(smalltalk.Ajax._url_(unescape("js/").__comma(self['@selectedCategory']).__comma(".js")));}));
-return self;},
-source: unescape('commitCategory%0A%20%20%20%20selectedCategory%20ifNotNil%3A%20%5B%0A%09%28Ajax%20url%3A%20%27js/%27%2C%20selectedCategory%2C%20%27.js%27%29%0A%09%20%20%20%20at%3A%20%27type%27%20put%3A%20%27PUT%27%3B%0A%09%20%20%20%20at%3A%20%27data%27%20put%3A%20%28Exporter%20new%20exportCategory%3A%20selectedCategory%29%3B%0A%09%20%20%20%20at%3A%20%27error%27%20put%3A%20%5Bself%20alert%3A%20%27Commit%20failed%21%27%5D%3B%0A%09%20%20%20%20send%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_cancelChanges',
-smalltalk.method({
-selector: 'cancelChanges',
-category: 'actions',
-fn: function (){
-var self=this;
-return self['@unsavedChanges']._ifTrue_ifFalse_((function(){return self._confirm_(unescape("Cancel%20changes%3F"));}),(function(){return true;}));
-return self;},
-source: unescape('cancelChanges%0A%20%20%20%20%5EunsavedChanges%20%0A%09ifTrue%3A%20%5Bself%20confirm%3A%20%27Cancel%20changes%3F%27%5D%0A%09ifFalse%3A%20%5Btrue%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_removeClass',
-smalltalk.method({
-selector: 'removeClass',
-category: 'actions',
-fn: function (){
-var self=this;
-self._confirm_("Do you really want to remove ".__comma(self['@selectedClass']._name()).__comma(unescape("%3F")))._ifTrue_((function(){smalltalk.Smalltalk._current()._basicDelete_(self['@selectedClass']._name());return self._selectClass_(nil);}));
-return self;},
-source: unescape('removeClass%0A%20%20%20%20%28self%20confirm%3A%20%27Do%20you%20really%20want%20to%20remove%20%27%2C%20selectedClass%20name%2C%20%27%3F%27%29%0A%09ifTrue%3A%20%5B%0A%09%20%20%20%20Smalltalk%20current%20basicDelete%3A%20selectedClass%20name.%0A%09%20%20%20%20self%20selectClass%3A%20nil%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_removeMethod',
-smalltalk.method({
-selector: 'removeMethod',
-category: 'actions',
-fn: function (){
-var self=this;
-self._cancelChanges()._ifTrue_((function(){return self._confirm_(unescape("Do%20you%20really%20want%20to%20remove%20%23").__comma(self['@selectedMethod']._selector()).__comma(unescape("%3F")))._ifTrue_((function(){self['@selectedClass']._removeCompiledMethod_(self['@selectedMethod']);return self._selectMethod_(nil);}));}));
-return self;},
-source: unescape('removeMethod%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09%28self%20confirm%3A%20%27Do%20you%20really%20want%20to%20remove%20%23%27%2C%20selectedMethod%20selector%2C%20%27%3F%27%29%0A%09%20%20%20%20ifTrue%3A%20%5B%0A%09%09selectedClass%20removeCompiledMethod%3A%20selectedMethod.%0A%09%09self%20selectMethod%3A%20nil%5D%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_setMethodProtocol_',
-smalltalk.method({
-selector: 'setMethodProtocol:',
-category: 'actions',
-fn: function (aString){
-var self=this;
-self._cancelChanges()._ifTrue_((function(){return self._protocols()._includes_(aString)._ifFalse_ifTrue_((function(){return self._addNewProtocol();}),(function(){self['@selectedMethod']._category_(aString);self['@selectedProtocol']=aString;self['@selectedMethod']=self['@selectedMethod'];return (function($rec){$rec._updateProtocolsList();$rec._updateMethodsList();return $rec._updateSourceAndButtons();})(self);}));}));
-return self;},
-source: unescape('setMethodProtocol%3A%20aString%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09%28self%20protocols%20includes%3A%20aString%29%0A%09%20%20%20%20ifFalse%3A%20%5Bself%20addNewProtocol%5D%0A%09%20%20%20%20ifTrue%3A%20%5B%0A%09%09selectedMethod%20category%3A%20aString.%0A%09%09selectedProtocol%20%3A%3D%20aString.%0A%09%09selectedMethod%20%3A%3D%20selectedMethod.%0A%09%09self%20%0A%09%09%20%20%20%20updateProtocolsList%3B%0A%09%09%20%20%20%20updateMethodsList%3B%0A%09%09%20%20%20%20updateSourceAndButtons%5D%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_addNewProtocol',
-smalltalk.method({
-selector: 'addNewProtocol',
-category: 'actions',
-fn: function (){
-var self=this;
-var newProtocol=nil;
-newProtocol=self._prompt_("New method protocol");
-newProtocol._notEmpty()._ifTrue_((function(){self['@selectedMethod']._category_(newProtocol);return self._setMethodProtocol_(newProtocol);}));
-return self;},
-source: unescape('addNewProtocol%0A%20%20%20%20%7C%20newProtocol%20%7C%0A%20%20%20%20newProtocol%20%3A%3D%20self%20prompt%3A%20%27New%20method%20protocol%27.%0A%20%20%20%20newProtocol%20notEmpty%20ifTrue%3A%20%5B%0A%09selectedMethod%20category%3A%20newProtocol.%0A%09self%20setMethodProtocol%3A%20newProtocol%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_selectCategory_',
-smalltalk.method({
-selector: 'selectCategory:',
-category: 'actions',
-fn: function (aCategory){
-var self=this;
-self._cancelChanges()._ifTrue_((function(){self['@selectedCategory']=aCategory;self['@selectedClass']=self['@selectedProtocol']=self['@selectedMethod']=nil;return (function($rec){$rec._updateCategoriesList();$rec._updateClassesList();$rec._updateProtocolsList();$rec._updateMethodsList();return $rec._updateSourceAndButtons();})(self);}));
-return self;},
-source: unescape('selectCategory%3A%20aCategory%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09selectedCategory%20%3A%3D%20aCategory.%0A%09selectedClass%20%3A%3D%20selectedProtocol%20%3A%3D%20selectedMethod%20%3A%3D%20%20nil.%0A%09self%20%0A%09%20%20%20%20updateCategoriesList%3B%0A%09%20%20%20%20updateClassesList%3B%0A%09%20%20%20%20updateProtocolsList%3B%0A%09%20%20%20%20updateMethodsList%3B%0A%09%20%20%20%20updateSourceAndButtons%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_selectClass_',
-smalltalk.method({
-selector: 'selectClass:',
-category: 'actions',
-fn: function (aClass){
-var self=this;
-self._cancelChanges()._ifTrue_((function(){self['@selectedClass']=aClass;self['@selectedProtocol']=self['@selectedMethod']=nil;return (function($rec){$rec._updateClassesList();$rec._updateProtocolsList();$rec._updateMethodsList();return $rec._updateSourceAndButtons();})(self);}));
-return self;},
-source: unescape('selectClass%3A%20aClass%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09selectedClass%20%3A%3D%20aClass.%0A%09selectedProtocol%20%3A%3D%20selectedMethod%20%3A%3D%20nil.%0A%09self%20%0A%09%20%20%20%20updateClassesList%3B%0A%09%20%20%20%20updateProtocolsList%3B%0A%09%20%20%20%20updateMethodsList%3B%0A%09%20%20%20%20updateSourceAndButtons%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_selectProtocol_',
-smalltalk.method({
-selector: 'selectProtocol:',
-category: 'actions',
-fn: function (aString){
-var self=this;
-self._cancelChanges()._ifTrue_((function(){self['@selectedProtocol']=aString;self['@selectedMethod']=nil;return (function($rec){$rec._updateProtocolsList();$rec._updateMethodsList();return $rec._updateSourceAndButtons();})(self);}));
-return self;},
-source: unescape('selectProtocol%3A%20aString%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09selectedProtocol%20%3A%3D%20aString.%0A%09selectedMethod%20%3A%3D%20nil.%0A%09self%20%0A%09%20%20%20%20updateProtocolsList%3B%0A%09%20%20%20%20updateMethodsList%3B%0A%09%20%20%20%20updateSourceAndButtons%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_selectMethod_',
-smalltalk.method({
-selector: 'selectMethod:',
-category: 'actions',
-fn: function (aMethod){
-var self=this;
-self._cancelChanges()._ifTrue_((function(){self['@selectedMethod']=aMethod;return (function($rec){$rec._updateProtocolsList();$rec._updateMethodsList();return $rec._updateSourceAndButtons();})(self);}));
-return self;},
-source: unescape('selectMethod%3A%20aMethod%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09selectedMethod%20%3A%3D%20aMethod.%0A%09self%20%0A%09%20%20%20%20updateProtocolsList%3B%0A%09%20%20%20%20updateMethodsList%3B%0A%09%20%20%20%20updateSourceAndButtons%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_selectTab_',
-smalltalk.method({
-selector: 'selectTab:',
-category: 'actions',
-fn: function (aString){
-var self=this;
-self._cancelChanges()._ifTrue_((function(){self['@selectedTab']=aString;self._selectProtocol_(nil);return self._updateTabsList();}));
-return self;},
-source: unescape('selectTab%3A%20aString%0A%20%20%20%20self%20cancelChanges%20ifTrue%3A%20%5B%0A%09selectedTab%20%3A%3D%20aString.%0A%09self%20selectProtocol%3A%20nil.%0A%09self%20updateTabsList%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_renderBoxOn_',
-smalltalk.method({
-selector: 'renderBoxOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-(function($rec){$rec._renderTopPanelOn_(html);$rec._renderTabsOn_(html);return $rec._renderBottomPanelOn_(html);})(self);
-return self;},
-source: unescape('renderBoxOn%3A%20html%0A%20%20%20%20self%20%0A%09renderTopPanelOn%3A%20html%3B%0A%09renderTabsOn%3A%20html%3B%0A%09renderBottomPanelOn%3A%20html%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_renderTopPanelOn_',
-smalltalk.method({
-selector: 'renderTopPanelOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-(function($rec){$rec._class_("top");return $rec._with_((function(){self['@categoriesList']=html._ul()._class_("jt_column categories");self['@commitButton']=(function($rec){$rec._class_("jt_commit");$rec._title_("Commit classes in this category to disk");$rec._onClick_((function(){return self._commitCategory();}));return $rec._with_("Commit category");})(html._button());self['@classesList']=html._ul()._class_("jt_column classes");self['@protocolsList']=html._ul()._class_("jt_column protocols");self['@methodsList']=html._ul()._class_("jt_column methods");(function($rec){$rec._updateCategoriesList();$rec._updateClassesList();$rec._updateProtocolsList();return $rec._updateMethodsList();})(self);return html._div()._class_("jt_clear");}));})(html._div());
-return self;},
-source: unescape('renderTopPanelOn%3A%20html%0A%20%20%20%20html%20div%20%0A%09class%3A%20%27top%27%3B%20%0A%09with%3A%20%5B%0A%09%20%20%20%20categoriesList%20%3A%3D%20html%20ul%20class%3A%20%27jt_column%20categories%27.%0A%09%20%20%20%20commitButton%20%3A%3D%20html%20button%20%0A%09%09class%3A%20%27jt_commit%27%3B%0A%09%09title%3A%20%27Commit%20classes%20in%20this%20category%20to%20disk%27%3B%0A%09%09onClick%3A%20%5Bself%20commitCategory%5D%3B%0A%09%09with%3A%20%27Commit%20category%27.%0A%09%20%20%20%20classesList%20%3A%3D%20html%20ul%20class%3A%20%27jt_column%20classes%27.%0A%09%20%20%20%20protocolsList%20%3A%3D%20html%20ul%20class%3A%20%27jt_column%20protocols%27.%0A%09%20%20%20%20methodsList%20%3A%3D%20html%20ul%20class%3A%20%27jt_column%20methods%27.%0A%09%20%20%20%20self%0A%09%09updateCategoriesList%3B%0A%09%09updateClassesList%3B%0A%09%09updateProtocolsList%3B%0A%09%09updateMethodsList.%0A%09%20%20%20%20html%20div%20class%3A%20%27jt_clear%27%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_renderTabsOn_',
-smalltalk.method({
-selector: 'renderTabsOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-self['@tabsList']=html._ul()._class_("jt_tabs");
-self._updateTabsList();
-return self;},
-source: unescape('renderTabsOn%3A%20html%0A%20%20%20%20tabsList%20%3A%3D%20html%20ul%20class%3A%20%27jt_tabs%27.%0A%20%20%20%20self%20updateTabsList.%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_renderBottomPanelOn_',
-smalltalk.method({
-selector: 'renderBottomPanelOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-(function($rec){$rec._class_("jt_sourceCode");return $rec._with_((function(){self['@sourceTextarea']=(function($rec){$rec._onKeyPress_((function(){return self._enableSaveButton();}));$rec._class_("source");return $rec._at_put_("spellcheck","false");})(html._textarea());return self['@sourceTextarea']._asJQuery()._call_("tabby");}));})(html._div());
-return self;},
-source: unescape('renderBottomPanelOn%3A%20html%0A%20%20%20%20html%20div%0A%09class%3A%20%27jt_sourceCode%27%3B%0A%09with%3A%20%5B%0A%09%20%20%20%20sourceTextarea%20%3A%3D%20html%20textarea%20%0A%09%09onKeyPress%3A%20%5Bself%20enableSaveButton%5D%3B%0A%09%09class%3A%20%27source%27%3B%0A%09%09at%3A%20%27spellcheck%27%20put%3A%20%27false%27.%0A%09%20%20%20%20sourceTextarea%20asJQuery%20call%3A%20%27tabby%27%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_renderButtonsOn_',
-smalltalk.method({
-selector: 'renderButtonsOn:',
-category: 'rendering',
-fn: function (html){
-var self=this;
-self['@saveButton']=html._button();
-(function($rec){$rec._with_("Save");return $rec._onClick_((function(){return self._compile();}));})(self['@saveButton']);
-self['@methodButtons']=html._span();
-self['@classButtons']=html._span();
-self._updateSourceAndButtons();
-return self;},
-source: unescape('renderButtonsOn%3A%20html%0A%20%20%20%20saveButton%20%3A%3D%20html%20button.%0A%20%20%20%20saveButton%20%0A%09with%3A%20%27Save%27%3B%0A%09onClick%3A%20%5Bself%20compile%5D.%0A%20%20%20%20methodButtons%20%3A%3D%20html%20span.%0A%20%20%20%20classButtons%20%3A%3D%20html%20span.%0A%20%20%20%20self%20updateSourceAndButtons%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_updateCategoriesList',
-smalltalk.method({
-selector: 'updateCategoriesList',
-category: 'updating',
-fn: function (){
-var self=this;
-self['@categoriesList']._contents_((function(html){return self._categories()._do_((function(each){var li=nil;
-li=html._li();self['@selectedCategory'].__eq(each)._ifTrue_((function(){return li._class_("selected");}));return (function($rec){$rec._with_(each);return $rec._onClick_((function(){return self._selectCategory_(each);}));})(li);}));}));
-return self;},
-source: unescape('updateCategoriesList%0A%20%20%20%20categoriesList%20contents%3A%20%5B%3Ahtml%20%7C%0A%09self%20categories%20do%3A%20%5B%3Aeach%20%7C%7C%20li%20%7C%0A%09%20%20%20%20li%20%3A%3D%20html%20li.%0A%09%20%20%20%20selectedCategory%20%3D%20each%20ifTrue%3A%20%5B%0A%09%09li%20class%3A%20%27selected%27%5D.%0A%09%20%20%20%20li%0A%09%09with%3A%20each%3B%0A%09%09onClick%3A%20%5Bself%20selectCategory%3A%20each%5D%5D%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_updateClassesList',
-smalltalk.method({
-selector: 'updateClassesList',
-category: 'updating',
-fn: function (){
-var self=this;
-smalltalk.TabManager._current()._update();
-self['@classesList']._contents_((function(html){return self._classes()._do_((function(each){var li=nil;
-li=html._li();self['@selectedClass'].__eq(each)._ifTrue_((function(){return li._class_("selected");}));return (function($rec){$rec._with_(each._name());return $rec._onClick_((function(){return self._selectClass_(each);}));})(li);}));}));
-return self;},
-source: unescape('updateClassesList%0A%20%20%20%20TabManager%20current%20update.%0A%20%20%20%20classesList%20contents%3A%20%5B%3Ahtml%20%7C%0A%09self%20classes%20do%3A%20%5B%3Aeach%20%7C%7C%20li%20%7C%0A%09%20%20%20%20li%20%3A%3D%20html%20li.%0A%09%20%20%20%20selectedClass%20%3D%20each%20ifTrue%3A%20%5B%0A%09%09li%20class%3A%20%27selected%27%5D.%0A%09%20%20%20%20li%0A%09%09with%3A%20each%20name%3B%0A%09%09onClick%3A%20%5Bself%20selectClass%3A%20each%5D%5D%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_updateProtocolsList',
-smalltalk.method({
-selector: 'updateProtocolsList',
-category: 'updating',
-fn: function (){
-var self=this;
-self['@protocolsList']._contents_((function(html){return self._protocols()._do_((function(each){var li=nil;
-li=html._li();self['@selectedProtocol'].__eq(each)._ifTrue_((function(){return li._class_("selected");}));return (function($rec){$rec._with_(each);return $rec._onClick_((function(){return self._selectProtocol_(each);}));})(li);}));}));
-return self;},
-source: unescape('updateProtocolsList%0A%20%20%20%20protocolsList%20contents%3A%20%5B%3Ahtml%20%7C%0A%09self%20protocols%20do%3A%20%5B%3Aeach%20%7C%7C%20li%20%7C%0A%09%20%20%20%20li%20%3A%3D%20html%20li.%0A%09%20%20%20%20selectedProtocol%20%3D%20each%20ifTrue%3A%20%5B%0A%09%09li%20class%3A%20%27selected%27%5D.%0A%09%20%20%20%20li%20%0A%09%09with%3A%20each%3B%0A%09%09onClick%3A%20%5Bself%20selectProtocol%3A%20each%5D%5D%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_updateMethodsList',
-smalltalk.method({
-selector: 'updateMethodsList',
-category: 'updating',
-fn: function (){
-var self=this;
-self['@methodsList']._contents_((function(html){return self._methods()._do_((function(each){var li=nil;
-li=html._li();self['@selectedMethod'].__eq(each)._ifTrue_((function(){return li._class_("selected");}));return (function($rec){$rec._with_(each._selector());return $rec._onClick_((function(){return self._selectMethod_(each);}));})(li);}));}));
-return self;},
-source: unescape('updateMethodsList%0A%20%20%20%20methodsList%20contents%3A%20%5B%3Ahtml%20%7C%0A%09self%20methods%20do%3A%20%5B%3Aeach%20%7C%7C%20li%20%7C%0A%09%20%20%20%20li%20%3A%3D%20html%20li.%0A%09%20%20%20%20selectedMethod%20%3D%20each%20ifTrue%3A%20%5B%0A%09%09li%20class%3A%20%27selected%27%5D.%0A%09%20%20%20%20li%0A%09%09with%3A%20each%20selector%3B%0A%09%09onClick%3A%20%5Bself%20selectMethod%3A%20each%5D%5D%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_updateTabsList',
-smalltalk.method({
-selector: 'updateTabsList',
-category: 'updating',
-fn: function (){
-var self=this;
-self['@tabsList']._contents_((function(html){var li=nil;
-li=html._li();self['@selectedTab'].__eq("instance")._ifTrue_((function(){return li._class_("selected");}));(function($rec){$rec._with_("Instance");return $rec._onClick_((function(){return self._selectTab_("instance");}));})(li);li=html._li();self['@selectedTab'].__eq("class")._ifTrue_((function(){return li._class_("selected");}));(function($rec){$rec._with_("Class");return $rec._onClick_((function(){return self._selectTab_("class");}));})(li);li=html._li();self['@selectedTab'].__eq("comment")._ifTrue_((function(){return li._class_("selected");}));return (function($rec){$rec._with_("Comment");return $rec._onClick_((function(){return self._selectTab_("comment");}));})(li);}));
-return self;},
-source: unescape('updateTabsList%0A%20%20%20%20tabsList%20contents%3A%20%5B%3Ahtml%20%7C%7C%20li%20%7C%0A%09li%20%3A%3D%20html%20li.%0A%09selectedTab%20%3D%20%23instance%20ifTrue%3A%20%5Bli%20class%3A%20%27selected%27%5D.%0A%09li%0A%09%20%20%20%20with%3A%20%27Instance%27%3B%0A%09%20%20%20%20onClick%3A%20%5Bself%20selectTab%3A%20%23instance%5D.%0A%09li%20%3A%3D%20html%20li.%0A%09selectedTab%20%3D%20%23class%20ifTrue%3A%20%5Bli%20class%3A%20%27selected%27%5D.%0A%09li%0A%09%20%20%20%20with%3A%20%27Class%27%3B%0A%09%20%20%20%20onClick%3A%20%5Bself%20selectTab%3A%20%23class%5D.%0A%09li%20%3A%3D%20html%20li.%0A%09selectedTab%20%3D%20%23comment%20ifTrue%3A%20%5Bli%20class%3A%20%27selected%27%5D.%0A%09li%0A%09%20%20%20%20with%3A%20%27Comment%27%3B%0A%09%20%20%20%20onClick%3A%20%5Bself%20selectTab%3A%20%23comment%5D%5D%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_updateSourceAndButtons',
-smalltalk.method({
-selector: 'updateSourceAndButtons',
-category: 'updating',
-fn: function (){
-var self=this;
-self._disableSaveButton();
-self['@classButtons']._contents_((function(html){return (function($rec){$rec._with_("Remove class");return $rec._onClick_((function(){return self._removeClass();}));})(html._button());}));
-self['@methodButtons']._contents_((function(html){(function($rec){$rec._with_("Remove method");return $rec._onClick_((function(){return self._removeMethod();}));})(html._button());return (function($rec){$rec._onChange_((function(s){return self._setMethodProtocol_(s._val());}));return $rec._with_((function(){(function($rec){$rec._with_("Method protocol");return $rec._at_put_("disabled","disabled");})(html._option());(function($rec){$rec._class_("important");return $rec._with_("New...");})(html._option());return self._protocols()._do_((function(each){return html._option()._with_(each);}));}));})(html._select());}));
-self['@selectedMethod']._ifNil_ifNotNil_((function(){self._hideMethodButtons();return self['@selectedClass']._ifNil_ifNotNil_((function(){return self._hideClassButtons();}),(function(){return self._showClassButtons();}));}),(function(){self._hideClassButtons();return self._showMethodButtons();}));
-self['@sourceTextarea']._asJQuery()._val_(self._source());
-return self;},
-source: unescape('updateSourceAndButtons%0A%20%20%20%20self%20disableSaveButton.%0A%20%20%20%20classButtons%20contents%3A%20%5B%3Ahtml%20%7C%0A%09html%20button%0A%09%20%20%20%20with%3A%20%27Remove%20class%27%3B%0A%09%20%20%20%20onClick%3A%20%5Bself%20removeClass%5D%5D.%0A%20%20%20%20methodButtons%20contents%3A%20%5B%3Ahtml%20%7C%0A%09html%20button%0A%09%20%20%20%20with%3A%20%27Remove%20method%27%3B%0A%09%20%20%20%20onClick%3A%20%5Bself%20removeMethod%5D.%0A%09html%20select%20%0A%09%20%20%20%20onChange%3A%20%5B%3As%20%7C%20self%20setMethodProtocol%3A%20s%20val%5D%3B%0A%09%20%20%20%20with%3A%20%5B%0A%09%09html%20option%0A%09%09%20%20%20%20with%3A%20%27Method%20protocol%27%3B%0A%09%09%20%20%20%20at%3A%20%27disabled%27%20put%3A%20%27disabled%27.%0A%09%09html%20option%0A%09%09%20%20%20%20class%3A%20%27important%27%3B%0A%09%09%20%20%20%20with%3A%20%27New...%27.%0A%09%09self%20protocols%20do%3A%20%5B%3Aeach%20%7C%0A%09%09%20%20%20%20html%20option%20with%3A%20each%5D%5D%5D.%0A%20%20%20%20selectedMethod%20%0A%09ifNil%3A%20%5B%0A%09%20%20%20%20self%20hideMethodButtons.%0A%09%20%20%20%20selectedClass%20%0A%09%09ifNil%3A%20%5Bself%20hideClassButtons%5D%0A%09%20%20%20%20ifNotNil%3A%20%5Bself%20showClassButtons%5D%5D%0A%09ifNotNil%3A%20%5B%0A%09%20%20%20%20self%20hideClassButtons.%0A%09%20%20%20%20self%20showMethodButtons%5D.%0A%20%20%20%20sourceTextarea%20asJQuery%20val%3A%20self%20source%0A')}),
-smalltalk.Browser);
-
-smalltalk.addMethod(
-'_canBeClosed',
-smalltalk.method({
-selector: 'canBeClosed',
-category: 'testing',
-fn: function (){
-var self=this;
-return true;
-return self;},
-source: unescape('canBeClosed%0A%20%20%20%20%5Etrue%0A')}),
-smalltalk.Browser);
-
-
-smalltalk.addMethod(
-'_openOn_',
-smalltalk.method({
-selector: 'openOn:',
-category: 'convenience',
-fn: function (aClass){
-var self=this;
-(function($rec){$rec._open();$rec._selectCategory_(aClass._category());return $rec._selectClass_(aClass);})(self._new());
-return self;},
-source: unescape('openOn%3A%20aClass%0A%20%20%20%20self%20new%0A%09open%3B%0A%09selectCategory%3A%20aClass%20category%3B%0A%09selectClass%3A%20aClass%0A')}),
-smalltalk.Browser.klass);
-
-smalltalk.addMethod(
-'_open',
-smalltalk.method({
-selector: 'open',
-category: 'convenience',
-fn: function (){
-var self=this;
-self._new()._open();
-return self;},
-source: unescape('open%0A%20%20%20%20self%20new%20open%0A')}),
-smalltalk.Browser.klass);
-
-
-

st/kernel.st

@@ -527,6 +527,10 @@ to: aNumber
 	^array
 !
 
+atRandom
+    ^(Random new next * self) truncated + 1
+!
+
 truncated
 	^{'return Math.floor(self);'}
 ! !
@@ -546,6 +550,12 @@ to: aNumber do: aBlock
 	^(self to: aNumber) do: aBlock
 ! !
 
+!Number methodsFor: 'interval'!
+
+clearInterval
+    {'clearInterval(Number(self))'}
+! !
+
 !Number methodsFor: 'printing'!
 
 printString
@@ -558,6 +568,20 @@ isNumber
 	^true
 ! !
 
+Object subclass: #Random
+	instanceVariableNames: ''
+	category: 'Kernel'
+!
+
+!Random methodsFor: 'accessing'!
+
+next
+    ^{'return Math.random()'}
+!
+
+next: anInteger
+    ^(1 to: anInteger) collect: [:each | self next]
+! !
 
 Object subclass: #BlockClosure
 	instanceVariableNames: ''
@@ -611,6 +635,16 @@ valueWithPossibleArguments: aCollection
 	^{'return self.apply(null, aCollection);'}
 ! !
 
+!BlockClosure methodsFor: 'timeout/interval'!
+
+valueWithTimeout: aNumber
+    {'setTimeout(self, aNumber)'}
+!
+
+valueWithInterval: aNumber
+    ^{'return setInterval(self, aNumber)'}
+! !
+
 !BlockClosure methodsFor: '*JQuery'!
 
 appendToJQuery: aJQuery