src/dynpmc/foo2.pmc

   1 /*
   2  * $Id$
   3  * Copyright (C) 2009, Parrot Foundation.
   4  */
   5
   6 /*
   7  * Sample Foo2 class used to verify dynamic loading and
   8  * proper inheritance - for testing only
   9  */
  10
  11 pmclass Foo2 dynpmc group foo_group provides scalar extends Foo auto_attrs {
  12
  13     VTABLE INTVAL get_integer() {
  14         INTVAL i = SUPER();
  15         return i + 1;
  16     }
  17 }
  18
  19
  20 /*
  21  * Local variables:
  22  *   c-file-style: "parrot"
  23  * End:
  24  * vim: expandtab shiftwidth=4:
  25  */