Здравствуйте, FDSC, Вы писали:
FDS>Как перегрузить оператор "-" в Nemerle?
public class OpMinus
{
public static @-(left:Type1,rigth:Type2):Type3
{
}
}
Это если необходимо перегрузить бинарный...
Унарный по аналогии...
Здравствуйте, FDSC, Вы писали:
FDS>Как перегрузить оператор "-" в Nemerle?
using System;
using System.Console;
module Test
{
class Foo {
public x : int;
public this (x : int) {
this.x = x
}
public static @- (a : Foo, b : Foo) : Foo {
Foo (a.x - b.x)
}
}
public Main() : void
{
def foo1 = Foo(5);
def foo2 = Foo(3);
WriteLine((foo1 - foo2).x);
}
}
((lambda (x) (list x (list 'quote x))) '(lambda (x) (list x (list 'quote x))))