From 2bd3c408f06b21c621c9471c45ef8be0b1487892 Mon Sep 17 00:00:00 2001 From: Thomas Grill Date: Thu, 9 Mar 2006 17:27:37 +0000 Subject: fixes for mono object passing svn path=/trunk/externals/clr/; revision=4669 --- test/test-help.pd | 18 +++++++++++++++--- test/test.cs | 14 +++++++++++++- 2 files changed, 28 insertions(+), 4 deletions(-) (limited to 'test') diff --git a/test/test-help.pd b/test/test-help.pd index ca7d7eb..26246c4 100644 --- a/test/test-help.pd +++ b/test/test-help.pd @@ -1,4 +1,4 @@ -#N canvas 617 153 850 617 12; +#N canvas 617 153 862 841 12; #X floatatom 125 51 5 0 0 0 - - -; #X symbolatom 320 81 10 0 0 0 - - -; #X msg 536 45 msg one 2 three; @@ -16,8 +16,8 @@ #X msg 528 251 list s e c o n d; #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 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; #X obj 554 465 r receiver2; @@ -31,6 +31,13 @@ #X msg 589 386 turalu; #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; #X connect 2 0 30 0; @@ -57,3 +64,8 @@ #X connect 28 0 30 3; #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; diff --git a/test/test.cs b/test/test.cs index cfde7c6..0171275 100644 --- a/test/test.cs +++ b/test/test.cs @@ -18,7 +18,7 @@ public class test: AddInlet(); AddInlet(ref farg); AddInlet(); - AddOutletBang(); + AddOutletAnything(); } // this function MUST exist @@ -31,6 +31,8 @@ public class test: AddMethod(0,new MethodList(obj.MyList)); 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)); AddMethod(1,new MethodAnything(obj.MyAny1)); @@ -85,6 +87,16 @@ public class test: Send(new PureData.Symbol("receiver2"),(PureData.Atom[])l); } + 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) { Post(ix.ToString()+": Test-("+s.ToString()+") "+l.ToString()); -- cgit v1.2.1