Bladeren bron

commit all packages one more time to pick up the additional bugfixes available, plus Issue #152 bugfix

Dale Henrichs 13 jaren geleden
bovenliggende
commit
ba38065b79
17 gewijzigde bestanden met toevoegingen van 175 en 175 verwijderingen
  1. 20 20
      js/Benchfib.deploy.js
  2. 25 25
      js/Benchfib.js
  3. 18 18
      js/Canvas.deploy.js
  4. 30 30
      js/Canvas.js
  5. 1 1
      st/Benchfib.st
  6. 4 4
      st/Canvas.st
  7. 1 1
      st/Examples.st
  8. 14 14
      st/IDE.st
  9. 2 2
      st/Kernel-Announcements.st
  10. 6 6
      st/Kernel-Classes.st
  11. 14 14
      st/Kernel-Collections.st
  12. 3 3
      st/Kernel-Exceptions.st
  13. 4 4
      st/Kernel-Methods.st
  14. 11 11
      st/Kernel-Objects.st
  15. 17 17
      st/Kernel-Tests.st
  16. 2 2
      st/Kernel-Transcript.st
  17. 3 3
      st/SUnit.st

+ 20 - 20
js/Benchfib.deploy.js

@@ -44,26 +44,6 @@ return self;}
 }),
 }),
 smalltalk.Number);
 smalltalk.Number);
 
 
-smalltalk.addMethod(
-unescape('_tinyBenchmarks'),
-smalltalk.method({
-selector: unescape('tinyBenchmarks'),
-fn: function (){
-var self=this;
-var t1=nil;
-var t2=nil;
-var r=nil;
-var n1=nil;
-var n2=nil;
-(n1=(1));
-(function(){while((function(){(t1=smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){return smalltalk.send(n1, "_benchmark", []);})]));return ((($receiver = t1).klass === smalltalk.Number) ? $receiver <(1000) : smalltalk.send($receiver, "__lt", [(1000)]));})()) {(function(){return (n1=((($receiver = n1).klass === smalltalk.Number) ? $receiver *(2) : smalltalk.send($receiver, "__star", [(2)])));})()}})();
-(n2=(16));
-(function(){while((function(){(t2=smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){return (r=smalltalk.send(n2, "_benchFib", []));})]));return ((($receiver = t2).klass === smalltalk.Number) ? $receiver <(1000) : smalltalk.send($receiver, "__lt", [(1000)]));})()) {(function(){return (n2=((($receiver = n2).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));})()}})();
-return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(((($receiver = ((($receiver = ((($receiver = n1).klass === smalltalk.Number) ? $receiver *(500000) : smalltalk.send($receiver, "__star", [(500000)]))).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)]))).klass === smalltalk.Number) ? $receiver /t1 : smalltalk.send($receiver, "__slash", [t1])), "_printString", []), "__comma", [unescape("%20bytecodes/sec%3B%20")]), "__comma", [smalltalk.send(((($receiver = ((($receiver = r).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)]))).klass === smalltalk.Number) ? $receiver /t2 : smalltalk.send($receiver, "__slash", [t2])), "_printString", [])]), "__comma", [unescape("%20sends/sec")]);
-return self;}
-}),
-smalltalk.Number);
-
 smalltalk.addMethod(
 smalltalk.addMethod(
 unescape('_jsbenchFib'),
 unescape('_jsbenchFib'),
 smalltalk.method({
 smalltalk.method({
@@ -130,3 +110,23 @@ return self;}
 }),
 }),
 smalltalk.Number);
 smalltalk.Number);
 
 
+smalltalk.addMethod(
+unescape('_tinyBenchmarks'),
+smalltalk.method({
+selector: unescape('tinyBenchmarks'),
+fn: function (){
+var self=this;
+var t1=nil;
+var t2=nil;
+var r=nil;
+var n1=nil;
+var n2=nil;
+(n1=(1));
+(function(){while((function(){(t1=smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){return smalltalk.send(n1, "_benchmark", []);})]));return ((($receiver = t1).klass === smalltalk.Number) ? $receiver <(1000) : smalltalk.send($receiver, "__lt", [(1000)]));})()) {(function(){return (n1=((($receiver = n1).klass === smalltalk.Number) ? $receiver *(2) : smalltalk.send($receiver, "__star", [(2)])));})()}})();
+(n2=(16));
+(function(){while((function(){(t2=smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){return (r=smalltalk.send(n2, "_benchFib", []));})]));return ((($receiver = t2).klass === smalltalk.Number) ? $receiver <(1000) : smalltalk.send($receiver, "__lt", [(1000)]));})()) {(function(){return (n2=((($receiver = n2).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));})()}})();
+return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(((($receiver = ((($receiver = ((($receiver = n1).klass === smalltalk.Number) ? $receiver *(500000) : smalltalk.send($receiver, "__star", [(500000)]))).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)]))).klass === smalltalk.Number) ? $receiver /t1 : smalltalk.send($receiver, "__slash", [t1])), "_printString", []), "__comma", [unescape("%20bytecodes/sec%3B%20")]), "__comma", [smalltalk.send(((($receiver = ((($receiver = r).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)]))).klass === smalltalk.Number) ? $receiver /t2 : smalltalk.send($receiver, "__slash", [t2])), "_printString", [])]), "__comma", [unescape("%20sends/sec")]);
+return self;}
+}),
+smalltalk.Number);
+

+ 25 - 25
js/Benchfib.js

@@ -59,31 +59,6 @@ referencedClasses: ["Array"]
 }),
 }),
 smalltalk.Number);
 smalltalk.Number);
 
 
-smalltalk.addMethod(
-unescape('_tinyBenchmarks'),
-smalltalk.method({
-selector: unescape('tinyBenchmarks'),
-category: '*Benchfib',
-fn: function (){
-var self=this;
-var t1=nil;
-var t2=nil;
-var r=nil;
-var n1=nil;
-var n2=nil;
-(n1=(1));
-(function(){while((function(){(t1=smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){return smalltalk.send(n1, "_benchmark", []);})]));return ((($receiver = t1).klass === smalltalk.Number) ? $receiver <(1000) : smalltalk.send($receiver, "__lt", [(1000)]));})()) {(function(){return (n1=((($receiver = n1).klass === smalltalk.Number) ? $receiver *(2) : smalltalk.send($receiver, "__star", [(2)])));})()}})();
-(n2=(16));
-(function(){while((function(){(t2=smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){return (r=smalltalk.send(n2, "_benchFib", []));})]));return ((($receiver = t2).klass === smalltalk.Number) ? $receiver <(1000) : smalltalk.send($receiver, "__lt", [(1000)]));})()) {(function(){return (n2=((($receiver = n2).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));})()}})();
-return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(((($receiver = ((($receiver = ((($receiver = n1).klass === smalltalk.Number) ? $receiver *(500000) : smalltalk.send($receiver, "__star", [(500000)]))).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)]))).klass === smalltalk.Number) ? $receiver /t1 : smalltalk.send($receiver, "__slash", [t1])), "_printString", []), "__comma", [unescape("%20bytecodes/sec%3B%20")]), "__comma", [smalltalk.send(((($receiver = ((($receiver = r).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)]))).klass === smalltalk.Number) ? $receiver /t2 : smalltalk.send($receiver, "__slash", [t2])), "_printString", [])]), "__comma", [unescape("%20sends/sec")]);
-return self;},
-args: [],
-source: unescape('tinyBenchmarks%20%0A%09%22Report%20the%20results%20of%20running%20the%20two%20tiny%20Squeak%20benchmarks.%0A%09ar%209/10/1999%3A%20Adjusted%20to%20run%20at%20least%201%20sec%20to%20get%20more%20stable%20results%22%0A%09%220%20tinyBenchmarks%22%0A%09%22On%20a%20292%20MHz%20G3%20Mac%3A%2022727272%20bytecodes/sec%3B%20984169%20sends/sec%22%0A%09%22On%20a%20400%20MHz%20PII/Win98%3A%20%2018028169%20bytecodes/sec%3B%201081272%20sends/sec%22%0A%09%7C%20t1%20t2%20r%20n1%20n2%20%7C%0A%09n1%20%3A%3D%201.%0A%09%5Bt1%20%3A%3D%20Date%20millisecondsToRun%3A%20%5Bn1%20benchmark%5D.%0A%09t1%20%3C%201000%5D%20whileTrue%3A%5Bn1%20%3A%3D%20n1%20*%202%5D.%20%22Note%3A%20%23benchmark%27s%20runtime%20is%20about%20O%28n%29%22%0A%0A%09n2%20%3A%3D%2016.%0A%09%5Bt2%20%3A%3D%20Date%20millisecondsToRun%3A%20%5Br%20%3A%3D%20n2%20benchFib%5D.%0A%09t2%20%3C%201000%5D%20whileTrue%3A%5Bn2%20%3A%3D%20n2%20+%201%5D.%20%0A%09%22Note%3A%20%23benchFib%27s%20runtime%20is%20about%20O%28k%5En%29%2C%0A%09%09where%20k%20is%20the%20golden%20number%20%3D%20%281%20+%205%20sqrt%29%20/%202%20%3D%201.618....%22%0A%0A%09%5E%20%28%28n1%20*%20500000%20*%201000%29%20/%20t1%29%20printString%2C%20%27%20bytecodes/sec%3B%20%27%2C%0A%09%20%20%28%28r%20*%201000%29%20/%20t2%29%20printString%2C%20%27%20sends/sec%27'),
-messageSends: ["whileTrue:", "millisecondsToRun:", "benchmark", unescape("%3C"), unescape("*"), "benchFib", unescape("+"), unescape("%2C"), "printString", unescape("/")],
-referencedClasses: ["Date"]
-}),
-smalltalk.Number);
-
 smalltalk.addMethod(
 smalltalk.addMethod(
 unescape('_jsbenchFib'),
 unescape('_jsbenchFib'),
 smalltalk.method({
 smalltalk.method({
@@ -165,3 +140,28 @@ referencedClasses: ["Date"]
 }),
 }),
 smalltalk.Number);
 smalltalk.Number);
 
 
+smalltalk.addMethod(
+unescape('_tinyBenchmarks'),
+smalltalk.method({
+selector: unescape('tinyBenchmarks'),
+category: '*Benchfib',
+fn: function (){
+var self=this;
+var t1=nil;
+var t2=nil;
+var r=nil;
+var n1=nil;
+var n2=nil;
+(n1=(1));
+(function(){while((function(){(t1=smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){return smalltalk.send(n1, "_benchmark", []);})]));return ((($receiver = t1).klass === smalltalk.Number) ? $receiver <(1000) : smalltalk.send($receiver, "__lt", [(1000)]));})()) {(function(){return (n1=((($receiver = n1).klass === smalltalk.Number) ? $receiver *(2) : smalltalk.send($receiver, "__star", [(2)])));})()}})();
+(n2=(16));
+(function(){while((function(){(t2=smalltalk.send((smalltalk.Date || Date), "_millisecondsToRun_", [(function(){return (r=smalltalk.send(n2, "_benchFib", []));})]));return ((($receiver = t2).klass === smalltalk.Number) ? $receiver <(1000) : smalltalk.send($receiver, "__lt", [(1000)]));})()) {(function(){return (n2=((($receiver = n2).klass === smalltalk.Number) ? $receiver +(1) : smalltalk.send($receiver, "__plus", [(1)])));})()}})();
+return smalltalk.send(smalltalk.send(smalltalk.send(smalltalk.send(((($receiver = ((($receiver = ((($receiver = n1).klass === smalltalk.Number) ? $receiver *(500000) : smalltalk.send($receiver, "__star", [(500000)]))).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)]))).klass === smalltalk.Number) ? $receiver /t1 : smalltalk.send($receiver, "__slash", [t1])), "_printString", []), "__comma", [unescape("%20bytecodes/sec%3B%20")]), "__comma", [smalltalk.send(((($receiver = ((($receiver = r).klass === smalltalk.Number) ? $receiver *(1000) : smalltalk.send($receiver, "__star", [(1000)]))).klass === smalltalk.Number) ? $receiver /t2 : smalltalk.send($receiver, "__slash", [t2])), "_printString", [])]), "__comma", [unescape("%20sends/sec")]);
+return self;},
+args: [],
+source: unescape('tinyBenchmarks%20%0A%09%22Report%20the%20results%20of%20running%20the%20two%20tiny%20Squeak%20benchmarks.%0A%09ar%209/10/1999%3A%20Adjusted%20to%20run%20at%20least%201%20sec%20to%20get%20more%20stable%20results%22%0A%09%220%20tinyBenchmarks%22%0A%09%22On%20a%20292%20MHz%20G3%20Mac%3A%2022727272%20bytecodes/sec%3B%20984169%20sends/sec%22%0A%09%22On%20a%20400%20MHz%20PII/Win98%3A%20%2018028169%20bytecodes/sec%3B%201081272%20sends/sec%22%0A%09%7C%20t1%20t2%20r%20n1%20n2%20%7C%0A%09n1%20%3A%3D%201.%0A%09%5Bt1%20%3A%3D%20Date%20millisecondsToRun%3A%20%5Bn1%20benchmark%5D.%0A%09t1%20%3C%201000%5D%20whileTrue%3A%5Bn1%20%3A%3D%20n1%20*%202%5D.%20%22Note%3A%20%23benchmark%27s%20runtime%20is%20about%20O%28n%29%22%0A%0A%09n2%20%3A%3D%2016.%0A%09%5Bt2%20%3A%3D%20Date%20millisecondsToRun%3A%20%5Br%20%3A%3D%20n2%20benchFib%5D.%0A%09t2%20%3C%201000%5D%20whileTrue%3A%5Bn2%20%3A%3D%20n2%20+%201%5D.%20%0A%09%22Note%3A%20%23benchFib%27s%20runtime%20is%20about%20O%28k%5En%29%2C%0A%09%09where%20k%20is%20the%20golden%20number%20%3D%20%281%20+%205%20sqrt%29%20/%202%20%3D%201.618....%22%0A%0A%09%5E%20%28%28n1%20*%20500000%20*%201000%29%20/%20t1%29%20printString%2C%20%27%20bytecodes/sec%3B%20%27%2C%0A%09%20%20%28%28r%20*%201000%29%20/%20t2%29%20printString%2C%20%27%20sends/sec%27'),
+messageSends: ["whileTrue:", "millisecondsToRun:", "benchmark", unescape("%3C"), unescape("*"), "benchFib", unescape("+"), unescape("%2C"), "printString", unescape("/")],
+referencedClasses: ["Date"]
+}),
+smalltalk.Number);
+

+ 18 - 18
js/Canvas.deploy.js

@@ -2136,6 +2136,17 @@ smalltalk.Widget);
 
 
 
 
 
 
+smalltalk.addMethod(
+unescape('_appendToBrush_'),
+smalltalk.method({
+selector: unescape('appendToBrush%3A'),
+fn: function (aTagBrush){
+var self=this;
+smalltalk.send(aTagBrush, "_append_", [smalltalk.send(self, "_asString", [])]);
+return self;}
+}),
+smalltalk.Object);
+
 smalltalk.addMethod(
 smalltalk.addMethod(
 unescape('_appendToJQuery_'),
 unescape('_appendToJQuery_'),
 smalltalk.method({
 smalltalk.method({
@@ -2153,10 +2164,10 @@ smalltalk.method({
 selector: unescape('appendToBrush%3A'),
 selector: unescape('appendToBrush%3A'),
 fn: function (aTagBrush){
 fn: function (aTagBrush){
 var self=this;
 var self=this;
-smalltalk.send(aTagBrush, "_append_", [smalltalk.send(self, "_asString", [])]);
+smalltalk.send(aTagBrush, "_appendBlock_", [self]);
 return self;}
 return self;}
 }),
 }),
-smalltalk.Object);
+smalltalk.BlockClosure);
 
 
 smalltalk.addMethod(
 smalltalk.addMethod(
 unescape('_appendToJQuery_'),
 unescape('_appendToJQuery_'),
@@ -2175,18 +2186,7 @@ smalltalk.method({
 selector: unescape('appendToBrush%3A'),
 selector: unescape('appendToBrush%3A'),
 fn: function (aTagBrush){
 fn: function (aTagBrush){
 var self=this;
 var self=this;
-smalltalk.send(aTagBrush, "_appendBlock_", [self]);
-return self;}
-}),
-smalltalk.BlockClosure);
-
-smalltalk.addMethod(
-unescape('_asJQuery'),
-smalltalk.method({
-selector: unescape('asJQuery'),
-fn: function (){
-var self=this;
-return jQuery(String(self));
+smalltalk.send(aTagBrush, "_appendString_", [self]);
 return self;}
 return self;}
 }),
 }),
 smalltalk.String);
 smalltalk.String);
@@ -2203,12 +2203,12 @@ return self;}
 smalltalk.String);
 smalltalk.String);
 
 
 smalltalk.addMethod(
 smalltalk.addMethod(
-unescape('_appendToBrush_'),
+unescape('_asJQuery'),
 smalltalk.method({
 smalltalk.method({
-selector: unescape('appendToBrush%3A'),
-fn: function (aTagBrush){
+selector: unescape('asJQuery'),
+fn: function (){
 var self=this;
 var self=this;
-smalltalk.send(aTagBrush, "_appendString_", [self]);
+return jQuery(String(self));
 return self;}
 return self;}
 }),
 }),
 smalltalk.String);
 smalltalk.String);

+ 30 - 30
js/Canvas.js

@@ -3097,6 +3097,22 @@ smalltalk.Widget);
 
 
 
 
 
 
+smalltalk.addMethod(
+unescape('_appendToBrush_'),
+smalltalk.method({
+selector: unescape('appendToBrush%3A'),
+category: '*Canvas',
+fn: function (aTagBrush){
+var self=this;
+smalltalk.send(aTagBrush, "_append_", [smalltalk.send(self, "_asString", [])]);
+return self;},
+args: ["aTagBrush"],
+source: unescape('appendToBrush%3A%20aTagBrush%0A%20%20%20%20aTagBrush%20append%3A%20self%20asString'),
+messageSends: ["append:", "asString"],
+referencedClasses: []
+}),
+smalltalk.Object);
+
 smalltalk.addMethod(
 smalltalk.addMethod(
 unescape('_appendToJQuery_'),
 unescape('_appendToJQuery_'),
 smalltalk.method({
 smalltalk.method({
@@ -3120,14 +3136,14 @@ selector: unescape('appendToBrush%3A'),
 category: '*Canvas',
 category: '*Canvas',
 fn: function (aTagBrush){
 fn: function (aTagBrush){
 var self=this;
 var self=this;
-smalltalk.send(aTagBrush, "_append_", [smalltalk.send(self, "_asString", [])]);
+smalltalk.send(aTagBrush, "_appendBlock_", [self]);
 return self;},
 return self;},
 args: ["aTagBrush"],
 args: ["aTagBrush"],
-source: unescape('appendToBrush%3A%20aTagBrush%0A%20%20%20%20aTagBrush%20append%3A%20self%20asString'),
-messageSends: ["append:", "asString"],
+source: unescape('appendToBrush%3A%20aTagBrush%0A%20%20%20%20aTagBrush%20appendBlock%3A%20self'),
+messageSends: ["appendBlock:"],
 referencedClasses: []
 referencedClasses: []
 }),
 }),
-smalltalk.Object);
+smalltalk.BlockClosure);
 
 
 smalltalk.addMethod(
 smalltalk.addMethod(
 unescape('_appendToJQuery_'),
 unescape('_appendToJQuery_'),
@@ -3152,27 +3168,11 @@ selector: unescape('appendToBrush%3A'),
 category: '*Canvas',
 category: '*Canvas',
 fn: function (aTagBrush){
 fn: function (aTagBrush){
 var self=this;
 var self=this;
-smalltalk.send(aTagBrush, "_appendBlock_", [self]);
+smalltalk.send(aTagBrush, "_appendString_", [self]);
 return self;},
 return self;},
 args: ["aTagBrush"],
 args: ["aTagBrush"],
-source: unescape('appendToBrush%3A%20aTagBrush%0A%20%20%20%20aTagBrush%20appendBlock%3A%20self'),
-messageSends: ["appendBlock:"],
-referencedClasses: []
-}),
-smalltalk.BlockClosure);
-
-smalltalk.addMethod(
-unescape('_asJQuery'),
-smalltalk.method({
-selector: unescape('asJQuery'),
-category: '*Canvas',
-fn: function (){
-var self=this;
-return jQuery(String(self));
-return self;},
-args: [],
-source: unescape('asJQuery%0A%20%20%20%20%3Creturn%20jQuery%28String%28self%29%29%3E'),
-messageSends: [],
+source: unescape('appendToBrush%3A%20aTagBrush%0A%20%20%20%20aTagBrush%20appendString%3A%20self'),
+messageSends: ["appendString:"],
 referencedClasses: []
 referencedClasses: []
 }),
 }),
 smalltalk.String);
 smalltalk.String);
@@ -3194,17 +3194,17 @@ referencedClasses: []
 smalltalk.String);
 smalltalk.String);
 
 
 smalltalk.addMethod(
 smalltalk.addMethod(
-unescape('_appendToBrush_'),
+unescape('_asJQuery'),
 smalltalk.method({
 smalltalk.method({
-selector: unescape('appendToBrush%3A'),
+selector: unescape('asJQuery'),
 category: '*Canvas',
 category: '*Canvas',
-fn: function (aTagBrush){
+fn: function (){
 var self=this;
 var self=this;
-smalltalk.send(aTagBrush, "_appendString_", [self]);
+return jQuery(String(self));
 return self;},
 return self;},
-args: ["aTagBrush"],
-source: unescape('appendToBrush%3A%20aTagBrush%0A%20%20%20%20aTagBrush%20appendString%3A%20self'),
-messageSends: ["appendString:"],
+args: [],
+source: unescape('asJQuery%0A%20%20%20%20%3Creturn%20jQuery%28String%28self%29%29%3E'),
+messageSends: [],
 referencedClasses: []
 referencedClasses: []
 }),
 }),
 smalltalk.String);
 smalltalk.String);

+ 1 - 1
st/Benchfib.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Benchfib' properties: #{}!
 Smalltalk current createPackage: 'Benchfib' properties: #{}!
 Object subclass: #Benchfib
 Object subclass: #Benchfib
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Benchfib'!
+	package: 'Benchfib'!
 
 
 !Benchfib class methodsFor: 'not yet classified'!
 !Benchfib class methodsFor: 'not yet classified'!
 
 

+ 4 - 4
st/Canvas.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Canvas' properties: #{}!
 Smalltalk current createPackage: 'Canvas' properties: #{}!
 Object subclass: #HTMLCanvas
 Object subclass: #HTMLCanvas
 	instanceVariableNames: 'root'
 	instanceVariableNames: 'root'
-	category: 'Canvas'!
+	package: 'Canvas'!
 
 
 !HTMLCanvas methodsFor: 'accessing'!
 !HTMLCanvas methodsFor: 'accessing'!
 
 
@@ -491,7 +491,7 @@ onJQuery: aJQuery
 
 
 Object subclass: #TagBrush
 Object subclass: #TagBrush
 	instanceVariableNames: 'canvas element'
 	instanceVariableNames: 'canvas element'
-	category: 'Canvas'!
+	package: 'Canvas'!
 
 
 !TagBrush methodsFor: 'accessing'!
 !TagBrush methodsFor: 'accessing'!
 
 
@@ -806,7 +806,7 @@ fromString: aString canvas: aCanvas
 
 
 TagBrush subclass: #StyleTag
 TagBrush subclass: #StyleTag
 	instanceVariableNames: 'canvas element'
 	instanceVariableNames: 'canvas element'
-	category: 'Canvas'!
+	package: 'Canvas'!
 !StyleTag commentStamp!
 !StyleTag commentStamp!
 I'm a <style> tag use to inline CSS or load a stylesheet.
 I'm a <style> tag use to inline CSS or load a stylesheet.
 
 
@@ -830,7 +830,7 @@ canvas: aCanvas
 
 
 Object subclass: #Widget
 Object subclass: #Widget
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Canvas'!
+	package: 'Canvas'!
 
 
 !Widget methodsFor: 'adding'!
 !Widget methodsFor: 'adding'!
 
 

+ 1 - 1
st/Examples.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Examples' properties: #{}!
 Smalltalk current createPackage: 'Examples' properties: #{}!
 Widget subclass: #Counter
 Widget subclass: #Counter
 	instanceVariableNames: 'count header'
 	instanceVariableNames: 'count header'
-	category: 'Examples'!
+	package: 'Examples'!
 
 
 !Counter methodsFor: 'actions'!
 !Counter methodsFor: 'actions'!
 
 

+ 14 - 14
st/IDE.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'IDE' properties: #{}!
 Smalltalk current createPackage: 'IDE' properties: #{}!
 Widget subclass: #ClassesList
 Widget subclass: #ClassesList
 	instanceVariableNames: 'browser ul nodes'
 	instanceVariableNames: 'browser ul nodes'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !ClassesList methodsFor: 'accessing'!
 !ClassesList methodsFor: 'accessing'!
 
 
@@ -64,7 +64,7 @@ on: aBrowser
 
 
 Widget subclass: #ClassesListNode
 Widget subclass: #ClassesListNode
 	instanceVariableNames: 'browser theClass level nodes'
 	instanceVariableNames: 'browser theClass level nodes'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !ClassesListNode methodsFor: ''!
 !ClassesListNode methodsFor: ''!
 
 
@@ -161,7 +161,7 @@ on: aClass browser: aBrowser classes: aCollection level: anInteger
 
 
 ErrorHandler subclass: #DebugErrorHandler
 ErrorHandler subclass: #DebugErrorHandler
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !DebugErrorHandler methodsFor: 'error handling'!
 !DebugErrorHandler methodsFor: 'error handling'!
 
 
@@ -180,7 +180,7 @@ initialize
 
 
 Widget subclass: #SourceArea
 Widget subclass: #SourceArea
 	instanceVariableNames: 'editor div receiver onDoIt'
 	instanceVariableNames: 'editor div receiver onDoIt'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !SourceArea methodsFor: 'accessing'!
 !SourceArea methodsFor: 'accessing'!
 
 
@@ -340,7 +340,7 @@ renderOn: html
 
 
 Widget subclass: #TabManager
 Widget subclass: #TabManager
 	instanceVariableNames: 'selectedTab tabs opened ul input'
 	instanceVariableNames: 'selectedTab tabs opened ul input'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !TabManager methodsFor: 'accessing'!
 !TabManager methodsFor: 'accessing'!
 
 
@@ -545,7 +545,7 @@ new
 
 
 Widget subclass: #TabWidget
 Widget subclass: #TabWidget
 	instanceVariableNames: 'div'
 	instanceVariableNames: 'div'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !TabWidget methodsFor: 'accessing'!
 !TabWidget methodsFor: 'accessing'!
 
 
@@ -619,7 +619,7 @@ open
 
 
 TabWidget subclass: #Browser
 TabWidget subclass: #Browser
 	instanceVariableNames: 'selectedPackage selectedClass selectedProtocol selectedMethod packagesList classesList protocolsList methodsList sourceArea tabsList selectedTab saveButton classButtons methodButtons unsavedChanges'
 	instanceVariableNames: 'selectedPackage selectedClass selectedProtocol selectedMethod packagesList classesList protocolsList methodsList sourceArea tabsList selectedTab saveButton classButtons methodButtons unsavedChanges'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !Browser methodsFor: 'accessing'!
 !Browser methodsFor: 'accessing'!
 
 
@@ -1306,7 +1306,7 @@ openOn: aClass
 
 
 TabWidget subclass: #Debugger
 TabWidget subclass: #Debugger
 	instanceVariableNames: 'error selectedContext sourceArea ul ul2 inspector saveButton unsavedChanges selectedVariable selectedVariableName inspectButton'
 	instanceVariableNames: 'error selectedContext sourceArea ul ul2 inspector saveButton unsavedChanges selectedVariable selectedVariableName inspectButton'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !Debugger methodsFor: 'accessing'!
 !Debugger methodsFor: 'accessing'!
 
 
@@ -1519,7 +1519,7 @@ updateVariablesList
 
 
 TabWidget subclass: #IDETranscript
 TabWidget subclass: #IDETranscript
 	instanceVariableNames: 'textarea'
 	instanceVariableNames: 'textarea'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !IDETranscript methodsFor: 'accessing'!
 !IDETranscript methodsFor: 'accessing'!
 
 
@@ -1589,7 +1589,7 @@ open
 
 
 TabWidget subclass: #Inspector
 TabWidget subclass: #Inspector
 	instanceVariableNames: 'label variables object selectedVariable variablesList valueTextarea diveButton sourceArea'
 	instanceVariableNames: 'label variables object selectedVariable variablesList valueTextarea diveButton sourceArea'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !Inspector methodsFor: 'accessing'!
 !Inspector methodsFor: 'accessing'!
 
 
@@ -1742,7 +1742,7 @@ on: anObject
 
 
 TabWidget subclass: #ProgressBar
 TabWidget subclass: #ProgressBar
 	instanceVariableNames: 'percent progressDiv div'
 	instanceVariableNames: 'percent progressDiv div'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !ProgressBar methodsFor: 'accessing'!
 !ProgressBar methodsFor: 'accessing'!
 
 
@@ -1779,7 +1779,7 @@ updatePercent: aNumber
 
 
 TabWidget subclass: #ReferencesBrowser
 TabWidget subclass: #ReferencesBrowser
 	instanceVariableNames: 'implementors senders implementorsList input timer selector sendersList referencedClasses referencedClassesList'
 	instanceVariableNames: 'implementors senders implementorsList input timer selector sendersList referencedClasses referencedClassesList'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !ReferencesBrowser methodsFor: 'accessing'!
 !ReferencesBrowser methodsFor: 'accessing'!
 
 
@@ -1955,7 +1955,7 @@ search: aString
 
 
 TabWidget subclass: #TestRunner
 TabWidget subclass: #TestRunner
 	instanceVariableNames: 'selectedCategories packagesList selectedClasses classesList selectedMethods progressBar methodsList result statusDiv'
 	instanceVariableNames: 'selectedCategories packagesList selectedClasses classesList selectedMethods progressBar methodsList result statusDiv'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !TestRunner methodsFor: 'accessing'!
 !TestRunner methodsFor: 'accessing'!
 
 
@@ -2195,7 +2195,7 @@ updateStatusDiv
 
 
 TabWidget subclass: #Workspace
 TabWidget subclass: #Workspace
 	instanceVariableNames: 'sourceArea'
 	instanceVariableNames: 'sourceArea'
-	category: 'IDE'!
+	package: 'IDE'!
 
 
 !Workspace methodsFor: 'accessing'!
 !Workspace methodsFor: 'accessing'!
 
 

+ 2 - 2
st/Kernel-Announcements.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Kernel-Announcements' properties: #{}!
 Smalltalk current createPackage: 'Kernel-Announcements' properties: #{}!
 Object subclass: #AnnouncementSubscription
 Object subclass: #AnnouncementSubscription
 	instanceVariableNames: 'block announcementClass'
 	instanceVariableNames: 'block announcementClass'
-	category: 'Kernel-Announcements'!
+	package: 'Kernel-Announcements'!
 
 
 !AnnouncementSubscription methodsFor: 'accessing'!
 !AnnouncementSubscription methodsFor: 'accessing'!
 
 
@@ -34,7 +34,7 @@ handlesAnnouncement: anAnnouncement
 
 
 Object subclass: #Announcer
 Object subclass: #Announcer
 	instanceVariableNames: 'registry subscriptions'
 	instanceVariableNames: 'registry subscriptions'
-	category: 'Kernel-Announcements'!
+	package: 'Kernel-Announcements'!
 
 
 !Announcer methodsFor: 'announcing'!
 !Announcer methodsFor: 'announcing'!
 
 

+ 6 - 6
st/Kernel-Classes.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Kernel-Classes' properties: #{}!
 Smalltalk current createPackage: 'Kernel-Classes' properties: #{}!
 Object subclass: #Behavior
 Object subclass: #Behavior
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Classes'!
+	package: 'Kernel-Classes'!
 !Behavior commentStamp!
 !Behavior commentStamp!
 Behavior is the superclass of all class objects. 
 Behavior is the superclass of all class objects. 
 
 
@@ -160,7 +160,7 @@ inheritsFrom: aClass
 
 
 Behavior subclass: #Class
 Behavior subclass: #Class
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Classes'!
+	package: 'Kernel-Classes'!
 !Class commentStamp!
 !Class commentStamp!
 Class is __the__ class object. 
 Class is __the__ class object. 
 
 
@@ -226,7 +226,7 @@ isClass
 
 
 Behavior subclass: #Metaclass
 Behavior subclass: #Metaclass
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Classes'!
+	package: 'Kernel-Classes'!
 !Metaclass commentStamp!
 !Metaclass commentStamp!
 Metaclass is the root of the class hierarchy.
 Metaclass is the root of the class hierarchy.
 
 
@@ -258,7 +258,7 @@ isMetaclass
 
 
 Object subclass: #ClassBuilder
 Object subclass: #ClassBuilder
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Classes'!
+	package: 'Kernel-Classes'!
 !ClassBuilder commentStamp!
 !ClassBuilder commentStamp!
 ClassBuilder is responsible for compiling new classes or modifying existing classes in the system.
 ClassBuilder is responsible for compiling new classes or modifying existing classes in the system.
 
 
@@ -330,7 +330,7 @@ setupClass: aClass
 
 
 Object subclass: #ClassCategoryReader
 Object subclass: #ClassCategoryReader
 	instanceVariableNames: 'class category chunkParser'
 	instanceVariableNames: 'class category chunkParser'
-	category: 'Kernel-Classes'!
+	package: 'Kernel-Classes'!
 !ClassCategoryReader commentStamp!
 !ClassCategoryReader commentStamp!
 ClassCategoryReader represents a mechanism for retrieving class descriptions stored on a file.!
 ClassCategoryReader represents a mechanism for retrieving class descriptions stored on a file.!
 
 
@@ -369,7 +369,7 @@ compileMethod: aString
 
 
 Object subclass: #ClassCommentReader
 Object subclass: #ClassCommentReader
 	instanceVariableNames: 'class chunkParser'
 	instanceVariableNames: 'class chunkParser'
-	category: 'Kernel-Classes'!
+	package: 'Kernel-Classes'!
 !ClassCommentReader commentStamp!
 !ClassCommentReader commentStamp!
 ClassCommentReader represents a mechanism for retrieving class descriptions stored on a file.
 ClassCommentReader represents a mechanism for retrieving class descriptions stored on a file.
 See `ClassCategoryReader` too.!
 See `ClassCategoryReader` too.!

+ 14 - 14
st/Kernel-Collections.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Kernel-Collections' properties: #{}!
 Smalltalk current createPackage: 'Kernel-Collections' properties: #{}!
 Object subclass: #Association
 Object subclass: #Association
 	instanceVariableNames: 'key value'
 	instanceVariableNames: 'key value'
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !Association methodsFor: 'accessing'!
 !Association methodsFor: 'accessing'!
 
 
@@ -50,7 +50,7 @@ key: aKey value: aValue
 
 
 Object subclass: #Collection
 Object subclass: #Collection
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !Collection methodsFor: 'accessing'!
 !Collection methodsFor: 'accessing'!
 
 
@@ -272,7 +272,7 @@ withAll: aCollection
 
 
 Collection subclass: #HashedCollection
 Collection subclass: #HashedCollection
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 !HashedCollection commentStamp!
 !HashedCollection commentStamp!
 A HashedCollection is a traditional JavaScript object, or a Smalltalk Dictionary.
 A HashedCollection is a traditional JavaScript object, or a Smalltalk Dictionary.
 
 
@@ -491,7 +491,7 @@ fromPairs: aCollection
 
 
 HashedCollection subclass: #Dictionary
 HashedCollection subclass: #Dictionary
 	instanceVariableNames: 'keys values'
 	instanceVariableNames: 'keys values'
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !Dictionary methodsFor: 'accessing'!
 !Dictionary methodsFor: 'accessing'!
 
 
@@ -572,7 +572,7 @@ includesKey: aKey
 
 
 Collection subclass: #SequenceableCollection
 Collection subclass: #SequenceableCollection
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !SequenceableCollection methodsFor: 'accessing'!
 !SequenceableCollection methodsFor: 'accessing'!
 
 
@@ -731,7 +731,7 @@ printString
 
 
 SequenceableCollection subclass: #Array
 SequenceableCollection subclass: #Array
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !Array methodsFor: 'accessing'!
 !Array methodsFor: 'accessing'!
 
 
@@ -848,7 +848,7 @@ withAll: aCollection
 
 
 SequenceableCollection subclass: #Array
 SequenceableCollection subclass: #Array
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !Array methodsFor: 'accessing'!
 !Array methodsFor: 'accessing'!
 
 
@@ -965,7 +965,7 @@ withAll: aCollection
 
 
 SequenceableCollection subclass: #CharacterArray
 SequenceableCollection subclass: #CharacterArray
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !CharacterArray methodsFor: 'accessing'!
 !CharacterArray methodsFor: 'accessing'!
 
 
@@ -1031,7 +1031,7 @@ fromString: aString
 
 
 CharacterArray subclass: #String
 CharacterArray subclass: #String
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !String methodsFor: 'accessing'!
 !String methodsFor: 'accessing'!
 
 
@@ -1339,7 +1339,7 @@ value: aUTFCharCode
 
 
 CharacterArray subclass: #Symbol
 CharacterArray subclass: #Symbol
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !Symbol methodsFor: 'accessing'!
 !Symbol methodsFor: 'accessing'!
 
 
@@ -1436,7 +1436,7 @@ lookup: aString
 
 
 Collection subclass: #Set
 Collection subclass: #Set
 	instanceVariableNames: 'elements'
 	instanceVariableNames: 'elements'
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !Set methodsFor: 'accessing'!
 !Set methodsFor: 'accessing'!
 
 
@@ -1510,7 +1510,7 @@ includes: anObject
 
 
 Object subclass: #RegularExpression
 Object subclass: #RegularExpression
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !RegularExpression methodsFor: 'evaluating'!
 !RegularExpression methodsFor: 'evaluating'!
 
 
@@ -1538,7 +1538,7 @@ fromString: aString flag: anotherString
 
 
 Object subclass: #Stream
 Object subclass: #Stream
 	instanceVariableNames: 'collection position streamSize'
 	instanceVariableNames: 'collection position streamSize'
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !Stream methodsFor: 'accessing'!
 !Stream methodsFor: 'accessing'!
 
 
@@ -1671,7 +1671,7 @@ on: aCollection
 
 
 Stream subclass: #StringStream
 Stream subclass: #StringStream
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Collections'!
+	package: 'Kernel-Collections'!
 
 
 !StringStream methodsFor: 'reading'!
 !StringStream methodsFor: 'reading'!
 
 

+ 3 - 3
st/Kernel-Exceptions.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Kernel-Exceptions' properties: #{}!
 Smalltalk current createPackage: 'Kernel-Exceptions' properties: #{}!
 Object subclass: #Error
 Object subclass: #Error
 	instanceVariableNames: 'messageText'
 	instanceVariableNames: 'messageText'
-	category: 'Kernel-Exceptions'!
+	package: 'Kernel-Exceptions'!
 
 
 !Error methodsFor: 'accessing'!
 !Error methodsFor: 'accessing'!
 
 
@@ -43,7 +43,7 @@ signal: aString
 
 
 Error subclass: #MessageNotUnderstood
 Error subclass: #MessageNotUnderstood
 	instanceVariableNames: 'message receiver'
 	instanceVariableNames: 'message receiver'
-	category: 'Kernel-Exceptions'!
+	package: 'Kernel-Exceptions'!
 
 
 !MessageNotUnderstood methodsFor: 'accessing'!
 !MessageNotUnderstood methodsFor: 'accessing'!
 
 
@@ -69,7 +69,7 @@ receiver: anObject
 
 
 Object subclass: #ErrorHandler
 Object subclass: #ErrorHandler
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Exceptions'!
+	package: 'Kernel-Exceptions'!
 
 
 !ErrorHandler methodsFor: 'error handling'!
 !ErrorHandler methodsFor: 'error handling'!
 
 

+ 4 - 4
st/Kernel-Methods.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Kernel-Methods' properties: #{}!
 Smalltalk current createPackage: 'Kernel-Methods' properties: #{}!
 Object subclass: #BlockClosure
 Object subclass: #BlockClosure
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Methods'!
+	package: 'Kernel-Methods'!
 !BlockClosure commentStamp!
 !BlockClosure commentStamp!
 A BlockClosure is a lexical closure.
 A BlockClosure is a lexical closure.
 The JavaScript representation is a function.
 The JavaScript representation is a function.
@@ -131,7 +131,7 @@ valueWithTimeout: aNumber
 
 
 Object subclass: #CompiledMethod
 Object subclass: #CompiledMethod
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Methods'!
+	package: 'Kernel-Methods'!
 !CompiledMethod commentStamp!
 !CompiledMethod commentStamp!
 CompiledMethod hold the source and compiled code of a class method.
 CompiledMethod hold the source and compiled code of a class method.
 
 
@@ -203,7 +203,7 @@ source: aString
 
 
 Object subclass: #Message
 Object subclass: #Message
 	instanceVariableNames: 'selector arguments'
 	instanceVariableNames: 'selector arguments'
-	category: 'Kernel-Methods'!
+	package: 'Kernel-Methods'!
 !Message commentStamp!
 !Message commentStamp!
 Generally, the system does not use instances of Message for efficiency reasons.
 Generally, the system does not use instances of Message for efficiency reasons.
 However, when a message is not understood by its receiver, the interpreter will make up an instance of it in order to capture the information involved in an actual message transmission. 
 However, when a message is not understood by its receiver, the interpreter will make up an instance of it in order to capture the information involved in an actual message transmission. 
@@ -255,7 +255,7 @@ selector: aString arguments: anArray
 
 
 Object subclass: #MethodContext
 Object subclass: #MethodContext
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Methods'!
+	package: 'Kernel-Methods'!
 !MethodContext commentStamp!
 !MethodContext commentStamp!
 MethodContext holds all the dynamic state associated with the execution of either a method activation resulting from a message send. That is used to build the call stack while debugging.
 MethodContext holds all the dynamic state associated with the execution of either a method activation resulting from a message send. That is used to build the call stack while debugging.
   
   

+ 11 - 11
st/Kernel-Objects.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Kernel-Objects' properties: #{}!
 Smalltalk current createPackage: 'Kernel-Objects' properties: #{}!
 nil subclass: #Object
 nil subclass: #Object
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !Object commentStamp!
 !Object commentStamp!
 *Object is the root of the Smalltalk class system*. All classes in the system are subclasses of Object.
 *Object is the root of the Smalltalk class system*. All classes in the system are subclasses of Object.
 
 
@@ -318,7 +318,7 @@ initialize
 
 
 Object subclass: #Boolean
 Object subclass: #Boolean
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !Boolean commentStamp!
 !Boolean commentStamp!
 Boolean wraps the JavaScript `Boolean()` constructor. The `true` and `false` objects are the JavaScript boolean objects.
 Boolean wraps the JavaScript `Boolean()` constructor. The `true` and `false` objects are the JavaScript boolean objects.
 
 
@@ -420,7 +420,7 @@ printString
 
 
 Object subclass: #Date
 Object subclass: #Date
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !Date commentStamp!
 !Date commentStamp!
 The Date class is used to work with dates and times. Therefore `Date today` and `Date now` are both valid in
 The Date class is used to work with dates and times. Therefore `Date today` and `Date now` are both valid in
 Amber and answer the same date object.
 Amber and answer the same date object.
@@ -605,7 +605,7 @@ today
 
 
 Object subclass: #Date
 Object subclass: #Date
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !Date commentStamp!
 !Date commentStamp!
 The Date class is used to work with dates and times. Therefore `Date today` and `Date now` are both valid in
 The Date class is used to work with dates and times. Therefore `Date today` and `Date now` are both valid in
 Amber and answer the same date object.
 Amber and answer the same date object.
@@ -790,7 +790,7 @@ today
 
 
 Object subclass: #JSObjectProxy
 Object subclass: #JSObjectProxy
 	instanceVariableNames: 'jsObject'
 	instanceVariableNames: 'jsObject'
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !JSObjectProxy commentStamp!
 !JSObjectProxy commentStamp!
 JSObjectProxy handles sending messages to JavaScript object, therefore accessing JavaScript objects from Amber is transparent.
 JSObjectProxy handles sending messages to JavaScript object, therefore accessing JavaScript objects from Amber is transparent.
 JSOjbectProxy makes intensive use of `#doesNotUnderstand:`.
 JSOjbectProxy makes intensive use of `#doesNotUnderstand:`.
@@ -873,7 +873,7 @@ on: aJSObject
 
 
 Object subclass: #Number
 Object subclass: #Number
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !Number commentStamp!
 !Number commentStamp!
 Number holds the most general methods for dealing with numbers.  
 Number holds the most general methods for dealing with numbers.  
 Number is directly mapped to JavaScript Number.
 Number is directly mapped to JavaScript Number.
@@ -1141,7 +1141,7 @@ pi
 
 
 Object subclass: #Package
 Object subclass: #Package
 	instanceVariableNames: 'commitPathJs commitPathSt'
 	instanceVariableNames: 'commitPathJs commitPathSt'
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !Package commentStamp!
 !Package commentStamp!
 A Package is similar to a "class category" typically found in other Smalltalks like Pharo or Squeak. Amber does not have class categories anymore, it had in the beginning but now each class in the system knows which package it belongs to.
 A Package is similar to a "class category" typically found in other Smalltalks like Pharo or Squeak. Amber does not have class categories anymore, it had in the beginning but now each class in the system knows which package it belongs to.
 
 
@@ -1344,7 +1344,7 @@ sortedClasses: classes
 
 
 Object subclass: #Point
 Object subclass: #Point
 	instanceVariableNames: 'x y'
 	instanceVariableNames: 'x y'
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !Point commentStamp!
 !Point commentStamp!
 A `Point` represents an x-y pair of numbers usually designating a geometric coordinate.
 A `Point` represents an x-y pair of numbers usually designating a geometric coordinate.
 Points are traditionally created using the binary `#@` message to a number:
 Points are traditionally created using the binary `#@` message to a number:
@@ -1444,7 +1444,7 @@ x: aNumber y: anotherNumber
 
 
 Object subclass: #Random
 Object subclass: #Random
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !Random commentStamp!
 !Random commentStamp!
 `Random` is a random number generator and is implemented as a trivial wrapper around javascript `Math.random()` and is used like this:
 `Random` is a random number generator and is implemented as a trivial wrapper around javascript `Math.random()` and is used like this:
 
 
@@ -1484,7 +1484,7 @@ next: anInteger
 
 
 Object subclass: #Smalltalk
 Object subclass: #Smalltalk
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !Smalltalk commentStamp!
 !Smalltalk commentStamp!
 Smalltalk has only one instance, accessed with `Smalltalk current`. 
 Smalltalk has only one instance, accessed with `Smalltalk current`. 
 It represents the global JavaScript variable `smalltalk` declared in `js/boot.js`.
 It represents the global JavaScript variable `smalltalk` declared in `js/boot.js`.
@@ -1646,7 +1646,7 @@ current
 
 
 Object subclass: #UndefinedObject
 Object subclass: #UndefinedObject
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Objects'!
+	package: 'Kernel-Objects'!
 !UndefinedObject commentStamp!
 !UndefinedObject commentStamp!
 UndefinedObject describes the behavior of its sole instance, `nil`. `nil` represents a prior value for variables that have not been initialized, or for results which are meaningless.
 UndefinedObject describes the behavior of its sole instance, `nil`. `nil` represents a prior value for variables that have not been initialized, or for results which are meaningless.
 
 

+ 17 - 17
st/Kernel-Tests.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Kernel-Tests' properties: #{}!
 Smalltalk current createPackage: 'Kernel-Tests' properties: #{}!
 TestCase subclass: #ArrayTest
 TestCase subclass: #ArrayTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !ArrayTest methodsFor: 'testing'!
 !ArrayTest methodsFor: 'testing'!
 
 
@@ -15,7 +15,7 @@ testIfEmpty
 
 
 TestCase subclass: #BlockClosureTest
 TestCase subclass: #BlockClosureTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !BlockClosureTest methodsFor: 'tests'!
 !BlockClosureTest methodsFor: 'tests'!
 
 
@@ -76,7 +76,7 @@ testWhileTrue
 
 
 TestCase subclass: #BooleanTest
 TestCase subclass: #BooleanTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !BooleanTest methodsFor: 'tests'!
 !BooleanTest methodsFor: 'tests'!
 
 
@@ -150,7 +150,7 @@ testLogicKeywords
 
 
 TestCase subclass: #ClassBuilderTest
 TestCase subclass: #ClassBuilderTest
 	instanceVariableNames: 'builder theClass'
 	instanceVariableNames: 'builder theClass'
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !ClassBuilderTest methodsFor: 'running'!
 !ClassBuilderTest methodsFor: 'running'!
 
 
@@ -177,7 +177,7 @@ testInstanceVariableNames
 
 
 TestCase subclass: #DictionaryTest
 TestCase subclass: #DictionaryTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !DictionaryTest methodsFor: 'tests'!
 !DictionaryTest methodsFor: 'tests'!
 
 
@@ -267,7 +267,7 @@ testValues
 
 
 TestCase subclass: #JSObjectProxyTest
 TestCase subclass: #JSObjectProxyTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !JSObjectProxyTest methodsFor: 'accessing'!
 !JSObjectProxyTest methodsFor: 'accessing'!
 
 
@@ -324,7 +324,7 @@ testYourself
 
 
 TestCase subclass: #NumberTest
 TestCase subclass: #NumberTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !NumberTest methodsFor: 'tests'!
 !NumberTest methodsFor: 'tests'!
 
 
@@ -466,7 +466,7 @@ testTruncated
 
 
 Object subclass: #ObjectMock
 Object subclass: #ObjectMock
 	instanceVariableNames: 'foo bar'
 	instanceVariableNames: 'foo bar'
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !ObjectMock methodsFor: 'not yet classified'!
 !ObjectMock methodsFor: 'not yet classified'!
 
 
@@ -480,7 +480,7 @@ foo: anObject
 
 
 TestCase subclass: #ObjectTest
 TestCase subclass: #ObjectTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !ObjectTest methodsFor: 'tests'!
 !ObjectTest methodsFor: 'tests'!
 
 
@@ -569,7 +569,7 @@ testidentityHash
 
 
 TestCase subclass: #PackageTest
 TestCase subclass: #PackageTest
 	instanceVariableNames: 'zorkPackage grulPackage backUpCommitPathJs backUpCommitPathSt'
 	instanceVariableNames: 'zorkPackage grulPackage backUpCommitPathJs backUpCommitPathSt'
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !PackageTest methodsFor: 'running'!
 !PackageTest methodsFor: 'running'!
 
 
@@ -613,7 +613,7 @@ testZorkCommitPathStShouldBeSt
 
 
 PackageTest subclass: #PackageWithDefaultCommitPathChangedTest
 PackageTest subclass: #PackageWithDefaultCommitPathChangedTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !PackageWithDefaultCommitPathChangedTest methodsFor: 'running'!
 !PackageWithDefaultCommitPathChangedTest methodsFor: 'running'!
 
 
@@ -651,7 +651,7 @@ shouldInheritSelectors
 
 
 TestCase subclass: #PointTest
 TestCase subclass: #PointTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !PointTest methodsFor: 'tests'!
 !PointTest methodsFor: 'tests'!
 
 
@@ -687,7 +687,7 @@ testTranslateBy
 
 
 TestCase subclass: #RandomTest
 TestCase subclass: #RandomTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !RandomTest methodsFor: 'tests'!
 !RandomTest methodsFor: 'tests'!
 
 
@@ -704,7 +704,7 @@ textNext
 
 
 TestCase subclass: #SetTest
 TestCase subclass: #SetTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !SetTest methodsFor: 'tests'!
 !SetTest methodsFor: 'tests'!
 
 
@@ -751,7 +751,7 @@ testUnicity
 
 
 TestCase subclass: #StringTest
 TestCase subclass: #StringTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !StringTest methodsFor: 'tests'!
 !StringTest methodsFor: 'tests'!
 
 
@@ -816,7 +816,7 @@ testStreamContents
 
 
 TestCase subclass: #SymbolTest
 TestCase subclass: #SymbolTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !SymbolTest methodsFor: 'tests'!
 !SymbolTest methodsFor: 'tests'!
 
 
@@ -891,7 +891,7 @@ testSize
 
 
 TestCase subclass: #UndefinedTest
 TestCase subclass: #UndefinedTest
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'Kernel-Tests'!
+	package: 'Kernel-Tests'!
 
 
 !UndefinedTest methodsFor: 'tests'!
 !UndefinedTest methodsFor: 'tests'!
 
 

+ 2 - 2
st/Kernel-Transcript.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'Kernel-Transcript' properties: #{}!
 Smalltalk current createPackage: 'Kernel-Transcript' properties: #{}!
 Object subclass: #ConsoleTranscript
 Object subclass: #ConsoleTranscript
 	instanceVariableNames: 'textarea'
 	instanceVariableNames: 'textarea'
-	category: 'Kernel-Transcript'!
+	package: 'Kernel-Transcript'!
 
 
 !ConsoleTranscript methodsFor: 'actions'!
 !ConsoleTranscript methodsFor: 'actions'!
 
 
@@ -32,7 +32,7 @@ initialize
 
 
 Object subclass: #Transcript
 Object subclass: #Transcript
 	instanceVariableNames: 'textarea'
 	instanceVariableNames: 'textarea'
-	category: 'Kernel-Transcript'!
+	package: 'Kernel-Transcript'!
 
 
 Transcript class instanceVariableNames: 'current'!
 Transcript class instanceVariableNames: 'current'!
 
 

+ 3 - 3
st/SUnit.st

@@ -1,7 +1,7 @@
 Smalltalk current createPackage: 'SUnit' properties: #{}!
 Smalltalk current createPackage: 'SUnit' properties: #{}!
 Object subclass: #TestCase
 Object subclass: #TestCase
 	instanceVariableNames: 'testSelector'
 	instanceVariableNames: 'testSelector'
-	category: 'SUnit'!
+	package: 'SUnit'!
 
 
 !TestCase methodsFor: 'accessing'!
 !TestCase methodsFor: 'accessing'!
 
 
@@ -106,11 +106,11 @@ shouldInheritSelectors
 
 
 Error subclass: #TestFailure
 Error subclass: #TestFailure
 	instanceVariableNames: ''
 	instanceVariableNames: ''
-	category: 'SUnit'!
+	package: 'SUnit'!
 
 
 Object subclass: #TestResult
 Object subclass: #TestResult
 	instanceVariableNames: 'timestamp runs errors failures total'
 	instanceVariableNames: 'timestamp runs errors failures total'
-	category: 'SUnit'!
+	package: 'SUnit'!
 
 
 !TestResult methodsFor: 'accessing'!
 !TestResult methodsFor: 'accessing'!