1  #define DWG_TYPE DWG_TYPE_FIELDLIST
       2  #include "common.c"
       3  
       4  void
       5  api_process (dwg_object *obj)
       6  {
       7    int error;
       8    BITCODE_B unknown;
       9    BITCODE_BL i, num_fields;
      10    BITCODE_H *fields, *hdls;
      11  
      12    dwg_obj_fieldlist *_obj = dwg_object_to_FIELDLIST (obj);
      13  
      14    CHK_ENTITY_TYPE (_obj, FIELDLIST, unknown, B);
      15    CHK_ENTITY_TYPE (_obj, FIELDLIST, num_fields, BL);
      16    if (!dwg_dynapi_entity_value (_obj, "FIELDLIST", "fields", &fields, NULL))
      17      fail ("FIELDLIST.fields");
      18    hdls = _obj->fields;
      19    for (i = 0; i < num_fields; i++)
      20      {
      21        if (hdls[i] == fields[i])
      22          ok ("FIELDLIST.fields[%d]: " FORMAT_REF, i, ARGS_REF (fields[i]));
      23        else
      24          fail ("FIELDLIST.fields[%d]: " FORMAT_REF, i, ARGS_REF (fields[i]));
      25      }
      26  }