Spline.st
changeset 2318 beeb4368c521
parent 2159 99864f0ab0ed
child 2425 f6e92214a5c6
equal deleted inserted replaced
2317:a56b5469246d 2318:beeb4368c521
   181 ! !
   181 ! !
   182 
   182 
   183 !Spline methodsFor:'accessing'!
   183 !Spline methodsFor:'accessing'!
   184 
   184 
   185 controlPoints
   185 controlPoints
   186     "return the collection of points through which the spline is
   186     "return the collection of points through which the spline is to pass"
   187      to pass"
       
   188 
   187 
   189     ^ controlPoints
   188     ^ controlPoints
   190 
   189 
   191     "Created: 8.5.1996 / 18:46:35 / cg"
   190     "Created: 8.5.1996 / 18:46:35 / cg"
   192 !
   191 !
   193 
   192 
   194 controlPoints:aCollectionOfPoints
   193 controlPoints:aCollectionOfPoints
   195     "set the collection of points through which the spline is
   194     "set the collection of points through which the spline is to pass"
   196      to pass"
       
   197 
   195 
   198     controlPoints := aCollectionOfPoints.
   196     controlPoints := aCollectionOfPoints.
   199     lines := nil
   197     lines := nil
   200 
   198 
   201     "Created: 8.5.1996 / 18:50:24 / cg"
   199     "Created: 8.5.1996 / 18:50:24 / cg"
   560 ! !
   558 ! !
   561 
   559 
   562 !Spline class methodsFor:'documentation'!
   560 !Spline class methodsFor:'documentation'!
   563 
   561 
   564 version
   562 version
   565     ^ '$Header: /cvs/stx/stx/libbasic2/Spline.st,v 1.16 2009-06-06 10:12:30 cg Exp $'
   563     ^ '$Header: /cvs/stx/stx/libbasic2/Spline.st,v 1.17 2009-10-26 21:15:26 cg Exp $'
   566 ! !
   564 !
       
   565 
       
   566 version_CVS
       
   567     ^ '$Header: /cvs/stx/stx/libbasic2/Spline.st,v 1.17 2009-10-26 21:15:26 cg Exp $'
       
   568 ! !