16-bit signed binary integer

Sample C++ usage (by Reference) Fortran subroutine

extern "FORTRAN"
{ void cfort( short int &);; }
#include <stdio.h>
main()
{
  short int x;
  x=5;
  cfort(x);
  printf ("Updated value in C: %d\n", x);
}

SUBROUTINE CFORT ( ARG )
INTEGER*2 ARG
PRINT *, 'FORTRAN ARG VALUE:', ARG
ARG = ARG + 1
END

Note: Because short int is an example of a parameter which must be passed using a C++ explicit pointer, you cannot code cfort(x), passing x by value.