[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