pointer: simplify

Author: scivision

src/pointer/main.c

@@ -20,6 +20,9 @@ int main(void)
     return 1;
   }
 
+  free(a);
+  free(b);
+
   printf("OK: C to Fortran pointer\n");
   return 0;
 }

src/pointer/main.cpp

@@ -1,23 +1,24 @@
 #include <iostream>
-#include <vector>
 
 extern "C" void point23(float [], float [], size_t*);
 
 
 int main()
 {
+  size_t N = 3;
+  auto a = new float[N]{0, 1, 2};
+  auto b = new float[N-1];
 
-  std::vector<float> a = {0, 1, 2};
-  auto N = a.size();
-  std::vector<float> b(2);
-
-  point23(&a.front(), &b.front(), &N);
+  point23(&a[0], &b[0], &N);
 
   if (b[0] != a[1] || b[1] != a[2]){
     std::cerr << "value " <<  b[0] << "!=" << a[1] << " or " << b[1] << "!=" << a[2] << std::endl;
     return EXIT_FAILURE;
   }
 
+  delete[] a;
+  delete[] b;
+
   std::cout << "OK: C++ to Fortran pointer" << std::endl;
   return EXIT_SUCCESS;
 }