long, short (3f)

converts integer objects

Syntax

  integer*4 long, conv
  integer*2 int2
  external long
  conv = long ( int2 )

  integer*2 short, conv
  integer*4 int4
  external short
  conv = short ( int4 )

Description

  These functions provide conversion between short and long integer objects.
  The long function is useful when constants are used in calls to library
  routines and the code is to be compiled with -i2. The short function is
  useful in a similar context, when an otherwise long object must be passed
  as a short integer.