f77 unformatted write bug

[PFENNIGE at uni2a.unige.ch]

What's wrong with this f77 program?  All the fortran compilers I know of
accept it and run it properly, except the one of Sun that at run time ends
with a segmentation violation (signal 11 code 3).

	Daniel Pfenniger

----------------------------------------------------------------------------
	real a(10000)
	write (1) a
	end
----------------------------------------------------------------------------