-----------------------------------

wtd

Tue Dec 12, 2006 2:07 am


Pascal/C++ TYS

-----------------------------------

Translate the following code into Pascal, in a source file called foo.pas such that it compiles with:

fpc -S2 foo

#include 

class Foo
{
   public:
      virtual int foo() const = 0;
};

class Bar : public virtual Foo
{
   public:
	  virtual int bar() const = 0;
	  virtual int baz() const;
};

class Baz : public virtual Bar
{
   public:
      Baz(int w = 1, int n = 2);
	  virtual ~Baz();
   
      virtual int foo() const;
	  virtual int bar() const;
	  
   private:
      int wooble, ninja;
};

int main()
{
   Bar *qux = new Baz(1, 3);
   
   std::cout baz()