[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