using System;
using System.Windows.Forms;

namespace Test
{
    class Form1: Form
    {
        static void Main()
        {
            Application.Run(new Form1());
        }

        private Form1()
        {
            string[] strings = new string[]{"test1", "test2", "test3"};
            ComboBox comboBox1 = new ComboBox();
            comboBox1.Items.AddRange(strings);
            this.Controls.Add(comboBox1);
        }
    }
}

D:>csc test.cs
Версия компилятора Microsoft (R) Visual C# 20058.00.50727.42
для Microsoft (R) Windows (R) 2005 Framework версии2.0.50727
Авторские права (C) Microsoft Corporation 2001-2005. Все права защищены.


D:>

using System;
using System.Windows.Forms;

namespace Test
{
    class Form1: Form
    {
        static Main() :  void
        {
            Application.Run( Form1());
        }

        private this()
        {
            def strings = array["test1", "test2", "test3"];
            def comboBox1 = ComboBox();
            comboBox1.Items.AddRange(strings);
            this.Controls.Add(comboBox1);
        }
    }
}

D:>ncc -r System.Windows.Forms test.n
test.n:17:1:17:25: <[01;31merror<[0m: in argument #1 (items) of comboBox1.Items.AddRange, needed a array [System.Object], got array [string]: the types System.Object and string are not compatible [simple unify]

D:>

using System;
using System.Windows.Forms;

namespace Test
{
    class Form1: Form
    {
        static Main() :  void
        {
            Application.Run( Form1());
        }

        private this()
        {
            def strings = array["test1", "test2", "test3"];
            def arr = Array.ConvertAll(strings, Converter.[string, object](fun(from){from}));
            def comboBox1 = ComboBox();
            comboBox1.Items.AddRange(arr);
            this.Controls.Add(comboBox1);
        }
    }
}

D:>ncc -r System.Windows.Forms test1.n


D:>test1.exe


D:>

    def strings = array["test1" : object, "test2", "test3"];
    def comboBox1 = ComboBox();
    comboBox1.Items.AddRange(strings);

    def strings = array["test1", "test2", "test3"];
    def comboBox1 = ComboBox();
    comboBox1.Items.AddRange((strings : object) :> array[object]);

Array.ConvertAll(strings, Converter.[string, object](fun(from){from}));

Array.ConvertAll(strings, x => x : object);

Array.ConvertAll(strings, fun(from) : object { from });

VK>Array.ConvertAll(strings, Converter.[string, object](fun(from){from}));
VK>

VK>Array.ConvertAll(strings, x => x : object);
VK>

Converter.[string, object](fun(from){from})

fun(x: string): object {match(x){| x => x: object} }

fun(x) {| x => x: object}

| x => x: object

Array.ConvertAll(strings, x => x : object);

private Form1()
{
      string[] textArray1 = new string[] { "test1", "test2", "test3" };
      object[] objArray1 = Array.ConvertAll<string, object>(textArray1, new Converter<string, object>(Form1._N__N_l44205270));
      ComboBox box1 = new ComboBox();
      box1.Items.AddRange(objArray1);
      this.Controls.Add(box1);
}

private static object _N__N_l44205270(string x)
{
      return (object) x;
}

def f = fun((a,b), (x::xs)) {}

using Nemerle.Utility;
...
def strings = array["test1", "test2", "test3"];
...
comboBox1.Items.AddRange(strings.ToBase());

VK>>Array.ConvertAll(strings, x => x : object);
VK>>

using System.Console;
using Nemerle.Utility;

def ary1 = array[1, 2, 3, 4];
def ary2 = ary1.ConvertAll(elem => elem.ToString());

WriteLine(ary2.ToString(", "))

def ary2 = ary1.ConvertAll(_.ToString());

x => x : object

fun (x) { x : object }

fun (x) : object { x }

(x) : object => x

(x) : string => x

I>            string[] strings = new string[]{"test1", "test2", "test3"};
I>            ComboBox comboBox1 = new ComboBox();
I>            comboBox1.Items.AddRange(strings);
I>

using Nemerle.Utility;
using System.Windows.Forms;
using System.Collections.Generic;

namespace System.Windows.Forms
{
  module ExtensionMethods
  {
    public AddRange[T](this items : ComboBox.ObjectCollection, args : array[T]) : void
      where T: class
    {
      items.AddRange((args : object) :> array[object]);
    }

    public AddRange[T](this items : ComboBox.ObjectCollection, args : IEnumerable[T]) : void
      where T: class
    {
      items.AddRange((args.ToArray() : object) :> array[object]);
    }
  }
}

def strings = array["test1", "test2", "test3"];
def comboBox1 = ComboBox();
comboBox1.Items.AddRange(strings);
System.Console.WriteLine(comboBox1.Items.Count);

def strings = ["test1", "test2", "test3"]; // список!
def comboBox1 = ComboBox();
comboBox1.Items.AddRange(strings);
System.Console.WriteLine(comboBox1.Items.Count);

VD>def ary2 = ary1.ConvertAll(_.ToString());
VD>

using Nemerle.Utility;

class Class1 {}
    
def arr1: array[object] = array[Class1(), Class1(), Class1()];
def _arr2: array[Class1] = arr1.ConvertTo(_:> Class1);
//def _arr2: array[Class1] = arr1.ConvertTo(x => x:> Class1);

>C:\Program Files\Nemerle\ncc.exe -no-color -r System.Windows.Forms -r System.Data -t winexe test.n -o test.exe
test.n:6:43:6:44: error: found pattern expression (_ ) inside a raw expression
test.n:6:28:6:42: error: in argument #2 (f) of Nemerle.Utility.NArray.ConvertTo.[System.Object, ?], needed a System.Object -> ?, got Class1: Class1 is not a subtype of System.Object -> ? [simple require]
test.n:6:1:6:4: error: expected array [Class1], got array [Class1]+ in type-enforced expression
>Exit code: 1

D:\>ncc -V
Nemerle Compiler (ncc) version 0.9.3.99 (SVN)
(c) 2003-2005 University of Wroclaw, All rights reserved.