Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!cornell!uw-beaver!rice!sun-spots-request
From: ecn!marcel@nluug.nl (Marcel Bernards)
Newsgroups: comp.sys.sun
Subject: FORTRAN 1.1 SUNOS 4.0 with 6 patches still buggy !
Keywords: SunOS
Message-ID: <3983@kalliope.rice.edu>
Date: 20 Jun 89 10:54:37 GMT
Sender: usenet@rice.edu
Organization: Sun-Spots
Lines: 55
Approved: Sun-Spots@rice.edu
X-Sun-Spots-Digest: Volume 8, Issue 42, message 8 of 11

Hello SUN managers,

We got still trouble with FORTRAN 1.1 with the 6 patches applied.
it is a internal read problem with blank chars.
It causes to hang up the processor for tty input thats never coming
(except for ^C ;-( ) 
Perfmeter is on 100% CPU consumption.

Machine  : SUN 3/50
OS       : SUNOS 4.0
Language : SUN FORTRAN 1.1 With patches applied in libs

#include blanks.f
----------------INCLUDE-------------
	program blanks

c
c--- test internal read ( string to number )
c--- if only blanks in string then processor is waiting !!!!!
c--- YECH!
c
	character   string*10
	integer     number
c
c--- read string from stdin keyboard
c
 10	PRINT *,' Type sting between quotes'
 	READ *,string
c
c--- read a string into an integer 
c 	
 	READ( string,*,ERR=999 ) number

 	PRINT *,' NUMBER : ',number
 	goto 10
c
c--- here print the string if conversion failes
c 	
 999	PRINT *,' STRING : ',string
 	goto 10
c
c---
c
 	end
--------- END of INCLUDE --------

Anyone has an idea if this one is a bug or a feature ??
one of our programmers encountered this one!!

Greetings 

Marcel Bernards, UNIX & Net sysadm Netherlands Energy Research Foundation ECN
P.O. Box 1, 1755 ZG Petten, PHONE: 09 312246 4342 EARN/BITNET:ESU0130@HPEENR51 
EMAIL: marcel%ecn@{nluug.nl,uunet.uu.net},marcel@ecn.uucp ..!hp4nl!ecn!marcel
SCREAMNet : AAAAAARGHH!HUH?? : Disclaimer: "The AntiChrist is the Computer !"