From owner-sc22wg5+sc22wg5-dom8=www.open-std.org@open-std.org  Mon Dec 23 22:35:01 2013
Return-Path: <owner-sc22wg5+sc22wg5-dom8=www.open-std.org@open-std.org>
X-Original-To: sc22wg5-dom8
Delivered-To: sc22wg5-dom8@www.open-std.org
Received: by www.open-std.org (Postfix, from userid 521)
	id 5815C3582DB; Mon, 23 Dec 2013 22:35:01 +0100 (CET)
Delivered-To: sc22wg5@open-std.org
Received: from ppsw-33.csi.cam.ac.uk (ppsw-33.csi.cam.ac.uk [131.111.8.133])
	by www.open-std.org (Postfix) with ESMTP id 23C42356D54
	for <sc22wg5@open-std.org>; Mon, 23 Dec 2013 22:34:59 +0100 (CET)
X-Cam-AntiVirus: no malware found
X-Cam-ScannerInfo: http://www.cam.ac.uk/cs/email/scanner/
Received: from hermes-2.csi.cam.ac.uk ([131.111.8.54]:50576)
	by ppsw-33.csi.cam.ac.uk (smtp.hermes.cam.ac.uk [131.111.8.157]:25)
	with esmtpa (EXTERNAL:nmm1) id 1VvD9O-0004hQ-hX (Exim 4.82_3-c0e5623) for sc22wg5@open-std.org
	(return-path <nmm1@hermes.cam.ac.uk>); Mon, 23 Dec 2013 21:34:58 +0000
Received: from prayer by hermes-2.csi.cam.ac.uk (hermes.cam.ac.uk)
	with local (PRAYER:nmm1) id 1VvD9O-0006op-ET (Exim 4.72) for sc22wg5@open-std.org
	(return-path <nmm1@hermes.cam.ac.uk>); Mon, 23 Dec 2013 21:34:58 +0000
Received: from [146.90.11.180] by old-webmail.hermes.cam.ac.uk
	with HTTP (Prayer-1.3.5); 23 Dec 2013 21:34:58 +0000
Date: 23 Dec 2013 21:34:58 +0000
From: "N.M. Maclaren" <nmm1@cam.ac.uk>
To: sc22wg5 <sc22wg5@open-std.org>
Subject: Re: [ukfortran] (SC22WG5.5168) (j3.2006)    [ Draft corrigendum 3]
Message-ID: <Prayer.1.3.5.1312232134580.25745@hermes-2.csi.cam.ac.uk>
In-Reply-To: <20131223195610.E662635830E@www.open-std.org>
References: <20131126013542.D88A93582CC@www.open-std.org>
 <20131220171849.090F03582F4@www.open-std.org>
 <20131222004843.861D635835A@www.open-std.org>
 <1387678359.20328.7.camel@van-laptop>
 <20131222162956.B9CCF3583E4@www.open-std.org>
 <20131223195610.E662635830E@www.open-std.org>
X-Mailer: Prayer v1.3.5
Mime-Version: 1.0
Content-Type: text/plain; format=flowed; charset=ISO-8859-1
Sender: owner-sc22wg5@open-std.org
Precedence: bulk

On Dec 23 2013, Van Snyder wrote:
>
>In the 1970's and 1980's, Caine, Farber and Gordon were selling a
>structured Fortran preprocessor called S-Fortran.  When Fortran 90 was
>finally available, there wasn't much use for it (or Ratfor or SFtran or
>any of the others).  But... they also sold a product called the
>Structuring Engine, that would turn "spaghetti code" into S-Fortran.
>Unfortunately, that went away also.
>
>Are there still any structuring engines available?

Some colleagues of mine have a Haskell program that will turn some
GOTO spaghetti into IF-THEN-ELSE and loops.  There are some others
around, but few are more than research projects.

Regards,
Nick Maclaren.