Based on my reading of the description of the Interlocked Access Facility 2,
I'm led to assume that the following code paths are functionally equivalentt in
a multi-threaded/mutli-processing application. If I assume in error, please
feel at liberty to point out my folly.
Regards,
Keven
USING PSA,0
USING FaclData,FlceFacilitiesList
/———-/
TM FaclByte6,FaclIAF2 Got Intrlckd Access Faclty 2?
JO GOOD2GO Yes, OIL not reqhired
***
OIL FLAGS1,B'10001000',REF=FLAGSWRD Set bits w/ CS
J ONWARDS
***
GOOD2GO DS 0H
OI FLAGS1,B'10001000' Set bits
***
ONWARDS DS 0H
/———-/
FLAGSWRD DS 0F
FLAGS0 DS X
FLAGS1 DS X
DS 2X
IHAFACL ,
IHAPSAE ,
