Structure with extern "C"

Sample COBOL usage C++ function
IDENTIFICATION DIVISION.
PROGRAM-ID. COBRTN.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 STRUC1.
     O5 S11 PIC S9(9) BINARY.
     05 S12 PIC S9(9) BINARY.
PROCEDURE DIVISION.
     CALL "CENTRY" RETURNING STRUC1.
     GOBACK.
END PROGRAM COBRTN.
#include <stdio.h>
struct stype {
  int S1;
  int S2;  } struc1;
extern "C" {struct stype CENTRY()

struct stype CENTRY()
}
  struc1.s1=1;
  struc1.s2=2;
  printf("%d %d \n",struc1.s1,
    struc1.s2);
  return struc1;
}