|
|
@@ -1,3 +1,4 @@
|
|
|
+(function(smalltalk,nil,_st){
|
|
|
smalltalk.addPackage('Helios-Commands');
|
|
|
smalltalk.addClass('HLCommand', smalltalk.Object, [], 'Helios-Commands');
|
|
|
smalltalk.addMethod(
|
|
|
@@ -7,9 +8,11 @@ selector: "asActionBinding",
|
|
|
category: 'converting',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(_st((smalltalk.HLBindingAction || HLBindingAction))._on_labelled_(_st(self)._key(),_st(self)._label()))._callback_((function(){
|
|
|
-return smalltalk.withContext(function($ctx2) {
return _st(self)._execute();
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+return _st(self)._execute();
|
|
|
}, function($ctx2) {$ctx2.fillBlock({},$ctx1)})}));
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"asActionBinding",{},smalltalk.HLCommand)})},
|
|
|
@@ -27,7 +30,8 @@ selector: "asBinding",
|
|
|
category: 'converting',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $2,$1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $2,$1;
|
|
|
$2=_st(self)._isBindingGroup();
|
|
|
if(smalltalk.assert($2)){
|
|
|
$1=_st(self)._asGroupBinding();
|
|
|
@@ -50,7 +54,8 @@ selector: "asGroupBinding",
|
|
|
category: 'converting',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st((smalltalk.HLBindingGroup || HLBindingGroup))._on_labelled_(_st(self)._key(),_st(self)._label());
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"asGroupBinding",{},smalltalk.HLCommand)})},
|
|
|
@@ -68,7 +73,8 @@ selector: "documentation",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(_st(self)._class())._documentation();
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"documentation",{}, smalltalk.HLCommand)})},
|
|
|
@@ -86,7 +92,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLCommand)})},
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLCommand)})},
|
|
|
args: [],
|
|
|
source: "execute\x0a\x09",
|
|
|
messageSends: [],
|
|
|
@@ -101,7 +108,8 @@ selector: "isBindingGroup",
|
|
|
category: 'testing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(_st(_st(_st(self)._class())._methodDictionary())._includesKey_("execute"))._not();
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"isBindingGroup",{},smalltalk.HLCommand)})},
|
|
|
@@ -119,7 +127,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(_st(self)._class())._key();
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLCommand)})},
|
|
|
@@ -137,7 +146,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(_st(self)._class())._label();
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLCommand)})},
|
|
|
@@ -155,7 +165,8 @@ selector: "registerOn:",
|
|
|
category: 'registration',
|
|
|
fn: function (aBinding){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(aBinding)._add_(_st(self)._asBinding());
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"registerOn:",{aBinding:aBinding},smalltalk.HLCommand)})},
|
|
|
@@ -174,9 +185,11 @@ selector: "concreteSubclasses",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(_st(self)._subclasses())._select_((function(each){
|
|
|
-return smalltalk.withContext(function($ctx2) {
return _st(each)._isConcrete();
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+return _st(each)._isConcrete();
|
|
|
}, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1)})}));
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"concreteSubclasses",{},smalltalk.HLCommand.klass)})},
|
|
|
@@ -194,7 +207,8 @@ selector: "documentation",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"documentation",{}, smalltalk.HLCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "documentation\x0a\x09^ ''",
|
|
|
@@ -210,7 +224,8 @@ selector: "isConcrete",
|
|
|
category: 'testing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(_st(self)._key())._notNil();
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"isConcrete",{},smalltalk.HLCommand.klass)})},
|
|
|
@@ -228,7 +243,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return nil;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return nil;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ nil",
|
|
|
@@ -244,7 +260,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ ''",
|
|
|
@@ -260,10 +277,12 @@ selector: "registerConcreteClassesOn:",
|
|
|
category: 'registration',
|
|
|
fn: function (aBinding){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
_st(_st(self)._concreteSubclasses())._do_((function(each){
|
|
|
var binding;
|
|
|
-return smalltalk.withContext(function($ctx2) {
binding=_st(each)._registerOn_(aBinding);
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+binding=_st(each)._registerOn_(aBinding);
|
|
|
binding;
|
|
|
$1=_st(binding)._isBindingGroup();
|
|
|
if(smalltalk.assert($1)){
|
|
|
@@ -285,7 +304,8 @@ selector: "registerOn:",
|
|
|
category: 'registration',
|
|
|
fn: function (aBinding){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(_st(self)._new())._registerOn_(aBinding);
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"registerOn:",{aBinding:aBinding},smalltalk.HLCommand.klass)})},
|
|
|
@@ -305,7 +325,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st((smalltalk.HLManager || HLManager))._current())._removeActiveTab();
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st((smalltalk.HLManager || HLManager))._current())._removeActiveTab();
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLCloseTabCommand)})},
|
|
|
args: [],
|
|
|
source: "execute\x0a\x09HLManager current removeActiveTab",
|
|
|
@@ -322,7 +343,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (87);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (87);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLCloseTabCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 87",
|
|
|
@@ -338,7 +360,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Close tab";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Close tab";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLCloseTabCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Close tab'",
|
|
|
@@ -356,7 +379,8 @@ selector: "model",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=self["@model"];
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"model",{},smalltalk.HLModelCommand)})},
|
|
|
@@ -374,7 +398,8 @@ selector: "model:",
|
|
|
category: 'accessing',
|
|
|
fn: function (aModel){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
self["@model"]=aModel;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+self["@model"]=aModel;
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"model:",{aModel:aModel},smalltalk.HLModelCommand)})},
|
|
|
args: ["aModel"],
|
|
|
source: "model: aModel\x0a\x09model := aModel",
|
|
|
@@ -391,7 +416,8 @@ selector: "for:",
|
|
|
category: 'instance creation',
|
|
|
fn: function (aModel){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(self)._new();
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"for:",{aModel:aModel},smalltalk.HLModelCommand.klass)})},
|
|
|
@@ -409,10 +435,12 @@ selector: "registerConcreteClassesOn:for:",
|
|
|
category: 'registration',
|
|
|
fn: function (aBinding,aModel){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
_st(_st(self)._concreteSubclasses())._do_((function(each){
|
|
|
var binding;
|
|
|
-return smalltalk.withContext(function($ctx2) {
binding=_st(each)._registerOn_for_(aBinding,aModel);
|
|
|
+return smalltalk.withContext(function($ctx2) {
|
|
|
+binding=_st(each)._registerOn_for_(aBinding,aModel);
|
|
|
binding;
|
|
|
$1=_st(binding)._isBindingGroup();
|
|
|
if(smalltalk.assert($1)){
|
|
|
@@ -434,7 +462,8 @@ selector: "registerOn:for:",
|
|
|
category: 'registration',
|
|
|
fn: function (aBinding,aModel){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st(_st(self)._for_(aModel))._registerOn_(aBinding);
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"registerOn:for:",{aBinding:aBinding,aModel:aModel},smalltalk.HLModelCommand.klass)})},
|
|
|
@@ -455,7 +484,8 @@ selector: "for:",
|
|
|
category: 'instance creation',
|
|
|
fn: function (aBrowserModel){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $2,$3,$1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $2,$3,$1;
|
|
|
$2=_st(self)._new();
|
|
|
_st($2)._model_(aBrowserModel);
|
|
|
$3=_st($2)._yourself();
|
|
|
@@ -479,7 +509,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (71);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (71);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 71",
|
|
|
@@ -495,7 +526,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Go to";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Go to";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Go to'",
|
|
|
@@ -513,7 +545,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(self)._model())._focusOnClasses();
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st(self)._model())._focusOnClasses();
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToClassesCommand)})},
|
|
|
args: [],
|
|
|
source: "execute\x0a\x09self model focusOnClasses",
|
|
|
@@ -530,7 +563,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (67);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (67);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToClassesCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09\x22c\x22\x0a \x0a\x09^ 67",
|
|
|
@@ -546,7 +580,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Classes";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Classes";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToClassesCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Classes'",
|
|
|
@@ -564,7 +599,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(self)._model())._focusOnMethods();
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st(self)._model())._focusOnMethods();
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToMethodsCommand)})},
|
|
|
args: [],
|
|
|
source: "execute\x0a\x09self model focusOnMethods",
|
|
|
@@ -581,7 +617,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (77);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (77);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToMethodsCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09\x22m\x22\x0a \x0a\x09^ 77",
|
|
|
@@ -597,7 +634,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Methods";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Methods";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToMethodsCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Methods'",
|
|
|
@@ -615,7 +653,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(self)._model())._focusOnPackages();
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st(self)._model())._focusOnPackages();
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToPackagesCommand)})},
|
|
|
args: [],
|
|
|
source: "execute\x0a\x09self model focusOnPackages",
|
|
|
@@ -632,7 +671,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (80);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (80);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToPackagesCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09\x22p\x22\x0a \x0a\x09^ 80",
|
|
|
@@ -648,7 +688,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Packages";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Packages";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToPackagesCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Packages'",
|
|
|
@@ -666,7 +707,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(self)._model())._focusOnProtocols();
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st(self)._model())._focusOnProtocols();
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToProtocolsCommand)})},
|
|
|
args: [],
|
|
|
source: "execute\x0a\x09self model focusOnProtocols",
|
|
|
@@ -683,7 +725,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (84);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (84);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToProtocolsCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09\x22p\x22\x0a \x0a\x09^ 84",
|
|
|
@@ -699,7 +742,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Protocols";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Protocols";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToProtocolsCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Protocols'",
|
|
|
@@ -717,7 +761,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(self)._model())._focusOnSourceCode();
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st(self)._model())._focusOnSourceCode();
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLGoToSourceCodeCommand)})},
|
|
|
args: [],
|
|
|
source: "execute\x0a\x09self model focusOnSourceCode",
|
|
|
@@ -734,7 +779,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (83);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (83);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLGoToSourceCodeCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09\x22s\x22\x0a \x0a\x09^ 83",
|
|
|
@@ -750,7 +796,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Source code";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Source code";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLGoToSourceCodeCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Source code'",
|
|
|
@@ -769,7 +816,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (77);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (77);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveToCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 77",
|
|
|
@@ -785,7 +833,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Move";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Move";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveToCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Move'",
|
|
|
@@ -804,7 +853,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (77);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (77);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 77",
|
|
|
@@ -820,7 +870,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Method";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Method";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Method'",
|
|
|
@@ -838,7 +889,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToClassCommand)})},
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToClassCommand)})},
|
|
|
args: [],
|
|
|
source: "execute",
|
|
|
messageSends: [],
|
|
|
@@ -854,7 +906,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (67);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (67);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 67",
|
|
|
@@ -870,7 +923,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "to class";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "to class";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToClassCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x09\x0a\x09^ 'to class'",
|
|
|
@@ -888,7 +942,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToProtocolCommand)})},
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLMoveMethodToProtocolCommand)})},
|
|
|
args: [],
|
|
|
source: "execute",
|
|
|
messageSends: [],
|
|
|
@@ -904,7 +959,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (84);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (84);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 84",
|
|
|
@@ -920,7 +976,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "to protocol";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "to protocol";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLMoveMethodToProtocolCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'to protocol'",
|
|
|
@@ -939,7 +996,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (84);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (84);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 84",
|
|
|
@@ -955,7 +1013,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Toggle";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Toggle";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Toggle'",
|
|
|
@@ -973,7 +1032,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(self)._model())._showInstance_(false);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st(self)._model())._showInstance_(false);
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleClassSideCommand)})},
|
|
|
args: [],
|
|
|
source: "execute\x0a\x09self model showInstance: false",
|
|
|
@@ -990,7 +1050,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (67);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (67);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleClassSideCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09\x22c\x22\x0a \x0a\x09^ 67",
|
|
|
@@ -1006,7 +1067,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Class side";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Class side";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleClassSideCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Class side'",
|
|
|
@@ -1024,7 +1086,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
_st(_st(self)._model())._showInstance_(true);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+_st(_st(self)._model())._showInstance_(true);
|
|
|
return self}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLToggleInstanceSideCommand)})},
|
|
|
args: [],
|
|
|
source: "execute\x0a\x09self model showInstance: true",
|
|
|
@@ -1041,7 +1104,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (73);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (73);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09\x22i\x22\x0a \x0a\x09^ 73",
|
|
|
@@ -1057,7 +1121,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Instance side";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Instance side";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLToggleInstanceSideCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Instance side'",
|
|
|
@@ -1076,7 +1141,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (79);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (79);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{},smalltalk.HLOpenCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 79",
|
|
|
@@ -1092,7 +1158,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Open";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Open";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLOpenCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Open'",
|
|
|
@@ -1110,7 +1177,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st((smalltalk.HLBrowser || HLBrowser))._openAsTab();
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLOpenBrowserCommand)})},
|
|
|
@@ -1129,7 +1197,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (66);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (66);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLOpenBrowserCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 66",
|
|
|
@@ -1145,7 +1214,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Browser";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Browser";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLOpenBrowserCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Browser'",
|
|
|
@@ -1163,7 +1233,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st((smalltalk.HLTranscript || HLTranscript))._openAsTab();
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"execute",{}, smalltalk.HLOpenTranscriptCommand)})},
|
|
|
@@ -1182,7 +1253,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (84);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (84);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLOpenTranscriptCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 84",
|
|
|
@@ -1198,7 +1270,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Transcript";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Transcript";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLOpenTranscriptCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Transcript'",
|
|
|
@@ -1216,7 +1289,8 @@ selector: "execute",
|
|
|
category: 'executing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
var $1;
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+var $1;
|
|
|
$1=_st((smalltalk.HLCodeWidget || HLCodeWidget))._openAsTab();
|
|
|
return $1;
|
|
|
}, function($ctx1) {$ctx1.fill(self,"execute",{},smalltalk.HLOpenWorkspaceCommand)})},
|
|
|
@@ -1235,7 +1309,8 @@ selector: "key",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return (87);
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return (87);
|
|
|
}, function($ctx1) {$ctx1.fill(self,"key",{}, smalltalk.HLOpenWorkspaceCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "key\x0a\x09^ 87",
|
|
|
@@ -1251,7 +1326,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "Workspace";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "Workspace";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{}, smalltalk.HLOpenWorkspaceCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'Workspace'",
|
|
|
@@ -1270,7 +1346,8 @@ selector: "label",
|
|
|
category: 'accessing',
|
|
|
fn: function (){
|
|
|
var self=this;
|
|
|
-return smalltalk.withContext(function($ctx1) {
return "View";
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
+return "View";
|
|
|
}, function($ctx1) {$ctx1.fill(self,"label",{},smalltalk.HLViewCommand.klass)})},
|
|
|
args: [],
|
|
|
source: "label\x0a\x09^ 'View'",
|
|
|
@@ -1280,3 +1357,4 @@ referencedClasses: []
|
|
|
smalltalk.HLViewCommand.klass);
|
|
|
|
|
|
|
|
|
+})(global_smalltalk,global_nil,global__st);
|
