COBOL Manual for TNS/E Programs (H06.03+)

Creating and Compiling HP COBOL Source
Programs
HP COBOL Manual for TNS/E Programs—520347-003
22-50
Compilation Summary
3. mov r52=r37
3. add r20=536,sp
3. ld8 r38=[r20]
3. nop
3. nop
3. nop
3. mov r53=r38
3. add r20=544,sp
3. ld8 r39=[r20]
3. nop
3. nop
3. nop
3. mov r54=r39
3. add r20=552,sp
3. ld8 r40=[r20]
3. nop
3. nop
3. nop
3. mov r55=r40
3. add r20=560,sp
3. ld8 r41=[r20]
3. nop
3. mov r56=r41
3. nop
3. br.call.sptk b0=COBLIB_INITIALIZATION_COMPLETE_#
3. add r20=496,sp
3. ld8 r34=[r20]
3. nop
3. nop
3. nop
3. mov gp=r34
3. add r35=64,sp
3. st4 [r35]=r0
3. nop
3. add r36=@ltoff(__PUCB__TESTT#),gp
3. ld8 r37=[r36]
3. nop
3. add r38=30,r37
3. ld2 r39=[r38]
3. nop
3. nop
3. nop
3. zxt2 r40=r39
3. add r41=32768,r0
3. and r42=r40,r41
3. nop
3. cmp4.ne p8,p0=r42,r0
3. add r19=0,r0
3. (p8) add r19=1,r0
3. add r20=568,sp
3. st8 [r20]=r19
3. nop
3. nop
3. nop
Example 22-20. Symbolic Code Listing (page 3 of 23)