.SHORT - round to single precision.

Usage:

B:
   overflow = .short( &single, &dbl );

C:
   #equate _short .short
   int _short(float *single, double *dbl);

Where:

overflow: is set to +1 if the rounding causes exponent overflow and to -1 if it causes exponent underflow. Otherwise, "overflow" is set to zero.
single: is a word where the single precision result is to be placed.
dbl: is the first of two words containing a double precision floating point value to be rounded.

Description:

.SHORT is used to round a double precision floating point value to single precision. If floating underflow occurs during rounding, 0.0 is stored in "single". Note that you pass pointers to the memory locations where the values are stored; you do not pass the values themselves.