[PD-cvs] pd/src m_pd.h,1.4.4.11.2.33.2.4,1.4.4.11.2.33.2.5

Mathieu Bouchard matju at users.sourceforge.net
Sun Dec 3 01:10:33 CET 2006


Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15946

Modified Files:
      Tag: desiredata
	m_pd.h 
Log Message:
added some documentation


Index: m_pd.h
===================================================================
RCS file: /cvsroot/pure-data/pd/src/m_pd.h,v
retrieving revision 1.4.4.11.2.33.2.4
retrieving revision 1.4.4.11.2.33.2.5
diff -C2 -d -r1.4.4.11.2.33.2.4 -r1.4.4.11.2.33.2.5
*** m_pd.h	2 Dec 2006 05:41:19 -0000	1.4.4.11.2.33.2.4
--- m_pd.h	3 Dec 2006 00:10:31 -0000	1.4.4.11.2.33.2.5
***************
*** 87,95 ****
  #endif
  
! typedef struct _symbol
! {
!     char *s_name;
!     t_pd *s_thing;
!     struct _symbol *s_next;
  } t_symbol;
  
--- 87,95 ----
  #endif
  
! typedef struct _symbol {
!     char *s_name;           /* the const string that represents this symbol */
!     t_pd *s_thing;          /* pointer to the target of a receive-symbol,
! 				or to the bindlist of several targets */
!     struct _symbol *s_next; /* brochette of all symbols */
  } t_symbol;
  
***************
*** 106,115 ****
  #define GP_ARRAY 2      /* ... or array */
  
! typedef struct _gstub
! {
!     union
!     {
!         struct _glist *gs_glist;    /* glist we're in */
!         struct _array *gs_array;    /* array we're in */
      } gs_un;
      int gs_which;                   /* GP_GLIST/GP_ARRAY */
--- 106,113 ----
  #define GP_ARRAY 2      /* ... or array */
  
! typedef struct _gstub {
!     union {
!         struct _glist *gs_glist;
!         struct _array *gs_array;
      } gs_un;
      int gs_which;                   /* GP_GLIST/GP_ARRAY */
***************
*** 117,124 ****
  } t_gstub;
  
! typedef struct _gpointer           /* pointer to a gobj in a glist */
! {
!     union
!     {   
          struct _scalar *gp_scalar;  /* scalar we're in (if glist) */
          union word *gp_w;           /* raw data (if array) */
--- 115,120 ----
  } t_gstub;
  
! typedef struct _gpointer {
!     union {
          struct _scalar *gp_scalar;  /* scalar we're in (if glist) */
          union word *gp_w;           /* raw data (if array) */
***************
*** 128,161 ****
  } t_gpointer;
  
! typedef union word
! {
!     t_float w_float;
!     t_symbol *w_symbol;
!     t_gpointer *w_gpointer;
!     t_array *w_array;
!     struct _glist *w_list;
!     int w_index;
  } t_word;
  
! typedef enum
! {
!     A_NULL,
!     A_FLOAT,
!     A_SYMBOL,
!     A_POINTER,
!     A_SEMI,
!     A_COMMA,
!     A_DEFFLOAT,
!     A_DEFSYM,
!     A_DOLLAR, 
!     A_DOLLSYM,
!     A_GIMME,
!     A_CANT
  }  t_atomtype;
  
  #define A_DEFSYMBOL A_DEFSYM    /* better name for this */
  
! typedef struct _atom
! {
      t_atomtype a_type;
      union word a_w;
--- 124,149 ----
  } t_gpointer;
  
! typedef union word {
!     t_float w_float;        /* A_FLOAT   */
!     t_symbol *w_symbol;     /* A_SYMBOL  */
!     t_gpointer *w_gpointer; /* A_POINTER */
!     t_array *w_array;       /* DS nested array? */
!     struct _glist *w_list;  /* DS nested list? */
!     int w_index;            /* what's this? */
  } t_word;
  
! typedef enum {
!     A_NULL, /* non-type: represents end of typelist */
!     A_FLOAT, A_SYMBOL, A_POINTER, /* stable elements */
!     A_SEMI, A_COMMA, /* radioactive elements of the first kind */
!     A_DEFFLOAT, A_DEFSYM, /* pseudo-types for optional (DEFault) arguments */
!     A_DOLLAR, A_DOLLSYM, /* radioactive elements of the second kind */
!     A_GIMME, /* non-type: represents varargs */
!     A_CANT /* bottom type */
  }  t_atomtype;
  
  #define A_DEFSYMBOL A_DEFSYM    /* better name for this */
  
! typedef struct _atom {
      t_atomtype a_type;
      union word a_w;
***************
*** 604,630 ****
  
  /* tb: exporting basic arithmetic dsp functions { 
!  *
!  * for (n % 8) != 0
!  */
! EXTERN t_int *plus_perform(t_int *args);
  EXTERN t_int *zero_perform(t_int *args);
  EXTERN t_int *copy_perform(t_int *args);
! 
! EXTERN t_int *plus_perform(t_int *args);
! EXTERN t_int *scalarplus_perform(t_int *args);
! EXTERN t_int *minus_perform(t_int *args);
! EXTERN t_int *scalarminus_perform(t_int *args);
! EXTERN t_int *times_perform(t_int *args);
! EXTERN t_int *scalartimes_perform(t_int *args);
! EXTERN t_int *over_perform(t_int *args);
! EXTERN t_int *scalarover_perform(t_int *args);
! 
! EXTERN t_int *max_perform(t_int *args);
! EXTERN t_int *scalarmax_perform(t_int *args);
! EXTERN t_int *min_perform(t_int *args);
! EXTERN t_int *scalarmin_perform(t_int *args);
! 
  EXTERN t_int *sig_tilde_perform(t_int *args);
- 
  EXTERN t_int *clip_perform(t_int *args);
  
--- 592,606 ----
  
  /* tb: exporting basic arithmetic dsp functions { 
!  * for (n % 8) != 0 */
! 
  EXTERN t_int *zero_perform(t_int *args);
  EXTERN t_int *copy_perform(t_int *args);
! EXTERN t_int *plus_perform( t_int *args); EXTERN t_int *scalarplus_perform( t_int *args);
! EXTERN t_int *minus_perform(t_int *args); EXTERN t_int *scalarminus_perform(t_int *args);
! EXTERN t_int *times_perform(t_int *args); EXTERN t_int *scalartimes_perform(t_int *args);
! EXTERN t_int *over_perform( t_int *args); EXTERN t_int *scalarover_perform( t_int *args);
! EXTERN t_int *max_perform(  t_int *args); EXTERN t_int *scalarmax_perform(  t_int *args);
! EXTERN t_int *min_perform(  t_int *args); EXTERN t_int *scalarmin_perform(  t_int *args);
  EXTERN t_int *sig_tilde_perform(t_int *args);
  EXTERN t_int *clip_perform(t_int *args);
  
***************
*** 632,651 ****
  EXTERN t_int *zero_perf8(t_int *args);
  EXTERN t_int *copy_perf8(t_int *args);
! 
! EXTERN t_int *plus_perf8(t_int *args);
! EXTERN t_int *scalarplus_perf8(t_int *args);
! EXTERN t_int *minus_perf8(t_int *args);
! EXTERN t_int *scalarminus_perf8(t_int *args);
! EXTERN t_int *times_perf8(t_int *args);
! EXTERN t_int *scalartimes_perf8(t_int *args);
  EXTERN t_int *sqr_perf8(t_int *args);
- EXTERN t_int *over_perf8(t_int *args);
- EXTERN t_int *scalarover_perf8(t_int *args);
- 
- EXTERN t_int *max_perf8(t_int *args);
- EXTERN t_int *scalarmax_perf8(t_int *args);
- EXTERN t_int *min_perf8(t_int *args);
- EXTERN t_int *scalarmin_perf8(t_int *args);
- 
  EXTERN t_int *sig_tilde_perf8(t_int *args);
  
--- 608,618 ----
  EXTERN t_int *zero_perf8(t_int *args);
  EXTERN t_int *copy_perf8(t_int *args);
! EXTERN t_int *plus_perf8( t_int *args); EXTERN t_int *scalarplus_perf8( t_int *args);
! EXTERN t_int *minus_perf8(t_int *args); EXTERN t_int *scalarminus_perf8(t_int *args);
! EXTERN t_int *times_perf8(t_int *args); EXTERN t_int *scalartimes_perf8(t_int *args);
! EXTERN t_int *over_perf8( t_int *args); EXTERN t_int *scalarover_perf8( t_int *args);
! EXTERN t_int *max_perf8(  t_int *args); EXTERN t_int *scalarmax_perf8(  t_int *args);
! EXTERN t_int *min_perf8(  t_int *args); EXTERN t_int *scalarmin_perf8(  t_int *args);
  EXTERN t_int *sqr_perf8(t_int *args);
  EXTERN t_int *sig_tilde_perf8(t_int *args);
  
***************
*** 655,678 ****
  EXTERN t_int *zero_perf_simd(t_int *args);
  EXTERN t_int *copy_perf_simd(t_int *args);
! 
! EXTERN t_int *plus_perf_simd(t_int *args);
! EXTERN t_int *scalarplus_perf_simd(t_int *args);
! EXTERN t_int *minus_perf_simd(t_int *args);
! EXTERN t_int *scalarminus_perf_simd(t_int *args);
! EXTERN t_int *times_perf_simd(t_int *args);
! EXTERN t_int *scalartimes_perf_simd(t_int *args);
  EXTERN t_int *sqr_perf_simd(t_int *args);
- EXTERN t_int *over_perf_simd(t_int *args);
- EXTERN t_int *scalarover_perf_simd(t_int *args);
- 
- EXTERN t_int *max_perf_simd(t_int *args);
- EXTERN t_int *scalarmax_perf_simd(t_int *args);
- EXTERN t_int *min_perf_simd(t_int *args);
- EXTERN t_int *scalarmin_perf_simd(t_int *args);
- 
  EXTERN t_int *sig_tilde_perf_simd(t_int *args);
- 
  EXTERN t_int *clip_perf_simd(t_int *args);
- 
  /* } tb */
  
--- 622,634 ----
  EXTERN t_int *zero_perf_simd(t_int *args);
  EXTERN t_int *copy_perf_simd(t_int *args);
! EXTERN t_int *plus_perf_simd( t_int *args); EXTERN t_int *scalarplus_perf_simd( t_int *args);
! EXTERN t_int *minus_perf_simd(t_int *args); EXTERN t_int *scalarminus_perf_simd(t_int *args);
! EXTERN t_int *times_perf_simd(t_int *args); EXTERN t_int *scalartimes_perf_simd(t_int *args);
! EXTERN t_int *over_perf_simd( t_int *args); EXTERN t_int *scalarover_perf_simd( t_int *args);
! EXTERN t_int *max_perf_simd(  t_int *args); EXTERN t_int *scalarmax_perf_simd(  t_int *args);
! EXTERN t_int *min_perf_simd(  t_int *args); EXTERN t_int *scalarmin_perf_simd(  t_int *args);
  EXTERN t_int *sqr_perf_simd(t_int *args);
  EXTERN t_int *sig_tilde_perf_simd(t_int *args);
  EXTERN t_int *clip_perf_simd(t_int *args);
  /* } tb */
  





More information about the Pd-cvs mailing list