🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: alt.folklore.computers
Article #323

Re: COBOL program

#323
From: Wm E. Davidsen Jr
Date: Thu, 14 Dec 1989 23:08
25 lines
1802 bytes
In article <5...@enea.se> som...@enea.se (Erland Sommarskog) writes:

| I have actually seen such a program. It was not Cobol, but Fortran
| and it was not a repetition of 500 but of six. I don't remember
| the details, but basically the guy could have used a DO loop (or
| was it an array?) Anyway he repeated the same piece of code for
| six possibilities of the dice.
| 
| Now, he may well be forgiven. He was a young student in civil
| engineering and programming was not his main subject. This program
| was just another exam to get his degree. I was judging it and without
| a doubt I disapproved it. Apparently there was a basic concept he
| hadn't learnt about. But the sad story was when I went through the
| exams with a teacher at the CS department. (I was only an assisting
| student teacher.) And he said: "It clumsy, but it is correct; it
| would work. We can't disapprove him." He had the final say, but I 
| would even less approve that program today.

  What!!? Here he optimizes the program by unrolling a short loop and
you would disapprove it?
-- 
	bill davidsen - sysop *IX BBS and Public Access UNIX
davidsen@sixhub.uucp		...!uunet!crdgw1!sixhub!davidsen

"Getting old is bad, but it beats the hell out of the alternative" -anon
Technical Details
Message-ID: <216@sixhub.UUCP>
Path: mbox-mo1.pugleaf.net!gmdzi!unido!mcsun!uunet!crdgw1!sixhub!davidsen
References: <18494@bellcore.bellcore.com> <552@enea.se>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!gmdzi!unido!mcsun!uunet!crdgw1!sixhub!davidsen
From: davidsen@sixhub.UUCP (Wm E. Davidsen Jr)
Newsgroups: alt.folklore.computers
Subject: Re: COBOL program
Message-ID: <216@sixhub.UUCP>
Date: 14 Dec 89 23:08:04 GMT
References: <18494@bellcore.bellcore.com> <552@enea.se>
Reply-To: davidsen@sixhub.UUCP (bill davidsen)
Organization: *IX Public Access UNIX, Schenectady NY
Lines: 25
Posted: Fri Dec 15 00:08:04 1989
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit