Error in SUPVR (was Getting RC 1)

New Message Reply Date view Thread view Subject view Author view Other groups

Subject: Error in SUPVR (was Getting RC 1)
From: Martin Truebner (Martin@pi-sysprog.de)
Date: Mon Sep 29 2008 - 03:42:39 EDT 

Chuck, et al,

the code you cite is in error.

        SLR   R8,R8               CLEAR REGISTER
        ICM   R8,2,ONE(R3)        GET HIGH ORDER BYTE
        BNM   RESFT100            THIS IS A TWO BYTE INDEX
        SLR   R8,R8               CLEAR REGISTER
    RESFT100 IC    R8,ZERO(,R3)        GET ONE BYTE PUB INDEX

for cases with a LUB pointing to a PUB at 32768 and above (- all numbers 
with 80 bit on) it uses code that will only use the low order byte of 
the index.

POP says that ICM condition-codes are set according to high order bit 
inserted (as opposed to result in register). So high order of 80 (and 
above) will only utilise the last byte.

Anyone with a SUPVR of more than 32768 devices? 


-- 
Martin
--
XML2PDF - create PDFs from within z/VSE or z/OS; more at 
http://www.pi-sysprog.de

New Message Reply Date view Thread view Subject view Author view Other groups

This archive was generated by hypermail 2b25 : Mon Oct 13 2008 - 08:20:08 EDT