pd/src g_array.c,1.1.1.3.2.8,1.1.1.3.2.9 - Pd-cvs

17 Jun 2004


      Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2671
Modified Files:
      Tag: devel_0_37
    g_array.c 
Log Message:
should compile for ms visual c .net now
Index: g_array.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/g_array.c,v
retrieving revision 1.1.1.3.2.8
retrieving revision 1.1.1.3.2.9
diff -C2 -d -r1.1.1.3.2.8 -r1.1.1.3.2.9
*** g_array.c	1 Jun 2004 10:48:22 -0000	1.1.1.3.2.8
--- g_array.c	17 Jun 2004 21:03:54 -0000	1.1.1.3.2.9
***************
*** 917,920 ****
--- 917,921 ----
      int yonset, type;
      t_symbol *arraytype;
+     float ret;
      if (!template_find_field(template, gensym("y"), &yonset,
      	&type, &arraytype) || type != DT_FLOAT)
***************
*** 926,930 ****
      if (indx < 0) indx = 0;
      else if (indx >= x->x_n) indx = x->x_n - 1;
!     float ret = (*(float *)((x->x_vec + sizeof(t_word) * indx) + yonset));
  #ifdef GARRAY_THREAD_LOCK /* TB: array lock */
      garray_unlock(x); 
--- 927,931 ----
      if (indx < 0) indx = 0;
      else if (indx >= x->x_n) indx = x->x_n - 1;
!     ret = (*(float *)((x->x_vec + sizeof(t_word) * indx) + yonset));
  #ifdef GARRAY_THREAD_LOCK /* TB: array lock */
      garray_unlock(x);