FreeChainXenon/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

intrinsic.texi (IANY): Correct section title.

Browse source 
2010-12-31  Janus Weil  <janus@gcc.gnu.org>

	* intrinsic.texi (IANY): Correct section title.
	(IALL, IANY, IPARITY): Fix example codes.

From-SVN: r168380
This commit is contained in:
Janus Weil 2010-12-31 18:06:53 +01:00
parent 2871536fc3
commit e17c65c260
2 changed files with 11 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gcc/fortran/ChangeLog
View file

@ -1,3 +1,8 @@
2010-12-31 Janus Weil <janus@gcc.gnu.org>
* intrinsic.texi (IANY): Correct section title.
(IALL, IANY, IPARITY): Fix example codes.
2010-12-31 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/47065

12
gcc/fortran/intrinsic.texi
View file

@ -5966,7 +5966,7 @@ PROGRAM test_iall
INTEGER(1) :: a(2)
a(1) = b'00100100'
a(1) = b'01101010'
a(2) = b'01101010'
! prints 00100000
PRINT '(b8.8)', IALL(a)
@ -6028,7 +6028,7 @@ END PROGRAM
@node IANY
@section @code{IANY} --- Bitwise XOR of array elements
@section @code{IANY} --- Bitwise OR of array elements
@fnindex IANY
@cindex array, OR
@cindex bits, OR of array elements
@ -6074,9 +6074,9 @@ PROGRAM test_iany
INTEGER(1) :: a(2)
a(1) = b'00100100'
a(1) = b'01101010'
a(2) = b'01101010'
! prints 01111011
! prints 01101110
PRINT '(b8.8)', IANY(a)
END PROGRAM
@end smallexample
@ -6755,9 +6755,9 @@ PROGRAM test_iparity
INTEGER(1) :: a(2)
a(1) = b'00100100'
a(1) = b'01101010'
a(2) = b'01101010'
! prints 10111011
! prints 01001110
PRINT '(b8.8)', IPARITY(a)
END PROGRAM
@end smallexample