ADJUSTUSLF [ MPE/iX Intrinsics Reference Manual ] MPE/iX 5.0 Documentation
MPE/iX Intrinsics Reference Manual
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.
* If a negative value, the information block
is moved toward the start of the USL file,
decreasing the directory block and
increasing the information block.
Condition Codes
CCE (2) Request granted.
CCG (0) Not returned.
CCL (1) Request denied. An error number was returned to
uslferror indicating the reason for this failure.
Related Information
Intrinsics CLEANUSL, EXPANDUSLF, INITUSLF
Commands None
Manuals MPE Segmenter Reference Manual (30000-90011)
MPE/iX 5.0 Documentation