[comp.sys.att] Fortran for 3B1 needed

lzj@mace.cc.purdue.edu (Jeffrey J Wieland) (01/08/91)

We need a 3B1 Fortran compiler.  Does anyone know what compilers exist
for the 3B1?  Did AT&T have one?  Perhaps someone has an unused copy
that they would like to sell?
--
			    Jeff Wieland
			wieland@acn.purdue.edu

thad@cup.portal.com (Thad P Floryan) (01/15/91)

jeffrey@sci.ccny.cuny.edu (Jeffrey L Bromberger)
in <1991Jan14.160257.6838@sci.ccny.cuny.edu> writes:

Re:f2c	The package comes with it's own libraries.  Really, the only thing you
	need is to put the libs in the appropriate place.  It holds the
	routines called main, f_init, and f_exit (the routines needed to make
	f77 happy in a C universe).  There are also a few other routines, I
	forget exactly which ones at this point.  But it works.

Re:SVS	If only the Fortran that does exist (SVS Fortran) would link with C,
	but it doesn't (without assembly wrappers) :-(

Oh?  Then kindly explain why the following works just fine using SVS Fortran:

	thadlabs ksh 24989/24990> cat foo.for
		INTEGER PART1, PART2, PART3
		PART1 = -1
		PART2 = 31
	C
		PART3 = IAND(PART1,PART2)
		WRITE(*,100) PART1,PART2,PART3
	100	FORMAT(I13,' .AND. ',I13,' = ',I13/)
	C
		PART3 = IOR(PART1,PART2)
		WRITE(*,200) PART1,PART2,PART3
	200	FORMAT(I13,' .OR. ',I13,' = ',I13/)
	C
		PART3 = IXOR(PART1,PART2)
		WRITE(*,300) PART1,PART2,PART3
	300	FORMAT(I13,' .XOR. ',I13,' = ',I13/)
		END
	thadlabs ksh 24989/24990> cat bitsub.c
	int IAND(arg1, arg2)
		int	*arg1, *arg2;
	{
		return(*arg1 & *arg2);
	}

	int IOR(arg1, arg2)
		int	*arg1, *arg2;
	{
		return(*arg1 | *arg2);
	}

	int IXOR(arg1, arg2)
		int	*arg1, *arg2;
	{
		return(*arg1 ^ *arg2);
	}
	thadlabs ksh 24989/24990> cat doit.sh
	fortran foo.for bitsub.o -o foo
	thadlabs ksh 24989/24990> ./foo
	           -1 .AND.            31 =            31

	           -1 .OR.            31 =            -1

	           -1 .XOR.            31 =           -32

	thadlabs ksh 24989/24990> 

Thad Floryan [ thad@cup.portal.com ]

thad@cup.portal.com (Thad P Floryan) (01/21/91)

Re: Fortran for the 3B1 ...

Besides the SVS Fortran, there's also LPI-Fortran (and LPI-C, -Pascal, -Basic,
-Cobol, -RPG II, etc.)

Re: f2c, the latest version from research.att.com is dated 18-Jan-1991

Among some other languages available for the 3B1 that haven't been mentioned
before, the ones that come to mind are:

Microsoft Basic (interpreter)
(someone's) compiled Basic
SVS Pascal
Ryan-McFarland (sp?) COBOL

Thad Floryan [ thad@cup.portal.com ]

n177ac@tamuts.tamu.edu (Daryl Biberdorf) (01/21/91)

In article <38307@cup.portal.com> thad@cup.portal.com (Thad P Floryan) writes:
>Re: Fortran for the 3B1 ...
...stuff deleted...
>Among some other languages available for the 3B1 that haven't been mentioned
>before, the ones that come to mind are:
>
>Microsoft Basic (interpreter)
>(someone's) compiled Basic
>SVS Pascal
>Ryan-McFarland (sp?) COBOL

Thad, I assume these must be purchase-able things rather than
freely distributable, but where can they be obtained?  What kinds
of prices are we looking at here?

--Daryl Biberdorf,  n177ac@tamuts.tamu.edu

thad@cup.portal.com (Thad P Floryan) (01/25/91)

n177ac@tamuts.tamu.edu (Daryl Biberdorf) in <11388@helios.TAMU.EDU> writes:

	>Microsoft Basic (interpreter)
	>(someone's) compiled Basic
	>SVS Pascal
	>Ryan-McFarland (sp?) COBOL

	Thad, I assume these must be purchase-able things rather than
	freely distributable, but where can they be obtained?  What kinds
	of prices are we looking at here?

You're correct about these (and other) being commercial products.

Probably the best of the lot are those available from LPI in Mass.  I'd
have to look up their address (at my office), but they have a complete line
of language compilers, windowing source-level debugger, common optimized
code generator, etc. for their entire product line (for the 3B1 and other
systems) which includes:

	C	Fortran		Cobol		RPG-II
	Pascal	Basic

and possibly others (by now).  Last time I checked (last year), the price
of their Fortran for the 3B1 was around $750.

To the best of my knowledge, neither Microsoft nor SVS are still selling
their products for the 3B1.  The places to find their software are such like
swap meets, flea markets, surplus stores, etc. (that's how I got Microsoft
Word, dBASE III, Supercomp 20, Multiplan, etc.)  MicroAge (last time I checked)
still had a bunch of 3B1 language and other products in stock at close to the
original retail prices (OUCH!).  And sometimes one can find software already
installed on "used" systems that one buys (that's how I got my copy of SVS
Fortran and Microsoft Basic).

The AT&T COMPUTER SOFTWARE CATALOG and the Uniforum (USENIX?  the "old"
/usr/group) UNIX Products Catalogs list a number of vendors of 3B1 products,
so it may be worthwhile to get those catalogs and call the vendors and see
if "reasonable" prices can be negotiated.

Unless you can get a GOOD price on either LPI or SVS Fortran, I'd recommend
the f2c (18-Jan-1991 version) from research.att.com which is free (and be SURE
to get the library sources!)  I just this evening printed out on a PostScript
laser printer the f2c.ps file and it's quite comprehensive (26 pages, incl.
two "man" pages)

Thad Floryan [ thad@cup.portal.com ]