Article View: comp.lang.asm370
Article #1066Diagnose A8
From: Rich Greenberg
Date: Wed, 23 Mar 1994 16:47
Date: Wed, 23 Mar 1994 16:47
24 lines
2493 bytes
2493 bytes
Usage of DIAGNOSE A8, general i/o.
I just converted one of my utilities that had been using DIAG 20
i/o so that it would work in XA mode. One of the conversions was
to change DIAG 20 to DIAG A8. The control block for DIAG A8 needs
the storage key of the buffer. What I did was:
LA R5,BUFFER
ISKE R2,R5
N R2,=A(X'00F0')
STC R2,SGIOKEY
What I am asking is: Is this the best way to do it? While looking up
ISKE in the POPs (Its not one I use every day) I also saw ISKV. I am not
sure if this is the instruction I should have used in the more general case.
Or is there a better scheme that I missed?
Does anyone know how far back DIAG A8 goes? I tested the NUCON bit which
says that DIAG A8 is available (same byte that says if in XA mode) and
dual pathed that part of my code back to DIAG 20. Should I have bothered?
--
Rich Greenberg Work: ETi Solutions, Oceanside & L.A. CA 310-348-7677
N6LRT TinselTown, USA Play: richgr@netcom.com 310-649-0238
Pacific time. I speak for myself and my dogs only. Canines: Chinook & Husky
Technical Details
Message-ID:
<richgrCn4Mnz.KuE@netcom.com>Path:
arc1-ca.pugleaf.net!gmd.de!newsserver.jvnc.net!yale.edu!nigel.msen.com!emory!swrinde!elroy.jpl.nasa.gov!decwrl!netcomsv!netcom.com!richgrShow Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103c88,fb28f7482f6b995c,start X-Google-Attributes: gid103c88,public X-Google-Thread: f8131,fb28f7482f6b995c,start X-Google-Attributes: gidf8131,public X-Google-ArrivalTime: 1994-03-23 08:47:59 PST Newsgroups: comp.lang.asm370,bit.listserv.vmesa-l Path: arc1-ca.pugleaf.net!gmd.de!newsserver.jvnc.net!yale.edu!nigel.msen.com!emory!swrinde!elroy.jpl.nasa.gov!decwrl!netcomsv!netcom.com!richgr From: richgr@netcom.com (Rich Greenberg) Subject: Diagnose A8 Message-ID: <richgrCn4Mnz.KuE@netcom.com> Organization: NETCOM On-line Communication Services (408 241-9760 guest) Date: Wed, 23 Mar 1994 16:47:59 GMT Lines: 24