[PD-cvs] externals/tb/jack_transport jack_transport.c, 1.1, 1.2 jack_transport.pd, 1.1, 1.2
Tim Blechmann
timblech at users.sourceforge.net
Thu May 5 21:31:42 CEST 2005
Update of /cvsroot/pure-data/externals/tb/jack_transport
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv22787
Modified Files:
jack_transport.c jack_transport.pd
Log Message:
setting jack transport frame
Index: jack_transport.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/tb/jack_transport/jack_transport.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** jack_transport.pd 4 May 2005 11:56:46 -0000 1.1
--- jack_transport.pd 5 May 2005 19:31:39 -0000 1.2
***************
*** 1,11 ****
#N canvas 0 0 450 300 10;
! #X floatatom 243 177 10 0 0 0 - - -;
! #X obj 243 129 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
! #X obj 243 153 jack_transport;
! #X obj 243 203 / 48000;
! #X floatatom 243 227 5 0 0 0 - - -;
! #X connect 0 0 3 0;
! #X connect 1 0 2 0;
#X connect 2 0 0 0;
! #X connect 3 0 4 0;
--- 1,13 ----
#N canvas 0 0 450 300 10;
! #X obj 100 141 jack_transport;
! #X floatatom 140 118 5 0 0 0 - - -;
! #X msg 191 120 stop;
! #X msg 191 97 start;
! #X floatatom 87 174 9 0 0 0 - - -;
! #X obj 42 58 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
! #X connect 0 0 4 0;
! #X connect 1 0 0 0;
#X connect 2 0 0 0;
! #X connect 3 0 0 0;
! #X connect 5 0 0 0;
Index: jack_transport.c
===================================================================
RCS file: /cvsroot/pure-data/externals/tb/jack_transport/jack_transport.c,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** jack_transport.c 4 May 2005 11:56:46 -0000 1.1
--- jack_transport.c 5 May 2005 19:31:39 -0000 1.2
***************
*** 93,104 ****
if (!x->x_jack_client)
return;
-
- jack_transport_query(x->x_jack_client,x->x_pos);
! f = x->x_pos->frame;
outlet_float(x->x_outlet, f);
}
void jack_transport_setup(void)
--- 93,110 ----
if (!x->x_jack_client)
return;
! f = (float)jack_get_current_transport_frame(x->x_jack_client);
outlet_float(x->x_outlet, f);
}
+ static void jack_transport_float(jack_transport_t * x, float f)
+ {
+ if (!x->x_jack_client)
+ return;
+
+ jack_transport_locate(x->x_jack_client, (jack_nframes_t)f);
+ }
+
void jack_transport_setup(void)
***************
*** 113,116 ****
--- 119,123 ----
gensym("stop"),0,0);
class_addbang(jack_transport_class, (t_method)jack_transport_bang);
+ class_addfloat(jack_transport_class, (t_method)jack_transport_float);
}
More information about the Pd-cvs
mailing list