RegressionTests__JITTest.st
changeset 111 3b748ec54adb
parent 110 d9d3ea81bfc3
child 117 d596f2b12e56
equal deleted inserted replaced
110:d9d3ea81bfc3 111:3b748ec54adb
   293     self assert:(self findFirst2:3) == 3.
   293     self assert:(self findFirst2:3) == 3.
   294     self assert:(self findFirst2:4) == 4.
   294     self assert:(self findFirst2:4) == 4.
   295     self assert:(self findFirst2:0) == 0.
   295     self assert:(self findFirst2:0) == 0.
   296     self assert:(self findFirst2:10) == 0.
   296     self assert:(self findFirst2:10) == 0.
   297     self assert:(self findFirst2:4.0) == 4.
   297     self assert:(self findFirst2:4.0) == 4.
       
   298 
       
   299 
       
   300     self assert:(self findFirst3:1) == 1.
       
   301     self assert:(self findFirst3:2) == 2.
       
   302     self assert:(self findFirst3:3) == 3.
       
   303     self assert:(self findFirst3:4) == 4.
       
   304     self assert:(self findFirst3:0) == 0.
       
   305     self assert:(self findFirst3:10) == 0.
       
   306     self assert:(self findFirst3:4.0) == 0.
   298 
   307 
   299     "
   308     "
   300      self basicNew testFindFirst
   309      self basicNew testFindFirst
   301     "
   310     "
   302 ! !
   311 ! !
   771      self new findFirst2:3       
   780      self new findFirst2:3       
   772      self new findFirst2:4       
   781      self new findFirst2:4       
   773      self new findFirst2:0       
   782      self new findFirst2:0       
   774      self new findFirst2:10       
   783      self new findFirst2:10       
   775      self new findFirst2:4.0       
   784      self new findFirst2:4.0       
       
   785     "
       
   786 !
       
   787 
       
   788 findFirst3:arg 
       
   789     i1 := #(1 2 3 4) asOrderedCollection.
       
   790     ^ self findFirst3b:arg
       
   791 
       
   792     "
       
   793      self new findFirst3:1      
       
   794      self new findFirst3:2      
       
   795      self new findFirst3:3       
       
   796      self new findFirst3:4       
       
   797      self new findFirst3:0       
       
   798      self new findFirst3:10       
       
   799      self new findFirst3:4.0       
       
   800     "
       
   801 !
       
   802 
       
   803 findFirst3b:arg
       
   804     ^ i1 findFirst:[:el | el == arg]
       
   805 
       
   806     "
       
   807      self new findFirst3:1      
       
   808      self new findFirst3:2      
       
   809      self new findFirst3:3       
       
   810      self new findFirst3:4       
       
   811      self new findFirst3:0       
       
   812      self new findFirst3:10       
       
   813      self new findFirst3:4.0       
   776     "
   814     "
   777 !
   815 !
   778 
   816 
   779 nilBlock1
   817 nilBlock1
   780     ^ []
   818     ^ []