fixes for mono object passing

svn path=/trunk/externals/clr/; revision=4669

2 files changed, 28 insertions, 4 deletions

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());