diff options
Diffstat (limited to 'Examples/perl5/import/bar.h')
-rw-r--r-- | Examples/perl5/import/bar.h | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/Examples/perl5/import/bar.h b/Examples/perl5/import/bar.h new file mode 100644 index 000000000..fa4185f1f --- /dev/null +++ b/Examples/perl5/import/bar.h @@ -0,0 +1,22 @@ +#include "base.h" + +class Bar : public Base { + public: + Bar() { } + ~Bar() { } + virtual void A() { + printf("I'm Bar::A\n"); + } + void B() { + printf("I'm Bar::B\n"); + } + virtual Base *toBase() { + return static_cast<Base *>(this); + } + static Bar *fromBase(Base *b) { + return dynamic_cast<Bar *>(b); + } + +}; + + |