externals/clr/pd Atom.cs,1.1,1.2 pd.cs,1.1,1.2 - Pd-cvs

16 Jan 2006


      Update of /cvsroot/pure-data/externals/clr/pd
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15459/pd
Modified Files:
    Atom.cs pd.cs 
Log Message:
added arguments at initialization time
Index: pd.cs
===================================================================
RCS file: /cvsroot/pure-data/externals/clr/pd/pd.cs,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** pd.cs	14 Jan 2006 02:34:17 -0000	1.1
--- pd.cs	16 Jan 2006 12:44:45 -0000	1.2
***************
*** 26,30 ****
    		ToOutlet (x, outlet, atoms.Length, atoms);
    	}
! 
    	// create an outlet
    	[MethodImplAttribute (MethodImplOptions.InternalCall)]
--- 26,35 ----
    		ToOutlet (x, outlet, atoms.Length, atoms);
    	}
! 		public static void SendToOutlet (IntPtr x, int outlet, Atom atom)
! 		{
! 			Atom [] atoms = new Atom[1];
! 			atoms[0] = atom;
! 			ToOutlet (x, outlet, atoms.Length, atoms);
! 		}
    	// create an outlet
    	[MethodImplAttribute (MethodImplOptions.InternalCall)]
Index: Atom.cs
===================================================================
RCS file: /cvsroot/pure-data/externals/clr/pd/Atom.cs,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Atom.cs	14 Jan 2006 02:34:17 -0000	1.1
--- Atom.cs	16 Jan 2006 12:44:45 -0000	1.2
***************
*** 19,22 ****
--- 19,28 ----
    		this.string_value = "float";
    	}
+ 		public Atom(int i)
+ 		{
+ 			this.type = AtomType.Float;
+ 			this.float_value = (float) i;
+ 			this.string_value = "float";
+ 		}
    	public Atom(string s)
    	{