src/PDataStd/PDataStd_IntPackedMap_1.cdl

   1 -- File:        PDataStd_IntPackedMap_1.cdl
   2 -- Created:     Thu Mar 27 17:20:08 2008
   3 -- Author:      Sergey ZARITCHNY
   4 --              <sergey.zaritchny@opencascade.com>
   5 ---Copyright:   Open CasCade SA 2008
   6
   7 class IntPackedMap_1 from PDataStd inherits Attribute from PDF
   8
   9         ---Purpose: Persistence
  10
  11 uses
  12     HArray1OfInteger  from  PColStd
  13
  14
  15 is
  16     Create returns mutable  IntPackedMap_1 from  PDataStd;
  17
  18     Init (me : mutable; theLow,  theUp:  Integer  from Standard);
  19     ---Purpose: Inits the internal container
  20     --  if  (upper  -  lower)  ==  0  and (upper  |  lower) == 0, the corresponding
  21     --  array is empty (not requested)
  22
  23     IsEmpty (me)
  24     ---Purpose: Returns true if the internal container is empty
  25     returns Boolean from Standard;
  26
  27     Upper  (me)
  28      ---Purpose: Returns an upper bound of the internal container
  29     returns Integer from Standard;
  30
  31     Lower  (me)
  32      ---Purpose: Returns a lower bound of the internal container
  33     returns Integer from Standard;
  34
  35     GetValue (me; theIndex : Integer from Standard)
  36     returns Integer from Standard;
  37
  38     SetValue (me : mutable; theIndex : Integer from Standard;
  39                             theValue : Integer from Standard);
  40
  41     SetDelta(me : mutable; delta : Boolean from Standard);
  42
  43     GetDelta(me) returns Boolean from Standard;
  44
  45 fields
  46
  47     myIntValues      :  HArray1OfInteger from PColStd;
  48     myDelta  : Boolean from Standard;
  49
  50 end IntPackedMap_1;
  51
  52