1 // TODO DEBUGGING
2 #define DWG_TYPE DWG_TYPE_BLOCKPOLARSTRETCHACTION
3 #include "common.c"
4
5 void
api_process(dwg_object * obj)6 api_process (dwg_object *obj)
7 {
8 int error, isnew;
9 BITCODE_BL i;
10 BLOCKACTION_fields;
11 BITCODE_BL num_pts;
12 BITCODE_2RD *pts;
13 BITCODE_BL num_hdls;
14 BITCODE_H *hdls;
15 BITCODE_BS *shorts;
16 BITCODE_BL num_codes;
17 BITCODE_BL *codes;
18
19 Dwg_Version_Type dwg_version = obj->parent->header.version;
20 //#ifdef DEBUG_CLASSES
21 dwg_obj_blockpolarstretchaction *_obj = dwg_object_to_BLOCKPOLARSTRETCHACTION (obj);
22
23 // AcDbBlockAction
24 CHK_ENTITY_3RD (_obj, BLOCKPOLARSTRETCHACTION, display_location);
25 CHK_ENTITY_TYPE (_obj, BLOCKPOLARSTRETCHACTION, num_actions, BL);
26 CHK_ENTITY_VECTOR_TYPE (_obj, BLOCKPOLARSTRETCHACTION, actions, num_actions, BL);
27 CHK_ENTITY_TYPE (_obj, BLOCKPOLARSTRETCHACTION, num_deps, BL);
28 CHK_ENTITY_HV (_obj, BLOCKPOLARSTRETCHACTION, deps, num_deps);
29 // AcDbBlockPolarStretchAction
30 for (i = 0; i < 6; i++)
31 {
32 CHK_SUBCLASS_TYPE (_obj->conn_pts[i], BLOCKACTION_connectionpts, code, BL);
33 CHK_SUBCLASS_UTF8TEXT (_obj->conn_pts[i], BLOCKACTION_connectionpts, name);
34 }
35 CHK_ENTITY_TYPE (_obj, BLOCKPOLARSTRETCHACTION, num_pts, BL);
36 CHK_ENTITY_2DPOINTS (_obj, BLOCKPOLARSTRETCHACTION, pts, num_pts);
37 CHK_ENTITY_TYPE (_obj, BLOCKPOLARSTRETCHACTION, num_hdls, BL);
38 CHK_ENTITY_HV (_obj, BLOCKPOLARSTRETCHACTION, hdls, num_hdls);
39 CHK_ENTITY_VECTOR_TYPE (_obj, BLOCKPOLARSTRETCHACTION, shorts, num_hdls, BS);
40 CHK_ENTITY_TYPE (_obj, BLOCKPOLARSTRETCHACTION, num_codes, BL);
41 CHK_ENTITY_VECTOR_TYPE (_obj, BLOCKPOLARSTRETCHACTION, codes, num_codes, BL);
42 // ..
43 //#endif
44 }
45