Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2371
Modified Files: Tag: desiredata desire.tk Log Message: fix braces in parsing
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.600.2.404 retrieving revision 1.1.2.600.2.405 diff -C2 -d -r1.1.2.600.2.404 -r1.1.2.600.2.405 *** desire.tk 20 Aug 2007 07:56:46 -0000 1.1.2.600.2.404 --- desire.tk 20 Aug 2007 08:16:57 -0000 1.1.2.600.2.405 *************** *** 5498,5502 **** set s [regsub -all {(^|[^\])[\s\n]+} $s "\1\x01"] set s [regsub -all {^\n} $s "\x01"] ;# oops ! set s [regsub -all {(^|[^\])\([\; ])} $s "\1\2"] set s [regsub -all \x03 $s \] set r {} --- 5498,5502 ---- set s [regsub -all {(^|[^\])[\s\n]+} $s "\1\x01"] set s [regsub -all {^\n} $s "\x01"] ;# oops ! set s [regsub -all {\([\; {}])} $s "\1\2"] set s [regsub -all \x03 $s \] set r {} *************** *** 5532,5535 **** --- 5532,5537 ---- pd_mess_split_want== {\ \\ \\\ \ \\ \\\ one} [list [list "\" "\\" "\\\" "\ \\ \\\ one"]] pd_mess_split_want== "\n \n \n foo" foo + pd_mess_split_want== "\\x7b\\x7b\\x7b\\x7b" [list [list "\x7b\x7b\x7b\x7b"]] + pd_mess_split_want== "\\x7d\\x7d\\x7d\\x7d" [list [list "\x7d\x7d\x7d\x7d"]] exit }