iso_c_binding test
public text v1 · immutable#include <iostream>
extern "C" void fooFortran();
extern "C" void fooC(int* outVal, double *ioArr) {
printf("C:fooC ioArr read as: ");
for ( int i=0; i < *outVal; i++) {
printf(" %f ", ioArr[i]);
}
printf("\n");
ioArr[0] = 42.4242;
printf("C:fooC ioArr modified to: ");
for ( int i=0; i < *outVal; i++) {
printf(" %f ", ioArr[i]);
}
printf("\n");
}
int main() {
fooFortran();
return 0;
}