(root)/
libredwg-0.13/
test/
unit-testing/
partial_viewing_index.c
       1  // TODO DEBUGGING
       2  #define DWG_TYPE DWG_TYPE_PARTIAL_VIEWING_INDEX
       3  #include "common.c"
       4  
       5  void
       6  api_process (dwg_object *obj)
       7  {
       8    int error, isnew;
       9    BITCODE_BL num_entries, i;
      10    BITCODE_B has_entries;
      11    Dwg_PARTIAL_VIEWING_INDEX_Entry *entries;
      12  
      13    Dwg_Version_Type dwg_version = obj->parent->header.version;
      14  #ifdef DEBUG_CLASSES
      15    dwg_obj_partial_viewing_index *_obj
      16        = dwg_object_to_PARTIAL_VIEWING_INDEX (obj);
      17  
      18    CHK_ENTITY_TYPE (_obj, PARTIAL_VIEWING_INDEX, num_entries, BL);
      19    CHK_ENTITY_TYPE (_obj, PARTIAL_VIEWING_INDEX, has_entries, B);
      20  
      21    if (!dwg_dynapi_entity_value (_obj, "PARTIAL_VIEWING_INDEX", "entries",
      22                                  &entries, NULL))
      23      fail ("dynapi PARTIAL_VIEWING_INDEX.entries");
      24    if (num_entries)
      25      {
      26        if (!entries)
      27          fail ("empty PARTIAL_VIEWING_INDEX.entries");
      28        else
      29          for (i = 0; i < num_entries; i++)
      30            {
      31              CHK_SUBCLASS_2RD (entries[i], PARTIAL_VIEWING_INDEX_Entry,
      32                                extents_min);
      33              CHK_SUBCLASS_2RD (entries[i], PARTIAL_VIEWING_INDEX_Entry,
      34                                extents_max);
      35              CHK_SUBCLASS_H (entries[i], PARTIAL_VIEWING_INDEX_Entry, object);
      36            }
      37      }
      38  #endif
      39  }