You probably meant  'L  R14,6(R4)' before the BALR.

-----Original Message-----
From: IBM Mainframe Assembler List [mailto:[email protected]] On 
Behalf Of Scott Ford
Sent: Friday, October 02, 2015 12:58 PM
To: [email protected]
Subject: Branch table

All:

I am building a branch table like this:

FUNC         DS    CL10

FUNCTBL   DS   0H
                    DC  'INIT      'A(INIT_DSP)
......etc
TBLENT      DS   F'5'

------------------------------------------------------------------------------

                    LA        R4,FUNCTBL
                    L          R5,TBLENT
LOOPTBL   DS       0H
                   CLC     FUNC,0(R4)
                   BE       FOUND_IT

FOUND_IT DS       0H
                   LA        R4,10(R4)
                   L          R14,R4
                   BALR  R14,R15


Is my logic correct ? or did i miss something ?

Regards,
Scott

Reply via email to