[PD-cvs] externals/k_cext k_cext_generatecode.c,1.4,1.5 k_cext.h,1.5,1.6
Kjetil S. Matheussen
ksvalast at users.sourceforge.net
Mon Aug 9 16:19:09 CEST 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)){
More information about the Pd-cvs
mailing list