Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.2 9/18/84; site peora.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!mhuxr!mhuxn!ihnp4!qantel!hplabs!tektronix!uw-beaver!cornell!vax135!petsd!peora!jer
From: jer@peora.UUCP (J. Eric Roskos)
Newsgroups: net.bizarre
Subject: Re: Bizarre Code
Message-ID: <1582@peora.UUCP>
Date: Thu, 5-Sep-85 12:52:10 EDT
Article-I.D.: peora.1582
Posted: Thu Sep  5 12:52:10 1985
Date-Received: Sun, 8-Sep-85 16:25:04 EDT
References: <462@moncol.UUCP> <29712@lanl.ARPA>
Organization: Perkin-Elmer SDC, Orlando, Fl.
Lines: 20

> The most bizarre code I ever had to program follows (in FORTRAN)
>
> 100 IF (IREQ.EQ.0) GO TO 100

That's not so bizarre... reminds me of some code in the DEC OS/8 boot loader
(I think it was for the RK8/E):

	jmp     .

The way it worked was that the jmp was at the starting address for the code
being loaded; the program would initiate the I/O operation, then sit there
looping.  When the I/O completed, some new code would appear there, and
it would start off running again...
-- 
Shyy-Anzr:  J. Eric Roskos
UUCP:       ..!{decvax,ucbvax,ihnp4}!vax135!petsd!peora!jer
US Mail:    MS 795; Perkin-Elmer SDC;
	    2486 Sand Lake Road, Orlando, FL 32809-7642

	Uryc!  Gurl'er cnvagvat zl bssvpr oyhr!  Jung n qrcerffvat pbybe...