Update of /cvsroot/pure-data/externals/clr/test In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3296/clr/test
Modified Files: test-help.pd test.cs Log Message: fixes for mono object passing
Index: test.cs =================================================================== RCS file: /cvsroot/pure-data/externals/clr/test/test.cs,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** test.cs 9 Mar 2006 14:34:33 -0000 1.1 --- test.cs 9 Mar 2006 17:27:37 -0000 1.2 *************** *** 19,23 **** AddInlet(ref farg); AddInlet(); ! AddOutletBang(); }
--- 19,23 ---- AddInlet(ref farg); AddInlet(); ! AddOutletAnything(); }
*************** *** 32,35 **** --- 32,37 ---- AddMethod(0,"set",new MethodAnything(obj.MySet)); AddMethod(0,"send",new MethodAnything(obj.MySend)); + AddMethod(0,"trigger",new Method(obj.MyTrigger)); + AddMethod(0,new MethodObject(obj.MyObject)); AddMethod(0,new MethodAnything(obj.MyAnything)); AddMethod(1,new MethodFloat(obj.MyFloat1)); *************** *** 86,89 **** --- 88,101 ---- }
+ protected virtual void MyTrigger() + { + OutletEx(0,"hey"); + } + + protected virtual void MyObject(int ix,object obj) + { + Post("OBJECT "+obj.ToString()); + } + protected virtual void MyAnything(int ix,PureData.Symbol s,PureData.AtomList l) {
Index: test-help.pd =================================================================== RCS file: /cvsroot/pure-data/externals/clr/test/test-help.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** test-help.pd 9 Mar 2006 14:34:33 -0000 1.1 --- test-help.pd 9 Mar 2006 17:27:37 -0000 1.2 *************** *** 1,3 **** ! #N canvas 617 153 850 617 12; #X floatatom 125 51 5 0 0 0 - - -; #X symbolatom 320 81 10 0 0 0 - - -; --- 1,3 ---- ! #N canvas 617 153 862 841 12; #X floatatom 125 51 5 0 0 0 - - -; #X symbolatom 320 81 10 0 0 0 - - -; *************** *** 17,22 **** #X obj 152 495 print OUT; #X floatatom 530 321 5 0 0 0 - - -; ! #X floatatom 229 112 5 0 0 0 - - -; ! #X msg 228 136 send $1 b c; #X obj 407 497 print RECV1; #X obj 406 463 r receiver; --- 17,22 ---- #X obj 152 495 print OUT; #X floatatom 530 321 5 0 0 0 - - -; ! #X floatatom 290 173 5 0 0 0 - - -; ! #X msg 289 197 send $1 b c; #X obj 407 497 print RECV1; #X obj 406 463 r receiver; *************** *** 32,35 **** --- 32,42 ---- #X msg 578 274 heyho; #X obj 151 443 test a b 5; + #X obj 655 388 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 + -1; + #X obj 124 621 test; + #X obj 124 696 test; + #X obj 141 650 print A; + #X obj 138 725 print B; + #X msg 120 580 trigger; #X connect 0 0 30 0; #X connect 1 0 30 0; *************** *** 58,59 **** --- 65,71 ---- #X connect 29 0 30 1; #X connect 30 0 14 0; + #X connect 31 0 30 3; + #X connect 32 0 33 0; + #X connect 32 0 34 0; + #X connect 33 0 35 0; + #X connect 36 0 32 0;