[PD-cvs] externals/miXed/shared/toxy scriptlet.c,1.5,1.6

krzyszcz at users.sourceforge.net krzyszcz at users.sourceforge.net
Tue Mar 9 13:41:23 CET 2004


Update of /cvsroot/pure-data/externals/miXed/shared/toxy
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3862/shared/toxy

Modified Files:
	scriptlet.c 
Log Message:
toxy alpha6

Index: scriptlet.c
===================================================================
RCS file: /cvsroot/pure-data/externals/miXed/shared/toxy/scriptlet.c,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** scriptlet.c	29 Feb 2004 17:16:44 -0000	1.5
--- scriptlet.c	9 Mar 2004 12:41:21 -0000	1.6
***************
*** 1,3 ****
! /* Copyright (c) 2003 krzYszcz and others.
   * For information on usage and redistribution, and for a DISCLAIMER OF ALL
   * WARRANTIES, see the file, "LICENSE.txt," in this distribution.  */
--- 1,3 ----
! /* Copyright (c) 2003-2004 krzYszcz and others.
   * For information on usage and redistribution, and for a DISCLAIMER OF ALL
   * WARRANTIES, see the file, "LICENSE.txt," in this distribution.  */
***************
*** 426,432 ****
  	sys_gui(sp->s_buffer);
  	*tail = 0;
! 	/* LATER find out if reply does not fit better inside the query proc */
! 	sprintf(buf, "after 0 {::toxy::query\n\
!  pd [concat %s _rp $::toxy::reply \\;]}\n", sp->s_rptarget->s_name);
  	sys_gui(buf);
      }
--- 426,436 ----
  	sys_gui(sp->s_buffer);
  	*tail = 0;
! 	/* Could not find anything more flexible, than blocking while waiting
! 	   for ::toxy::query to complete.  The model case is a Tk dialog
! 	   hanging over the arrival of new queries.  LATER probably use
! 	   a thread-safe replacement of the 'pd' command in order to prevent
! 	   competing tcl threads from corrupting the gui-to-pd stream. */
! 	sprintf(buf, "after 0 {::toxy::query}\nvwait ::toxy::reply\n\
!  pd [concat %s _rp $::toxy::reply \\;]\n", sp->s_rptarget->s_name);
  	sys_gui(buf);
      }
***************
*** 614,618 ****
  	dir = canvas_getdir(sp->s_glist)->s_name;
      else
! 	dir = "";
      if ((fd = open_via_path(dir, rc, ext, buf, &nameptr, MAXPDSTRING, 0)) < 0)
      {
--- 618,622 ----
  	dir = canvas_getdir(sp->s_glist)->s_name;
      else
! 	dir = "";  /* which means pwd, usually the same as at Pd startup... */
      if ((fd = open_via_path(dir, rc, ext, buf, &nameptr, MAXPDSTRING, 0)) < 0)
      {





More information about the Pd-cvs mailing list