Structure.st
changeset 1481 c6804dfaf78a
parent 1424 eb987ab75c1f
child 1486 c6219885aab4
equal deleted inserted replaced
1480:9a68e871b2ec 1481:c6804dfaf78a
  1253         nr == 2 ifTrue:[^ i2].
  1253         nr == 2 ifTrue:[^ i2].
  1254         nr == 3 ifTrue:[^ i3].
  1254         nr == 3 ifTrue:[^ i3].
  1255         nr == 4 ifTrue:[^ i4].
  1255         nr == 4 ifTrue:[^ i4].
  1256         nr == 5 ifTrue:[^ i5].
  1256         nr == 5 ifTrue:[^ i5].
  1257         nr == 6 ifTrue:[^ i6].
  1257         nr == 6 ifTrue:[^ i6].
       
  1258         nr == 7 ifTrue:[^ i7].
       
  1259         nr == 8 ifTrue:[^ i8].
       
  1260         nr == 9 ifTrue:[^ i9].
       
  1261         nr == 10 ifTrue:[^ i10].
       
  1262         nr == 11 ifTrue:[^ i11].
       
  1263         nr == 12 ifTrue:[^ i12].
       
  1264         nr == 13 ifTrue:[^ i13].
       
  1265         nr == 14 ifTrue:[^ i14].
  1258         ^ nil
  1266         ^ nil
  1259     ].
  1267     ].
  1260 
  1268 
  1261     (sel == #'perform:') ifTrue:[
  1269     (sel == #'perform:') ifTrue:[
  1262          ^ super perform:(args at:1)
  1270          ^ super perform:(args at:1)
  1406 ! !
  1414 ! !
  1407 
  1415 
  1408 !Structure class methodsFor:'documentation'!
  1416 !Structure class methodsFor:'documentation'!
  1409 
  1417 
  1410 version
  1418 version
  1411     ^ '$Header: /cvs/stx/stx/libcomp/Structure.st,v 1.17 2003-06-05 18:39:33 cg Exp $'
  1419     ^ '$Header: /cvs/stx/stx/libcomp/Structure.st,v 1.18 2004-02-10 17:09:54 cg Exp $'
  1412 ! !
  1420 ! !
  1413 
  1421 
  1414 Structure initialize!
  1422 Structure initialize!