Mercurial Mercurial > hg > stx-goodies-regression / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
RegressionTests__IntegerTest.st
changeset 2500 5fb412ae3c50
parent 2499 cdd2a98147b9
equal deleted inserted replaced
2499:cdd2a98147b9 2500:5fb412ae3c50 
     1 "{ Encoding: utf8 }"
 
       
     2 
       
     3 "{ Package: 'stx:goodies/regression' }"
 
     1 "{ Package: 'stx:goodies/regression' }"
 
     4 
     2 
     5 "{ NameSpace: RegressionTests }"
 
     3 "{ NameSpace: RegressionTests }"
 
     6 
     4 
     7 TestCase subclass:#IntegerTest
 
     5 TestCase subclass:#IntegerTest
 
  5136     self assert:(1->0) = (Association key:1 value:0).
 
  5134     self assert:(1->0) = (Association key:1 value:0).
 
  5137     self assert:(1->1) = (Association key:1 value:1).
 
  5135     self assert:(1->1) = (Association key:1 value:1).
 
  5138     self assert:(1 ->0) = (Association key:1 value:0).    
  5136     self assert:(1 ->0) = (Association key:1 value:0).    
  5139     self assert:(1 ->1) = (Association key:1 value:1).  
  5137     self assert:(1 ->1) = (Association key:1 value:1).  
  5140 
  5138 
  5141     self assert:(0->-0) = (Association key:0 value:0).
 
  5139     "/ undef behavior 
  5142     self assert:(0->-1) = (Association key:0 value:-1).
 
  5140 "/    self assert:(0->-0) = (Association key:0 value:0).
 
  5143     self assert:(0 ->-0) = (Association key:0 value:0).    
  5141 "/    self assert:(0->-1) = (Association key:0 value:-1).
 
  5144     self assert:(0 ->-1) = (Association key:0 value:-1).
 
  5142 "/    self assert:(0 ->-0) = (Association key:0 value:0).    
  5145 
  5143 "/    self assert:(0 ->-1) = (Association key:0 value:-1).
 
  5146     self assert:(1->-0) = (Association key:1 value:0).
 
  5144 
  5147     self assert:(1->-1) = (Association key:1 value:-1).
 
  5145 "/    self assert:(1->-0) = (Association key:1 value:0).
 
  5148     self assert:(1 ->-0) = (Association key:1 value:0).    
  5146 "/    self assert:(1->-1) = (Association key:1 value:-1).
 
  5149     self assert:(1 ->-1) = (Association key:1 value:-1).  
  5147 "/    self assert:(1 ->-0) = (Association key:1 value:0).    
       
  5148 "/    self assert:(1 ->-1) = (Association key:1 value:-1).  
  5150 
  5149 
  5151     self assert:(-0->0) = (Association key:0 value:0).
 
  5150     self assert:(-0->0) = (Association key:0 value:0).
 
  5152     self assert:(-0->1) = (Association key:0 value:1).
 
  5151     self assert:(-0->1) = (Association key:0 value:1).
 
  5153     self assert:(-0 ->0) = (Association key:0 value:0).    
  5152     self assert:(-0 ->0) = (Association key:0 value:0).    
  5154     self assert:(-0 ->1) = (Association key:0 value:1). 
  5153     self assert:(-0 ->1) = (Association key:0 value:1). 
  5156     self assert:(-1->0) = (Association key:-1 value:0). 
  5155     self assert:(-1->0) = (Association key:-1 value:0). 
  5157     self assert:(-1->1) = (Association key:-1 value:1). 
  5156     self assert:(-1->1) = (Association key:-1 value:1). 
  5158     self assert:(-1 ->0) = (Association key:-1 value:0).    
  5157     self assert:(-1 ->0) = (Association key:-1 value:0).    
  5159     self assert:(-1 ->1) = (Association key:-1 value:1).   
  5158     self assert:(-1 ->1) = (Association key:-1 value:1).   
  5160 
  5159 
  5161     self assert:(-0->-0) = (Association key:0 value:0).
 
  5160     "/ undef behavior 
  5162     self assert:(-0->-1) = (Association key:0 value:-1).
 
  5161 "/    self assert:(-0->-0) = (Association key:0 value:0).
 
  5163     self assert:(-0 ->-0) = (Association key:0 value:0).    
  5162 "/    self assert:(-0->-1) = (Association key:0 value:-1).
 
  5164     self assert:(-0 ->-1) = (Association key:0 value:-1).   
  5163 "/    self assert:(-0 ->-0) = (Association key:0 value:0).    
  5165 
  5164 "/    self assert:(-0 ->-1) = (Association key:0 value:-1).   
  5166     self assert:(-1->-0) = (Association key:-1 value:0).     
  5165 "/
 
  5167     self assert:(-1->-1) = (Association key:-1 value:-1).    
  5166 "/    self assert:(-1->-0) = (Association key:-1 value:0).     
  5168     self assert:(-1 ->-0) = (Association key:-1 value:0).    
  5167 "/    self assert:(-1->-1) = (Association key:-1 value:-1).    
  5169     self assert:(-1 ->-1) = (Association key:-1 value:-1).  
  5168 "/    self assert:(-1 ->-0) = (Association key:-1 value:0).    
       
  5169 "/    self assert:(-1 ->-1) = (Association key:-1 value:-1).  
  5170 
  5170 
  5171     self assert:(0-> 0) = (Association key:0 value:0).
 
  5171     self assert:(0-> 0) = (Association key:0 value:0).
 
  5172     self assert:(0-> 1) = (Association key:0 value:1).
 
  5172     self assert:(0-> 1) = (Association key:0 value:1).
 
  5173     self assert:(0 -> 0) = (Association key:0 value:0).    
  5173     self assert:(0 -> 0) = (Association key:0 value:0).    
  5174     self assert:(0 -> 1) = (Association key:0 value:1).
 
  5174     self assert:(0 -> 1) = (Association key:0 value:1).
hg/stx-goodies-regression