[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