COMTRAN Reconstruction

J28-6169 · January 1962

90.02.11

PDF page 149 of 221. Download the scanned PDF

The page as scanned

The scan of PDF page 149 of J28-6169
Select the scan to open it at full size.

The text read off it

[90.02.11]

  1. It is set by in-line coding preceding calls upon subroutines SYS)180 or SYS)182 (see calling sequences). The in-line coding which sets the cell will be one of three forms:

Case 1. When the data item is working storage

LDI    CP)+NN
STI    SYS)132

where CP)+NN will contain the location and byte of the data item.

Case 2. When the data item is located by means of a 'simple' Base Locator. (A simple base locator is defined as one that always has byte+0).

CAL    BL)NN
ACL    CP)+NN
SLW    SYS)132

where CP)+NN is a constant of the form:

PZE WORD-DISPLACEMENT,,BYTE

Case 3. When the data item is located by means of a 'complex' Base Locator. (A complex base locator is defined as one that has Byte 0 to 5).

CAL    BL)NN
ACL    CP)+NN1     Displacement Constant
PDX    0,4
TXL    *2,4,5
ACL    CP)+NN2     OCT 777772000000
SLW    SYS)132

SYS)133

PZE LOC,,BYTE

This cell points to the first word address (LOC), and the first BYTE(0-5) of the target field involved in a Move. The cell is set by calls upon subroutines SYS)179 or SYS)180 or by means of in-line coding of the same form as described under SYS)132.

SYS)134 This cell is set non zero whenever a floating point underflow results from a Move.

SYS)155 This floating point exponential routine raises the double precision number in the AC-MQ to the single precision power located in SYS)128. The double precision result is left in the AC-MQ.