Remove obscure mpointer example and replace with member_pointer.i testcase and runtime examples

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@9887 626c5289-ae23-0410-ae9c-e8d60b6d4f22

Examples/ruby/check.list

@@ -11,7 +11,6 @@ import
 import_template
 java
 mark_function
-mpointer
 multimap
 operator
 overloading

Examples/ruby/mpointer/Makefile

@@ -1,20 +0,0 @@
-TOP        = ../..
-SWIG       = $(TOP)/../preinst-swig
-CXXSRCS    = example.cxx
-TARGET     = example
-INTERFACE  = example.i
-LIBS       = -lm
-SWIGOPT    =
-
-all::
-	$(MAKE) -f $(TOP)/Makefile CXXSRCS='$(CXXSRCS)' SWIG='$(SWIG)' \
-	TARGET='$(TARGET)' INTERFACE='$(INTERFACE)' ruby_cpp
-
-static::
-	$(MAKE) -f $(TOP)/Makefile CXXSRCS='$(CXXSRCS)' SWIG='$(SWIG)' \
-	TARGET='myruby' INTERFACE='$(INTERFACE)' ruby_cpp_static
-
-clean::
-	$(MAKE) -f $(TOP)/Makefile ruby_clean
-
-check: all

Examples/ruby/mpointer/example.cxx

@@ -1,48 +0,0 @@
-/* File : example.c */
-
-#include "example.h"
-#include <math.h>
-#ifndef M_PI
-#  define M_PI 3.14159265358979323846
-#endif
-
-/* Move the shape to a new location */
-void Shape::move(double dx, double dy) {
-  x += dx;
-  y += dy;
-}
-
-int Shape::nshapes = 0;
-
-double Circle::area(void) {
-  return M_PI*radius*radius;
-}
-
-double Circle::perimeter(void) {
-  return 2*M_PI*radius;
-}
-
-double Square::area(void) {
-  return width*width;
-}
-
-double Square::perimeter(void) {
-  return 4*width;
-}
-
-double do_op(Shape *s, double (Shape::*m)(void)) {
-  return (s->*m)();
-}
-
-double (Shape::*areapt())(void) {
-  return &Shape::area;
-}
-
-double (Shape::*perimeterpt())(void) {
-  return &Shape::perimeter;
-}
-
-/* Member pointer variables */
-double (Shape::*areavar)(void) = &Shape::area;
-double (Shape::*perimetervar)(void) = &Shape::perimeter;
-

Examples/ruby/mpointer/example.h

@@ -1,47 +0,0 @@
-/* File : example.h */
-
-class Shape {
-public:
-  Shape() {
-    nshapes++;
-  }
-  virtual ~Shape() {
-    nshapes--;
-  };
-  double  x, y;   
-  double  *z;
-
-  void    move(double dx, double dy);
-  virtual double area(void) = 0;
-  virtual double perimeter(void) = 0;
-  static  int nshapes;
-};
-
-class Circle : public Shape {
-private:
-  double radius;
-public:
-  Circle(double r) : radius(r) { };
-  virtual double area(void);
-  virtual double perimeter(void);
-};
-  
-class Square : public Shape {
-private:
-  double width;
-public:
-  Square(double w) : width(w) { };
-  virtual double area(void);
-  virtual double perimeter(void);
-};
-
-extern double do_op(Shape *s, double (Shape::*m)(void));
-
-/* Functions that return member pointers */
-
-extern double (Shape::*areapt())(void);
-extern double (Shape::*perimeterpt())(void);
-
-/* Global variables that are member pointers */
-extern double (Shape::*areavar)(void);
-extern double (Shape::*perimetervar)(void);

Examples/ruby/mpointer/example.i

@@ -1,15 +0,0 @@
-/* File : example.i */
-%module example
-
-%{
-#include "example.h"
-%}
-
-/* Let's just grab the original header file here */
-%include "example.h"
-
-/* Some constants */
-
-%constant double (Shape::*AREAPT)(void) = &Shape::area;
-%constant double (Shape::*PERIMPT)(void) = &Shape::perimeter;
-%constant double (Shape::*NULLPT)(void) = 0;

Examples/ruby/mpointer/runme.rb

@@ -1,48 +0,0 @@
-# Example using pointers to member functions
-
-require 'example'
-
-# Get the pointers
-
-area_pt = Example::areapt
-perim_pt = Example::perimeterpt
-
-puts "area_pt  = #{area_pt}"
-puts "perim_pt = #{perim_pt}"
-
-# Create some objects
-
-c = Example::Circle.new(4)
-s = Example::Square.new(10)
-
-# Do some calculations
-
-puts "Circle area  = #{Example::do_op(c, area_pt)}"
-puts "Circle perim = #{Example::do_op(c, perim_pt)}"
-puts "Square area  = #{Example::do_op(s, area_pt)}"
-puts "Square perim = #{Example::do_op(s, perim_pt)}"
-
-puts "areavar      = #{Example::areavar}"
-puts "perimetervar = #{Example::perimetervar}"
-
-# Try the variables
-puts "Circle area  = #{Example::do_op(c, Example::areavar)}"
-puts "Circle perim = #{Example::do_op(c, Example::perimetervar)}"
-puts "Square area  = #{Example::do_op(s, Example::areavar)}"
-puts "Square perim = #{Example::do_op(s, Example::perimetervar)}"
-
-# Modify one of the variables
-Example::areavar = perim_pt
-
-puts "Circle perimeter = #{Example::do_op(c, Example::areavar)}"
-
-# Try the constants
-
-puts "Example::AREAPT = #{Example::AREAPT}"
-puts "Example::PERIMPT= #{Example::PERIMPT}"
-puts "Example::NULLPT = #{Example::NULLPT}"
-
-puts "Circle area  = #{Example::do_op(c, Example::AREAPT)}"
-puts "Circle perim = #{Example::do_op(c, Example::PERIMPT)}"
-puts "Square area  = #{Example::do_op(s, Example::AREAPT)}"
-puts "Square perim = #{Example::do_op(s, Example::PERIMPT)}"