[PD-cvs] pd/src desire.tk,1.1.2.600.2.404,1.1.2.600.2.405
Mathieu Bouchard
matju at users.sourceforge.net
Mon Aug 20 10:17:01 CEST 2007
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
}
More information about the Pd-cvs
mailing list