externals/zexy/src list2symbol.c,1.3,1.4 - Pd-cvs

23 Aug 2005


      Update of /cvsroot/pure-data/externals/zexy/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15394
Modified Files:
    list2symbol.c 
Log Message:
do not use atom_getstring() for symbols, rather take the s_name
this reduces the amount of quoting significantly
Index: list2symbol.c
===================================================================
RCS file: /cvsroot/pure-data/externals/zexy/src/list2symbol.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** list2symbol.c	13 Jul 2005 08:26:44 -0000	1.3
--- list2symbol.c	23 Aug 2005 12:25:37 -0000	1.4
***************
*** 59,64 ****
    while(i--){
      char buffer[MAXPDSTRING];
!     atom_string(argv++, buffer, MAXPDSTRING);
!     length+=strlen(buffer);
    }
--- 59,68 ----
    while(i--){
      char buffer[MAXPDSTRING];
!     if(A_SYMBOL==argv->a_type){
!       length+=strlen(argv->a_w.w_symbol->s_name);
!     } else {
!       atom_string(argv++, buffer, MAXPDSTRING);
!       length+=strlen(buffer);
!     }
    }
***************
*** 83,90 ****
    argv=x->ap;
    while(i--){
!     char buffer[MAXPDSTRING];
!     atom_string(argv++, buffer, MAXPDSTRING);
!     strcpy(result+len, buffer);
!     len += strlen(buffer);
      if(i && connector){
        strcpy(result+len, connector);
--- 87,100 ----
    argv=x->ap;
    while(i--){
!     if(A_SYMBOL==argv->a_type){
!       strcpy(result+len, argv->a_w.w_symbol->s_name);
!       len+= strlen(argv->a_w.w_symbol->s_name);
!     } else {
!       char buffer[MAXPDSTRING];
!       atom_string(argv, buffer, MAXPDSTRING);
!       strcpy(result+len, buffer);
!       len += strlen(buffer);
!     }
!     argv++;
      if(i && connector){
        strcpy(result+len, connector);