Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.2 9/18/84; site ut-sally.UUCP
Path: utzoo!linus!gatech!ut-sally!crandell
From: crandell@ut-sally.UUCP (Jim Crandell)
Newsgroups: net.bizarre
Subject: Re: Bizarre Code
Message-ID: <2710@ut-sally.UUCP>
Date: Mon, 19-Aug-85 20:06:16 EDT
Article-I.D.: ut-sally.2710
Posted: Mon Aug 19 20:06:16 1985
Date-Received: Wed, 21-Aug-85 06:41:34 EDT
References: <462@moncol.UUCP> <29712@lanl.ARPA>
Organization: U. Texas CS Dept., Austin, Texas
Lines: 33

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

A former colleague of mine once found it necessary to write a program
with just such a line in it for a now ancient Datacraft (now Harris)
machine.  To my taste, however, the line was not nearly so bizarre as
the object code to which the Datacrock FORTRAN compiler converted it.
This compiler was exceptionally stupid, even by the standards of its
time, to such an extent that it didn't recognize that a statement of
the form IF () GO TO