MPE/iX Intrinsics Reference Manual (32650-90905)

48 Chapter4
Command Definitions (ABORTSESS - FCLOSE)
ADJUSTUSLF
ADJUSTUSLF
NM and CM callable.
Adjusts directory space in a USL file by moving the start of the information block forward
(or backward) on a user subprogram library (USL) file, thereby increasing (or decreasing)
the space available for the file directory block. The overall length of the file does not
change. This intrinsic is intended for programmers writing compilers.
NOTE A USL contains CM object code and is meaningful only in the CM program
development process.
Syntax
I16 I16V I16V
uslferror
:=ADJUSTUSLF(
uslfnum,adjustment
);
Functional Return
uslferror
16-bit signed integer (assigned functional return)
Returns the error number if an error occurs (condition code returns CCL
(1)). If no error occurs, no value is returned. The error number returned
corresponds to the following:
Value Meaning
0 The file specified by
uslfnum
was empty, an unexpected end-of-file was
encountered while reading the
uslfnum
, or an unexpected end-of-file was
encountered while writing the
uslfnum
.
1 Unexpected I/O error occurred.
4 Request exceeds the maximum file directory size (32,768 half words).
5 Insufficient directory space.
6 Insufficient USL file information block space.
Parameters
uslfnum
16-bit signed integer by value (required)
Passes the file number of the USL file (returned by FOPEN/HPFOPEN).
increment
16-bit signed integer by value (required)
Returns the assigned record count:
If a positive value, the information block is moved toward the end-of-file
in the USL file, increasing the directory block and decreasing the
information block.