CHARACTER*10 X, Y
X = '1234567890'
CALL CENTRY(X, Y)
PRINT *,
1  'VALUE RETURNED TO FORTRAN: ', Y
END

extern "FORTRAN"
{ void centry(char [10],
char [10]); }
#include <stdio.h>
#include <string.h>
void centry(char x[10],
  char y[10])
{
  printf
    ("C char array arg: %10.10s\n",x);
  memcpy(y, x, 10);
}