Browse Source

Added failing test case for different issue.

Matthias Springer 10 years ago
parent
commit
4b3faf3ced
3 changed files with 5 additions and 2 deletions
  1. 1 0
      js/Compiler-Tests.deploy.js
  2. 2 1
      js/Compiler-Tests.js
  3. 2 1
      st/Compiler-Tests.st

+ 1 - 0
js/Compiler-Tests.deploy.js

@@ -732,6 +732,7 @@ fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self._assert_equals_(self._interpret_("foo | a | a := 2. ^ a"),(2));
+self._assert_equals_(self._interpret_("foo | a | a := nil. ^ a"),nil);
 return self}, function($ctx1) {$ctx1.fill(self,"testTempAssignment",{},smalltalk.InterpreterTest)})},
 messageSends: ["assert:equals:", "interpret:"]}),
 smalltalk.InterpreterTest);

+ 2 - 1
js/Compiler-Tests.js

@@ -983,9 +983,10 @@ fn: function (){
 var self=this;
 return smalltalk.withContext(function($ctx1) { 
 self._assert_equals_(self._interpret_("foo | a | a := 2. ^ a"),(2));
+self._assert_equals_(self._interpret_("foo | a | a := nil. ^ a"),nil);
 return self}, function($ctx1) {$ctx1.fill(self,"testTempAssignment",{},smalltalk.InterpreterTest)})},
 args: [],
-source: "testTempAssignment\x0a\x09self assert: (self interpret: 'foo | a | a := 2. ^ a') equals: 2",
+source: "testTempAssignment\x0a\x09self assert: (self interpret: 'foo | a | a := 2. ^ a') equals: 2.\x0a\x09self assert: (self interpret: 'foo | a | a := nil. ^ a') equals: nil.",
 messageSends: ["assert:equals:", "interpret:"],
 referencedClasses: []
 }),

+ 2 - 1
st/Compiler-Tests.st

@@ -423,7 +423,8 @@ testSuper
 !
 
 testTempAssignment
-	self assert: (self interpret: 'foo | a | a := 2. ^ a') equals: 2
+	self assert: (self interpret: 'foo | a | a := 2. ^ a') equals: 2.
+	self assert: (self interpret: 'foo | a | a := nil. ^ a') equals: nil.
 !
 
 testThisContext