(root)/
libredwg-0.13/
test/
unit-testing/
scale.c
       1  #define DWG_TYPE DWG_TYPE_SCALE
       2  #include "common.c"
       3  
       4  void
       5  api_process (dwg_object *obj)
       6  {
       7    int error, isnew;
       8    BITCODE_BS flag;
       9    BITCODE_TV name;
      10    BITCODE_BD paper_units;
      11    BITCODE_BD drawing_units;
      12    BITCODE_B is_unit_scale;
      13  
      14    Dwg_Version_Type dwg_version = obj->parent->header.version;
      15    dwg_obj_scale *_obj = dwg_object_to_SCALE (obj);
      16  
      17    CHK_ENTITY_TYPE (_obj, SCALE, flag, BS);
      18    CHK_ENTITY_UTF8TEXT (_obj, SCALE, name);
      19    CHK_ENTITY_TYPE (_obj, SCALE, paper_units, BD);
      20    CHK_ENTITY_TYPE (_obj, SCALE, drawing_units, BD);
      21    CHK_ENTITY_TYPE (_obj, SCALE, is_unit_scale, B);
      22  }