Small StringTest reformattings

js/Kernel-Tests.js

@@ -3164,13 +3164,18 @@ fn: function (){
 var self=this;
 var characterA,characterU;
 return smalltalk.withContext(function($ctx1) { 
+var $2,$1,$4,$3;
 characterA="A";
 characterU="U";
-self._assert_equals_(_st(characterA)._asciiValue(),(65));
-self._assert_equals_(_st(characterU)._asciiValue(),(85));
+$2=_st(characterA)._asciiValue();
+$ctx1.sendIdx["asciiValue"]=1;
+$1=self._assert_equals_($2,(65));
+$ctx1.sendIdx["assert:equals:"]=1;
+$4=_st(characterU)._asciiValue();
+$3=self._assert_equals_($4,(85));
 return self}, function($ctx1) {$ctx1.fill(self,"testAsciiValue",{characterA:characterA,characterU:characterU},smalltalk.StringTest)})},
 args: [],
-source: "testAsciiValue\x0a    |characterA characterU|\x0a    characterA := 'A'.\x0a    characterU := 'U'.\x0a    self assert: (characterA asciiValue) equals:65.\x0a    self assert: (characterU asciiValue) equals:85",
+source: "testAsciiValue\x0a    | characterA characterU |\x0a    characterA := 'A'.\x0a    characterU := 'U'.\x0a    self assert: (characterA asciiValue) equals:65.\x0a    self assert: (characterU asciiValue) equals:85",
 messageSends: ["assert:equals:", "asciiValue"],
 referencedClasses: []
 }),
@@ -3262,18 +3267,33 @@ selector: "testCharCodeAt",
 category: 'tests',
 fn: function (){
 var self=this;
-var s;
 return smalltalk.withContext(function($ctx1) { 
-s="jackie";
-self._assert_equals_("jackie"._charCodeAt_((1)),(106));
-self._assert_equals_("jackie"._charCodeAt_((2)),(97));
-self._assert_equals_("jackie"._charCodeAt_((3)),(99));
-self._assert_equals_("jackie"._charCodeAt_((4)),(107));
-self._assert_equals_("jackie"._charCodeAt_((5)),(105));
-self._assert_equals_("jackie"._charCodeAt_((6)),(101));
-return self}, function($ctx1) {$ctx1.fill(self,"testCharCodeAt",{s:s},smalltalk.StringTest)})},
+var $2,$1,$4,$3,$6,$5,$8,$7,$10,$9,$12,$11;
+$2="jackie"._charCodeAt_((1));
+$ctx1.sendIdx["charCodeAt:"]=1;
+$1=self._assert_equals_($2,(106));
+$ctx1.sendIdx["assert:equals:"]=1;
+$4="jackie"._charCodeAt_((2));
+$ctx1.sendIdx["charCodeAt:"]=2;
+$3=self._assert_equals_($4,(97));
+$ctx1.sendIdx["assert:equals:"]=2;
+$6="jackie"._charCodeAt_((3));
+$ctx1.sendIdx["charCodeAt:"]=3;
+$5=self._assert_equals_($6,(99));
+$ctx1.sendIdx["assert:equals:"]=3;
+$8="jackie"._charCodeAt_((4));
+$ctx1.sendIdx["charCodeAt:"]=4;
+$7=self._assert_equals_($8,(107));
+$ctx1.sendIdx["assert:equals:"]=4;
+$10="jackie"._charCodeAt_((5));
+$ctx1.sendIdx["charCodeAt:"]=5;
+$9=self._assert_equals_($10,(105));
+$ctx1.sendIdx["assert:equals:"]=5;
+$12="jackie"._charCodeAt_((6));
+$11=self._assert_equals_($12,(101));
+return self}, function($ctx1) {$ctx1.fill(self,"testCharCodeAt",{},smalltalk.StringTest)})},
 args: [],
-source: "testCharCodeAt\x0a\x09|s|\x0a\x09s := 'jackie'.\x0a\x09self assert: ('jackie' charCodeAt:1) equals: 106.\x0a\x09self assert: ('jackie' charCodeAt:2) equals: 97.\x0a\x09self assert: ('jackie' charCodeAt:3) equals: 99.\x0a\x09self assert: ('jackie' charCodeAt:4) equals: 107.\x0a\x09self assert: ('jackie' charCodeAt:5) equals: 105.\x0a\x09self assert: ('jackie' charCodeAt:6) equals: 101.",
+source: "testCharCodeAt\x0a\x09self assert: ('jackie' charCodeAt:1) equals: 106.\x0a\x09self assert: ('jackie' charCodeAt:2) equals: 97.\x0a\x09self assert: ('jackie' charCodeAt:3) equals: 99.\x0a\x09self assert: ('jackie' charCodeAt:4) equals: 107.\x0a\x09self assert: ('jackie' charCodeAt:5) equals: 105.\x0a\x09self assert: ('jackie' charCodeAt:6) equals: 101",
 messageSends: ["assert:equals:", "charCodeAt:"],
 referencedClasses: []
 }),

st/Kernel-Tests.st

@@ -942,7 +942,7 @@ testAsUpperCase
 !
 
 testAsciiValue
-    |characterA characterU|
+    | characterA characterU |
     characterA := 'A'.
     characterU := 'U'.
     self assert: (characterA asciiValue) equals:65.
@@ -969,14 +969,12 @@ testCapitalized
 !
 
 testCharCodeAt
-	|s|
-	s := 'jackie'.
 	self assert: ('jackie' charCodeAt:1) equals: 106.
 	self assert: ('jackie' charCodeAt:2) equals: 97.
 	self assert: ('jackie' charCodeAt:3) equals: 99.
 	self assert: ('jackie' charCodeAt:4) equals: 107.
 	self assert: ('jackie' charCodeAt:5) equals: 105.
-	self assert: ('jackie' charCodeAt:6) equals: 101.
+	self assert: ('jackie' charCodeAt:6) equals: 101
 !
 
 testCollect