src/TPrsStd/TPrsStd_PlaneDriver.cdl

   1 -- File:        TPrsStd_PlaneDriver.cdl
   2 -- Created:     Fri Aug  1 11:21:30 1997
   3 -- Author:      SMO
   4 ---Copyright:    Matra Datavision 1997
   5
   6
   7 class PlaneDriver from TPrsStd inherits Driver from TPrsStd
   8 ---Purpose: An implementation of TPrsStd_Driver for planes.
   9 uses
  10
  11   GUID               from Standard,
  12   Label              from TDF,
  13   InteractiveObject  from AIS
  14 is
  15
  16     Create
  17     returns mutable PlaneDriver from TPrsStd;
  18 ---Purpose: Constructs an empty plane driver.
  19     Update (me : mutable ;
  20            aLabel      : Label from TDF;
  21            anAISObject : in out InteractiveObject from AIS)
  22     returns Boolean from Standard
  23     is  redefined virtual;
  24     --- Purpose: Build the AISObject (if null) or update it.
  25     --           No compute is done.
  26     --           Returns <True> if informations was found
  27     --           and AISObject updated.
  28
  29
  30 end PlaneDriver;
  31