Two built-in functions are available in HP Pascal/HP-UX.
roundlong |
 |
The roundlong function returns the longint value of the argument,
rounded to the nearest integer.
If x is positive or zero,
roundlong(x) is equivalent to trunclong(x+0.50);
otherwise,
roundlong(x) is equivalent to trunclong(x-0.50).
It is an error if the result is greater than 263-1 or less than -263.
where x is any real or longreal expression.
trunclong |
 |
The trunclong function returns the longint value of the argument,
with any fraction truncated.
The absolute value of the result is
not greater than the absolute value of x.
It is an error if the result is greater than 263-1 or less than -263.
where x any real or longreal expression.