1  #define DWG_TYPE DWG_TYPE_BLOCK_CONTROL
       2  #include "common.c"
       3  
       4  void
       5  api_process (dwg_object *obj)
       6  {
       7    int error, isnew;
       8    BITCODE_BS i, num_entries;
       9    BITCODE_H *entries, *hdls;
      10    BITCODE_H model_space;
      11    BITCODE_H paper_space;
      12  
      13    dwg_obj_block_control *block_control = dwg_object_to_BLOCK_CONTROL (obj);
      14  
      15    CHK_ENTITY_TYPE_W_OBJ (block_control, BLOCK_CONTROL, num_entries, BS);
      16    entries = dwg_object_tablectrl_get_entries (obj, &error);
      17    if (!dwg_dynapi_entity_value (block_control, "BLOCK_CONTROL", "entries",
      18                                  &hdls, NULL))
      19      fail ("BLOCK_CONTROL.entries");
      20    for (i = 0; i < num_entries; i++)
      21      {
      22        if (hdls[i] == entries[i])
      23          ok ("BLOCK_CONTROL.entries[%d]: " FORMAT_REF, i,
      24              ARGS_REF (entries[i]));
      25        else
      26          fail ("BLOCK_CONTROL.entries[%d]: " FORMAT_REF, i,
      27                ARGS_REF (entries[i]));
      28      }
      29    CHK_ENTITY_H (block_control, BLOCK_CONTROL, model_space);
      30    CHK_ENTITY_H (block_control, BLOCK_CONTROL, model_space);
      31  }