externals/k_cext k_cext_generatecode.c,1.4,1.5 k_cext.h,1.5,1.6 - Pd-cvs

9 Aug 2004


      Update of /cvsroot/pure-data/externals/k_cext
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7919
Modified Files:
    k_cext_generatecode.c k_cext.h 
Log Message:
Made the SEND macro a bit more convenient to use with the new string handling. The new SEN macro works like the old SEND macro.
Index: k_cext.h
===================================================================
RCS file: /cvsroot/pure-data/externals/k_cext/k_cext.h,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** k_cext.h	8 Aug 2004 13:09:02 -0000	1.5
--- k_cext.h	9 Aug 2004 14:19:06 -0000	1.6
***************
*** 107,111 ****
  }while(0)
!
#define INTARRAY(name,len) int name[len]={0}
--- 107,111 ----
  }while(0)
! #define SEN(symname,val) SEND(symname,val)
#define INTARRAY(name,len) int name[len]={0}
***************
*** 152,156 ****
--- 152,158 ----
#define SP " "
+   //#define STRING(a) " " ## a ## " "
+   //#define gakk system("echo");
typedef int (*k_cext_f_int_callback)(t_k_cext *x,...);
Index: k_cext_generatecode.c
===================================================================
RCS file: /cvsroot/pure-data/externals/k_cext/k_cext_generatecode.c,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** k_cext_generatecode.c	9 Aug 2004 13:57:38 -0000	1.4
--- k_cext_generatecode.c	9 Aug 2004 14:19:06 -0000	1.5
***************
*** 206,209 ****
--- 206,220 ----
    pos[1]=' ';
        }
+ 
+       if(strstr(string,"SEND(")!=NULL){
+ 	char *pos=strstr(string,"SEND(")+3;
+ 	int len;
+ 	pos[0]='(';
+ 	pos[1]='"';
+ 
+ 	len=strlen(string);
+ 	string[len]='"';
+ 	string[len+1]=0;
+       }
if(!strcmp(".",string)){