|
@@ -2858,6 +2858,225 @@ smalltalk.JavaScriptExceptionTest);
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
+smalltalk.addClass('LegacyPackageHandlerTest', smalltalk.TestCase, ['zorkPackage', 'grulPackage', 'backUpCommitPathJs', 'backUpCommitPathSt'], 'Kernel-Tests');
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "setUp",
|
|
|
|
+category: 'running',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+function $LegacyPackageHandler(){return smalltalk.LegacyPackageHandler||(typeof LegacyPackageHandler=="undefined"?nil:LegacyPackageHandler)}
|
|
|
|
+function $Package(){return smalltalk.Package||(typeof Package=="undefined"?nil:Package)}
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+var $1,$2;
|
|
|
|
+self["@backUpCommitPathJs"]=_st($LegacyPackageHandler())._defaultCommitPathJs();
|
|
|
|
+self["@backUpCommitPathSt"]=_st($LegacyPackageHandler())._defaultCommitPathSt();
|
|
|
|
+_st($LegacyPackageHandler())._resetCommitPaths();
|
|
|
|
+self["@zorkPackage"]=_st(_st($Package())._new())._name_("Zork");
|
|
|
|
+$1=_st($Package())._new();
|
|
|
|
+_st($1)._name_("Grul");
|
|
|
|
+_st($1)._commitPathJs_("server/grul/js");
|
|
|
|
+_st($1)._commitPathSt_("grul/st");
|
|
|
|
+$2=_st($1)._yourself();
|
|
|
|
+self["@grulPackage"]=$2;
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"setUp",{},smalltalk.LegacyPackageHandlerTest)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "setUp\x0a\x09backUpCommitPathJs := LegacyPackageHandler defaultCommitPathJs.\x0a\x09backUpCommitPathSt := LegacyPackageHandler defaultCommitPathSt.\x0a\x0a\x09LegacyPackageHandler resetCommitPaths.\x0a\x0a\x09zorkPackage := Package new name: 'Zork'.\x0a\x09grulPackage := Package new\x0a\x09\x09\x09\x09\x09name: 'Grul';\x0a\x09\x09\x09\x09\x09commitPathJs: 'server/grul/js';\x0a\x09\x09\x09\x09\x09commitPathSt: 'grul/st';\x0a\x09\x09\x09\x09\x09yourself",
|
|
|
|
+messageSends: ["defaultCommitPathJs", "defaultCommitPathSt", "resetCommitPaths", "name:", "new", "commitPathJs:", "commitPathSt:", "yourself"],
|
|
|
|
+referencedClasses: ["LegacyPackageHandler", "Package"]
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTest);
|
|
|
|
+
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "tearDown",
|
|
|
|
+category: 'running',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+function $LegacyPackageHandler(){return smalltalk.LegacyPackageHandler||(typeof LegacyPackageHandler=="undefined"?nil:LegacyPackageHandler)}
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+var $1,$2;
|
|
|
|
+$1=$LegacyPackageHandler();
|
|
|
|
+_st($1)._defaultCommitPathJs_(self["@backUpCommitPathJs"]);
|
|
|
|
+$2=_st($1)._defaultCommitPathSt_(self["@backUpCommitPathSt"]);
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"tearDown",{},smalltalk.LegacyPackageHandlerTest)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "tearDown\x0a\x09LegacyPackageHandler\x0a\x09\x09defaultCommitPathJs: backUpCommitPathJs;\x0a\x09\x09defaultCommitPathSt: backUpCommitPathSt",
|
|
|
|
+messageSends: ["defaultCommitPathJs:", "defaultCommitPathSt:"],
|
|
|
|
+referencedClasses: ["LegacyPackageHandler"]
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTest);
|
|
|
|
+
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "testGrulCommitPathJsShouldBeServerGrulJs",
|
|
|
|
+category: 'tests',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+self._assert_equals_(_st(self["@grulPackage"])._commitPathJs(),"server/grul/js");
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"testGrulCommitPathJsShouldBeServerGrulJs",{},smalltalk.LegacyPackageHandlerTest)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "testGrulCommitPathJsShouldBeServerGrulJs\x0a\x09self assert: grulPackage commitPathJs equals: 'server/grul/js'",
|
|
|
|
+messageSends: ["assert:equals:", "commitPathJs"],
|
|
|
|
+referencedClasses: []
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTest);
|
|
|
|
+
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "testGrulCommitPathStShouldBeGrulSt",
|
|
|
|
+category: 'tests',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+self._assert_equals_(_st(self["@grulPackage"])._commitPathSt(),"grul/st");
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"testGrulCommitPathStShouldBeGrulSt",{},smalltalk.LegacyPackageHandlerTest)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "testGrulCommitPathStShouldBeGrulSt\x0a\x09self assert: grulPackage commitPathSt equals: 'grul/st'",
|
|
|
|
+messageSends: ["assert:equals:", "commitPathSt"],
|
|
|
|
+referencedClasses: []
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTest);
|
|
|
|
+
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "testZorkCommitPathJsShouldBeJs",
|
|
|
|
+category: 'tests',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+self._assert_equals_(_st(self["@zorkPackage"])._commitPathJs(),"js");
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"testZorkCommitPathJsShouldBeJs",{},smalltalk.LegacyPackageHandlerTest)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "testZorkCommitPathJsShouldBeJs\x0a\x09self assert: zorkPackage commitPathJs equals: 'js'",
|
|
|
|
+messageSends: ["assert:equals:", "commitPathJs"],
|
|
|
|
+referencedClasses: []
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTest);
|
|
|
|
+
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "testZorkCommitPathStShouldBeSt",
|
|
|
|
+category: 'tests',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+self._assert_equals_(_st(self["@zorkPackage"])._commitPathSt(),"st");
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"testZorkCommitPathStShouldBeSt",{},smalltalk.LegacyPackageHandlerTest)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "testZorkCommitPathStShouldBeSt\x0a\x09self assert: zorkPackage commitPathSt equals: 'st'",
|
|
|
|
+messageSends: ["assert:equals:", "commitPathSt"],
|
|
|
|
+referencedClasses: []
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTest);
|
|
|
|
+
|
|
|
|
+
|
|
|
|
+
|
|
|
|
+smalltalk.addClass('LegacyPackageHandlerTestWithDefaultsChanged', smalltalk.LegacyPackageHandlerTest, [], 'Kernel-Tests');
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "setUp",
|
|
|
|
+category: 'running',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+function $LegacyPackageHandler(){return smalltalk.LegacyPackageHandler||(typeof LegacyPackageHandler=="undefined"?nil:LegacyPackageHandler)}
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+var $1,$2;
|
|
|
|
+smalltalk.LegacyPackageHandlerTestWithDefaultsChanged.superclass.fn.prototype._setUp.apply(_st(self), []);
|
|
|
|
+$1=$LegacyPackageHandler();
|
|
|
|
+_st($1)._defaultCommitPathJs_("javascripts/");
|
|
|
|
+$2=_st($1)._defaultCommitPathSt_("smalltalk/");
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"setUp",{},smalltalk.LegacyPackageHandlerTestWithDefaultsChanged)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "setUp\x0a\x09super setUp.\x0a\x0a\x09LegacyPackageHandler\x0a\x09\x09defaultCommitPathJs: 'javascripts/';\x0a\x09\x09defaultCommitPathSt: 'smalltalk/'.",
|
|
|
|
+messageSends: ["setUp", "defaultCommitPathJs:", "defaultCommitPathSt:"],
|
|
|
|
+referencedClasses: ["LegacyPackageHandler"]
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTestWithDefaultsChanged);
|
|
|
|
+
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "testGrulCommitPathJsShouldBeServerGrulJs",
|
|
|
|
+category: 'tests',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+self._assert_equals_(_st(self["@grulPackage"])._commitPathJs(),"server/grul/js");
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"testGrulCommitPathJsShouldBeServerGrulJs",{},smalltalk.LegacyPackageHandlerTestWithDefaultsChanged)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "testGrulCommitPathJsShouldBeServerGrulJs\x0a\x09self assert: grulPackage commitPathJs equals: 'server/grul/js'",
|
|
|
|
+messageSends: ["assert:equals:", "commitPathJs"],
|
|
|
|
+referencedClasses: []
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTestWithDefaultsChanged);
|
|
|
|
+
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "testGrulCommitPathStShouldBeGrulSt",
|
|
|
|
+category: 'tests',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+self._assert_equals_(_st(self["@grulPackage"])._commitPathSt(),"grul/st");
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"testGrulCommitPathStShouldBeGrulSt",{},smalltalk.LegacyPackageHandlerTestWithDefaultsChanged)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "testGrulCommitPathStShouldBeGrulSt\x0a\x09self assert: grulPackage commitPathSt equals: 'grul/st'",
|
|
|
|
+messageSends: ["assert:equals:", "commitPathSt"],
|
|
|
|
+referencedClasses: []
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTestWithDefaultsChanged);
|
|
|
|
+
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "testZorkCommitPathJsShouldBeJavascript",
|
|
|
|
+category: 'tests',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+self._assert_equals_(_st(self["@zorkPackage"])._commitPathJs(),"javascripts/");
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"testZorkCommitPathJsShouldBeJavascript",{},smalltalk.LegacyPackageHandlerTestWithDefaultsChanged)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "testZorkCommitPathJsShouldBeJavascript\x0a\x09self assert: zorkPackage commitPathJs equals: 'javascripts/'",
|
|
|
|
+messageSends: ["assert:equals:", "commitPathJs"],
|
|
|
|
+referencedClasses: []
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTestWithDefaultsChanged);
|
|
|
|
+
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "testZorkCommitPathStShouldBeSmalltalk",
|
|
|
|
+category: 'tests',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+self._assert_equals_(_st(self["@zorkPackage"])._commitPathSt(),"smalltalk/");
|
|
|
|
+return self}, function($ctx1) {$ctx1.fill(self,"testZorkCommitPathStShouldBeSmalltalk",{},smalltalk.LegacyPackageHandlerTestWithDefaultsChanged)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "testZorkCommitPathStShouldBeSmalltalk\x0a\x09self assert: zorkPackage commitPathSt equals: 'smalltalk/'",
|
|
|
|
+messageSends: ["assert:equals:", "commitPathSt"],
|
|
|
|
+referencedClasses: []
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTestWithDefaultsChanged);
|
|
|
|
+
|
|
|
|
+
|
|
|
|
+smalltalk.addMethod(
|
|
|
|
+smalltalk.method({
|
|
|
|
+selector: "shouldInheritSelectors",
|
|
|
|
+category: 'accessing',
|
|
|
|
+fn: function (){
|
|
|
|
+var self=this;
|
|
|
|
+return smalltalk.withContext(function($ctx1) {
|
|
|
|
+return false;
|
|
|
|
+}, function($ctx1) {$ctx1.fill(self,"shouldInheritSelectors",{},smalltalk.LegacyPackageHandlerTestWithDefaultsChanged.klass)})},
|
|
|
|
+args: [],
|
|
|
|
+source: "shouldInheritSelectors\x0a\x09^ false",
|
|
|
|
+messageSends: [],
|
|
|
|
+referencedClasses: []
|
|
|
|
+}),
|
|
|
|
+smalltalk.LegacyPackageHandlerTestWithDefaultsChanged.klass);
|
|
|
|
+
|
|
|
|
+
|
|
smalltalk.addClass('MessageSendTest', smalltalk.TestCase, [], 'Kernel-Tests');
|
|
smalltalk.addClass('MessageSendTest', smalltalk.TestCase, [], 'Kernel-Tests');
|
|
smalltalk.addMethod(
|
|
smalltalk.addMethod(
|
|
smalltalk.method({
|
|
smalltalk.method({
|
|
@@ -3760,225 +3979,6 @@ smalltalk.ObjectTest);
|
|
|
|
|
|
|
|
|
|
|
|
|
|
-smalltalk.addClass('PackageTest', smalltalk.TestCase, ['zorkPackage', 'grulPackage', 'backUpCommitPathJs', 'backUpCommitPathSt'], 'Kernel-Tests');
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "setUp",
|
|
|
|
-category: 'running',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-function $LegacyPackageHandler(){return smalltalk.LegacyPackageHandler||(typeof LegacyPackageHandler=="undefined"?nil:LegacyPackageHandler)}
|
|
|
|
-function $Package(){return smalltalk.Package||(typeof Package=="undefined"?nil:Package)}
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-var $1,$2;
|
|
|
|
-self["@backUpCommitPathJs"]=_st($LegacyPackageHandler())._defaultCommitPathJs();
|
|
|
|
-self["@backUpCommitPathSt"]=_st($LegacyPackageHandler())._defaultCommitPathSt();
|
|
|
|
-_st($LegacyPackageHandler())._resetCommitPaths();
|
|
|
|
-self["@zorkPackage"]=_st(_st($Package())._new())._name_("Zork");
|
|
|
|
-$1=_st($Package())._new();
|
|
|
|
-_st($1)._name_("Grul");
|
|
|
|
-_st($1)._commitPathJs_("server/grul/js");
|
|
|
|
-_st($1)._commitPathSt_("grul/st");
|
|
|
|
-$2=_st($1)._yourself();
|
|
|
|
-self["@grulPackage"]=$2;
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"setUp",{},smalltalk.PackageTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "setUp\x0a\x09backUpCommitPathJs := LegacyPackageHandler defaultCommitPathJs.\x0a\x09backUpCommitPathSt := LegacyPackageHandler defaultCommitPathSt.\x0a\x0a\x09LegacyPackageHandler resetCommitPaths.\x0a\x0a\x09zorkPackage := Package new name: 'Zork'.\x0a\x09grulPackage := Package new\x0a\x09\x09\x09\x09\x09name: 'Grul';\x0a\x09\x09\x09\x09\x09commitPathJs: 'server/grul/js';\x0a\x09\x09\x09\x09\x09commitPathSt: 'grul/st';\x0a\x09\x09\x09\x09\x09yourself",
|
|
|
|
-messageSends: ["defaultCommitPathJs", "defaultCommitPathSt", "resetCommitPaths", "name:", "new", "commitPathJs:", "commitPathSt:", "yourself"],
|
|
|
|
-referencedClasses: ["LegacyPackageHandler", "Package"]
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageTest);
|
|
|
|
-
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "tearDown",
|
|
|
|
-category: 'running',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-function $LegacyPackageHandler(){return smalltalk.LegacyPackageHandler||(typeof LegacyPackageHandler=="undefined"?nil:LegacyPackageHandler)}
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-var $1,$2;
|
|
|
|
-$1=$LegacyPackageHandler();
|
|
|
|
-_st($1)._defaultCommitPathJs_(self["@backUpCommitPathJs"]);
|
|
|
|
-$2=_st($1)._defaultCommitPathSt_(self["@backUpCommitPathSt"]);
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"tearDown",{},smalltalk.PackageTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "tearDown\x0a\x09LegacyPackageHandler\x0a\x09\x09defaultCommitPathJs: backUpCommitPathJs;\x0a\x09\x09defaultCommitPathSt: backUpCommitPathSt",
|
|
|
|
-messageSends: ["defaultCommitPathJs:", "defaultCommitPathSt:"],
|
|
|
|
-referencedClasses: ["LegacyPackageHandler"]
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageTest);
|
|
|
|
-
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "testGrulCommitPathJsShouldBeServerGrulJs",
|
|
|
|
-category: 'tests',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-self._assert_equals_(_st(self["@grulPackage"])._commitPathJs(),"server/grul/js");
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"testGrulCommitPathJsShouldBeServerGrulJs",{},smalltalk.PackageTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "testGrulCommitPathJsShouldBeServerGrulJs\x0a\x09self assert: grulPackage commitPathJs equals: 'server/grul/js'",
|
|
|
|
-messageSends: ["assert:equals:", "commitPathJs"],
|
|
|
|
-referencedClasses: []
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageTest);
|
|
|
|
-
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "testGrulCommitPathStShouldBeGrulSt",
|
|
|
|
-category: 'tests',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-self._assert_equals_(_st(self["@grulPackage"])._commitPathSt(),"grul/st");
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"testGrulCommitPathStShouldBeGrulSt",{},smalltalk.PackageTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "testGrulCommitPathStShouldBeGrulSt\x0a\x09self assert: grulPackage commitPathSt equals: 'grul/st'",
|
|
|
|
-messageSends: ["assert:equals:", "commitPathSt"],
|
|
|
|
-referencedClasses: []
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageTest);
|
|
|
|
-
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "testZorkCommitPathJsShouldBeJs",
|
|
|
|
-category: 'tests',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-self._assert_equals_(_st(self["@zorkPackage"])._commitPathJs(),"js");
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"testZorkCommitPathJsShouldBeJs",{},smalltalk.PackageTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "testZorkCommitPathJsShouldBeJs\x0a\x09self assert: zorkPackage commitPathJs equals: 'js'",
|
|
|
|
-messageSends: ["assert:equals:", "commitPathJs"],
|
|
|
|
-referencedClasses: []
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageTest);
|
|
|
|
-
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "testZorkCommitPathStShouldBeSt",
|
|
|
|
-category: 'tests',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-self._assert_equals_(_st(self["@zorkPackage"])._commitPathSt(),"st");
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"testZorkCommitPathStShouldBeSt",{},smalltalk.PackageTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "testZorkCommitPathStShouldBeSt\x0a\x09self assert: zorkPackage commitPathSt equals: 'st'",
|
|
|
|
-messageSends: ["assert:equals:", "commitPathSt"],
|
|
|
|
-referencedClasses: []
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageTest);
|
|
|
|
-
|
|
|
|
-
|
|
|
|
-
|
|
|
|
-smalltalk.addClass('PackageWithDefaultCommitPathChangedTest', smalltalk.PackageTest, [], 'Kernel-Tests');
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "setUp",
|
|
|
|
-category: 'running',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-function $LegacyPackageHandler(){return smalltalk.LegacyPackageHandler||(typeof LegacyPackageHandler=="undefined"?nil:LegacyPackageHandler)}
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-var $1,$2;
|
|
|
|
-smalltalk.PackageWithDefaultCommitPathChangedTest.superclass.fn.prototype._setUp.apply(_st(self), []);
|
|
|
|
-$1=$LegacyPackageHandler();
|
|
|
|
-_st($1)._defaultCommitPathJs_("javascripts/");
|
|
|
|
-$2=_st($1)._defaultCommitPathSt_("smalltalk/");
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"setUp",{},smalltalk.PackageWithDefaultCommitPathChangedTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "setUp\x0a\x09super setUp.\x0a\x0a\x09LegacyPackageHandler\x0a\x09\x09defaultCommitPathJs: 'javascripts/';\x0a\x09\x09defaultCommitPathSt: 'smalltalk/'.",
|
|
|
|
-messageSends: ["setUp", "defaultCommitPathJs:", "defaultCommitPathSt:"],
|
|
|
|
-referencedClasses: ["LegacyPackageHandler"]
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageWithDefaultCommitPathChangedTest);
|
|
|
|
-
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "testGrulCommitPathJsShouldBeServerGrulJs",
|
|
|
|
-category: 'tests',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-self._assert_equals_(_st(self["@grulPackage"])._commitPathJs(),"server/grul/js");
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"testGrulCommitPathJsShouldBeServerGrulJs",{},smalltalk.PackageWithDefaultCommitPathChangedTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "testGrulCommitPathJsShouldBeServerGrulJs\x0a\x09self assert: grulPackage commitPathJs equals: 'server/grul/js'",
|
|
|
|
-messageSends: ["assert:equals:", "commitPathJs"],
|
|
|
|
-referencedClasses: []
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageWithDefaultCommitPathChangedTest);
|
|
|
|
-
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "testGrulCommitPathStShouldBeGrulSt",
|
|
|
|
-category: 'tests',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-self._assert_equals_(_st(self["@grulPackage"])._commitPathSt(),"grul/st");
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"testGrulCommitPathStShouldBeGrulSt",{},smalltalk.PackageWithDefaultCommitPathChangedTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "testGrulCommitPathStShouldBeGrulSt\x0a\x09self assert: grulPackage commitPathSt equals: 'grul/st'",
|
|
|
|
-messageSends: ["assert:equals:", "commitPathSt"],
|
|
|
|
-referencedClasses: []
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageWithDefaultCommitPathChangedTest);
|
|
|
|
-
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "testZorkCommitPathJsShouldBeJavascript",
|
|
|
|
-category: 'tests',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-self._assert_equals_(_st(self["@zorkPackage"])._commitPathJs(),"javascripts/");
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"testZorkCommitPathJsShouldBeJavascript",{},smalltalk.PackageWithDefaultCommitPathChangedTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "testZorkCommitPathJsShouldBeJavascript\x0a\x09self assert: zorkPackage commitPathJs equals: 'javascripts/'",
|
|
|
|
-messageSends: ["assert:equals:", "commitPathJs"],
|
|
|
|
-referencedClasses: []
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageWithDefaultCommitPathChangedTest);
|
|
|
|
-
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "testZorkCommitPathStShouldBeSmalltalk",
|
|
|
|
-category: 'tests',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-self._assert_equals_(_st(self["@zorkPackage"])._commitPathSt(),"smalltalk/");
|
|
|
|
-return self}, function($ctx1) {$ctx1.fill(self,"testZorkCommitPathStShouldBeSmalltalk",{},smalltalk.PackageWithDefaultCommitPathChangedTest)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "testZorkCommitPathStShouldBeSmalltalk\x0a\x09self assert: zorkPackage commitPathSt equals: 'smalltalk/'",
|
|
|
|
-messageSends: ["assert:equals:", "commitPathSt"],
|
|
|
|
-referencedClasses: []
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageWithDefaultCommitPathChangedTest);
|
|
|
|
-
|
|
|
|
-
|
|
|
|
-smalltalk.addMethod(
|
|
|
|
-smalltalk.method({
|
|
|
|
-selector: "shouldInheritSelectors",
|
|
|
|
-category: 'accessing',
|
|
|
|
-fn: function (){
|
|
|
|
-var self=this;
|
|
|
|
-return smalltalk.withContext(function($ctx1) {
|
|
|
|
-return false;
|
|
|
|
-}, function($ctx1) {$ctx1.fill(self,"shouldInheritSelectors",{},smalltalk.PackageWithDefaultCommitPathChangedTest.klass)})},
|
|
|
|
-args: [],
|
|
|
|
-source: "shouldInheritSelectors\x0a\x09^ false",
|
|
|
|
-messageSends: [],
|
|
|
|
-referencedClasses: []
|
|
|
|
-}),
|
|
|
|
-smalltalk.PackageWithDefaultCommitPathChangedTest.klass);
|
|
|
|
-
|
|
|
|
-
|
|
|
|
smalltalk.addClass('PointTest', smalltalk.TestCase, [], 'Kernel-Tests');
|
|
smalltalk.addClass('PointTest', smalltalk.TestCase, [], 'Kernel-Tests');
|
|
smalltalk.addMethod(
|
|
smalltalk.addMethod(
|
|
smalltalk.method({
|
|
smalltalk.method({
|