- (shape-new CLASS CTOR [REAL-CTOR] METHOD FUNC ...) -> voidprocedure
Create a new shape CLASS. Required METHOD are size & show. Optional METHOD reflect & reify must be added as a pair. Optional METHOD layout & justified? must be added as a pair.
The shape CLASS is not persisted, nor can it be.
(#!rest -> shape-plotter) ;optional (#!rest -> real-shape-plotter) ;required-method 'size (self self-info) -> integer integer 'reflect (self self-info) -> (reified-)shape-info 'reify ((reified-)self-info) -> shape-plotter 'show (canvas x y) -> void ;optional-method 'real (#!rest -> real-shape-plotter) 'layout (self self-info rect) -> hape-plotter 'justified? (self self-info) -> bookean ;rest-method 'METHOD (self self-info . args) -> . *