Another F77-3.3 Bug

[Calvin H. Vu]

In article <9006291416.aa20103 at VGR.BRL.MIL> XBR2D96D at DDATHD21.BITNET (Knobi der Rechnerschrat) writes:
>        program bug_6822
>c
>        logical*1 bla
>        logical  bla4
>c
>        bla  = .true.
>        bla4 = .true.
>        write(*,*) bla,bla4
>c
>        if(.not.bla)  write(*,*) 'bla is false'
>        if(.not.bla4) write(*,*) 'bla4 is false'
>c
>        end
>---------------------------end of t1.f-----------------------------------------

	This is introduced in MIPS 2.0 release to allow logical*1 variables
to contain integer*1 values (for VMS compatibility).  There was an oversight 
in the implementation that caused integer operations on the logical*1
variables.  This has been fixed in the 3.3 maintenance release (and in MIPS
2.10 release).

Sorry about the inconvenience.
- calvin
-----------------------------------------------------------------------------
Calvin H. Vu			   | "We are each of us angels with only one
Silicon Graphics Computer Systems  | wing.  And we can only fly embracing
calvin at sgi.com   (415) 962-3679	   | each other."