gEDA-cvs: CVS update: o_complex.c

[cvspsrv@xxxxxxxx]

  User: pcjc2   
  Date: 06/12/27 14:34:28

  Modified:    .        Tag: noscreen o_complex.c
  Log:
  * include/prototype.h, src/o_complex.c: Remove unused
  
    function o_complex_mirror2()
  
  
  
  
  Revision  Changes    Path
  No                   revision
  
  
  No                   revision
  
  
  1.28.6.3  +0 -102    eda/geda/gaf/gschem/src/o_complex.c
  
  (In the diff below, changes in quantity of whitespace are not shown.)
  
  Index: o_complex.c
  ===================================================================
  RCS file: /home/cvspsrv/cvsroot/eda/geda/gaf/gschem/src/o_complex.c,v
  retrieving revision 1.28.6.2
  retrieving revision 1.28.6.3
  diff -u -b -r1.28.6.2 -r1.28.6.3
  --- o_complex.c	27 Dec 2006 19:21:37 -0000	1.28.6.2
  +++ o_complex.c	27 Dec 2006 19:34:28 -0000	1.28.6.3
  @@ -818,105 +818,3 @@
   #endif
     return(change);
   }
  -
  -/*! \todo Finish function documentation!!!
  - *  \brief
  - *  \par Function Description
  - *
  - *  \note
  - *  this is a special mirror which doesn't mirror the object in memory,
  - *  but read the new "correctly mirrored/rotated" object from disk
  - *  \todo yes this is aweful, and I will eventually fix it, but for now
  - *        it has to do hack
  - */
  -OBJECT *o_complex_mirror2(TOPLEVEL *w_current, OBJECT *list,
  -			  int centerx, int centery,
  -			  OBJECT *object)
  -{
  -  OBJECT *new_obj = NULL;
  -  int x, y;
  -  int newx, newy;
  -  int origx, origy;
  -  int world_centerx, world_centery;
  -  int change=0;
  -  int color;
  -
  -  SCREENtoWORLD(w_current,
  -                centerx,
  -                centery,
  -                &world_centerx,
  -                &world_centery);
  -
  -  origx = object->complex->x;
  -  origy = object->complex->y;
  -
  -  x = object->complex->x + (-world_centerx);
  -  y = object->complex->y + (-world_centery);
  -
  -  newx = -x;
  -  newy = y;
  -
  -  x = newx + (world_centerx);
  -  y = newy + (world_centery);
  -
  -  switch(object->complex->angle) {
  -    case(90):
  -      object->complex->angle = 270;
  -#if 0
  -      o_text_change_angle(w_current, object->complex->prim_objs,
  -                          object->complex->angle);
  -#endif
  -      change = 1;
  -      break;
  -
  -    case(270):
  -      object->complex->angle = 90;
  -#if 0
  -      o_text_change_angle(w_current, object->complex->prim_objs,
  -                          object->complex->angle);
  -#endif
  -      change=1;
  -      break;
  -
  -  }
  -
  -  object->complex->mirror = !object->complex->mirror;
  -
  -  if (object->saved_color == -1) {
  -    color = object->color;
  -  } else {
  -    color = object->saved_color;
  -  }
  -
  -
  -  new_obj = o_complex_add(w_current,
  -                          list, NULL, object->type,
  -                          color,
  -                          x, y,
  -                          object->complex->angle, 
  -                          object->complex->mirror,
  -                          object->complex_clib, object->complex_basename,
  -                          1, FALSE);
  -
  -  /*! \todo fix up name sometime ... */
  -  new_obj->sid = object->sid;
  -
  -  new_obj->attribs = o_attrib_copy_all(
  -                                       w_current, new_obj, object->attribs);
  -
  -  o_attrib_slot_update(w_current, new_obj);
  -
  -  o_complex_delete(w_current, object);
  -
  -  /* need to do the following, because delete severs links */
  -  o_attrib_reattach(new_obj->attribs);
  -  o_attrib_set_color(w_current, new_obj->attribs);
  -
  -
  -#if 0
  -  w_current->page_current->object_tail = (OBJECT *)
  -  return_tail(w_current->page_current->object_head);
  -#endif
  -
  -  return(new_obj);
  -}
  
  
  


_______________________________________________
geda-cvs mailing list
geda-cvs@xxxxxxxxxxxxxx
http://www.seul.org/cgi-bin/mailman/listinfo/geda-cvs