update swig on windows

winx64/bin/swigwin-4.0.0/Examples/test-suite/r_overload_array.i

@@ -0,0 +1,21 @@
+%module r_overload_array
+
+%include <stl.i>
+// this tests the situation in which there is a scalar function
+// corresponding with a vector one
+
+%inline %{
+class Foo {
+public:
+  double bar(double w) {return w;};
+  double bar(double *w) {return w[0];}
+  double bar(std::vector<double> w) {return w[0];}
+
+  int bar_int(int w) {return w;}
+  int bar_int(int *w) {return w[0];}
+  int bar_int(std::vector<int> w) {return w[0];}
+};
+%}
+
+
+