NonStop S-Series Server Description Manual (G06.24+)

TNS Instruction Set Definition
HP NonStop S-Series Server Description Manual—520331-003
C-21
Instruction Definitions
0 0 0 2 6 0 CQA convert quad to ASCII
cc(FEDC);
FEDC := abs(FEDC);
B:=B+A;
while A<>0 do
{B:=B-1;
bytedest(B):= %60+abs(FEDC) mod 10;
FEDC:=FEDC/10;
A:=A-1
};
V:=if FEDC=0 then 0 else 1;
RP:=RP-6
0 0 0 2 6 1 CAQV convert ASCII to quad with initial value
DCBA - initial value
V:=0;
N:=1;
while E<>0 and V=0 and N=1 do
{ccb(t:=bytedest(F));
if N=1 then
{DCBA:=DCBA*10 + t&%17;
V:=if DCBA<=2**63-1 then
0
else 1;
F:=F+1;
E:=E-1
}
};
cc(E) !cce if entire string
!is ASCII digits.
!ccg if not.
Note: initial value (DCBA)
should be positive.
0 0 0 2 6 2 CAQ convert ASCII to quad
RP:=RP+4;
DCBA:=0;
V:=0;
N:=1;
while E<>0 and V=0 and N=1 do
{ccb(t:=bytedest(F));
if N=1 then
{DCBA:=DCBA*10 + t&%17;
V:=if DCBA<=2**63-1
then 0 else 1;
F:=F+1;
E:=E-1
}
};
cc(E) !cce if entire string is ASCII digits.
!ccg if not.
0 0 0 2 6 3 QRND quad round
DCBA:=(if DCBA<0 then DCBA-5
else DCBA+5) / 10;
V:=0;
cc(DCBA)
0 0 0 2 6 4 CQI convert quad to integer
V:=if -2**15 <=DCBA<= 2**15-1
then 0 else 1;
D:=A; RP:=RP-3;
Table C-2. Instruction Definitions (page11of38)