A similar one: How to determine a leap year: Q1:Is year a multiple of 4? If yes: Q2: is year a multiple of 100? If yes: Q3: is year a multiple of 400? If yes: it is a leapyear. (skipping the 'If No' branches).
Q2 and Q3 will start making sense for the first time in the history of computer programming in the year 2100. Until then Q1 would have been sufficient. How much power has been put into executing instructions to answer Q2 and Q3? If I only had a Euro for each program that has this code and will not live until 2100... Kees. -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Gerhard Postpischil Sent: Wednesday, February 12, 2014 15:08 To: [email protected] Subject: Re: Storage Obtain ..... On 2/12/2014 8:50 AM, Jim Thomas wrote: >> XR R14,R14 >> XR R15,R15 >> L R1,=AL4(WORKAREA) >> MVCL R0,R14 Minor quibble - when the from length is zero, the from register is never referenced nor inspected, so the XR R14,R14 is extraneous. (If I had a dollar for every time I've seen this, I could retire <g>). Gerhard Postpischil Bradford, Vermont ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ******************************************************** For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 ******************************************************** ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
