view run/mini/virtcall2.d @ 1630:d0efa3ae5522 default tip

run/mini/naked_asm5: New x86_64 ABI passes the arguments in reverse order.
author David Nadlinger <code@klickverbot.at>
date Sat, 23 Apr 2011 22:57:32 +0200
parents c6ef09dfba4d
children
line wrap: on
line source

enum {
 COMMON,
 INPUT,
 OUTPUT,
 CONDUIT,
 OTHER
}

interface Common
{ int common(); }

interface Input : Common
{ int input(); }

interface Output : Common
{ int output(); }

interface Conduit : Input, Output
{ abstract int conduit(); }

class Abstract : Conduit
{
  abstract int conduit();
  abstract int output();
  abstract int input();
  int common() { return COMMON; }
}

interface Other
{ int other(); }

class Impl : Abstract, Other
{
  int conduit() { return CONDUIT; }
  int output() { return OUTPUT; }
  int other() { return OTHER; }
  int input() { return INPUT; }
}

void main()
{
  auto impl = new Impl;
  
  {
    auto i = impl;
    assert(i.common() == COMMON);
    assert(i.input() == INPUT);
    assert(i.output() == OUTPUT);
    assert(i.conduit() == CONDUIT);
    assert(i.other() == OTHER);
  }
  
  {
    Abstract i = impl;
    assert(i.common() == COMMON);
    assert(i.input() == INPUT);
    assert(i.output() == OUTPUT);
    assert(i.conduit() == CONDUIT);
  }
  
  {
    Conduit i = impl;
    assert(i.common() == COMMON);
    assert(i.input() == INPUT);
    assert(i.output() == OUTPUT);
    assert(i.conduit() == CONDUIT);
  }

  {
    Output i = impl;
    assert(i.output() == OUTPUT);
  }
  
  {
    Common i = impl;
    assert(i.common() == COMMON);
  }  
}