From 8c685e616f341221fd2682797a7d3219d5c7dcd8 Mon Sep 17 00:00:00 2001 From: Tobias Burnus Date: Wed, 18 Feb 2009 19:09:38 +0100 Subject: [PATCH] intrinsic.texi (MALLOC): Make example more portable. 2009-02-18 Tobias Burnus * intrinsic.texi (MALLOC): Make example more portable. From-SVN: r144266 --- gcc/fortran/ChangeLog | 4 ++++ gcc/fortran/intrinsic.texi | 7 ++----- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 2cd54474726b..a1be5838a73d 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2009-02-18 Tobias Burnus + + * intrinsic.texi (MALLOC): Make example more portable. + 2009-02-13 Mikael Morin PR fortran/38259 diff --git a/gcc/fortran/intrinsic.texi b/gcc/fortran/intrinsic.texi index 124379527e70..711eecbd295c 100644 --- a/gcc/fortran/intrinsic.texi +++ b/gcc/fortran/intrinsic.texi @@ -7333,15 +7333,12 @@ C pointers (@code{sizeof(void *)}). @item @emph{Example}: The following example demonstrates the use of @code{MALLOC} and -@code{FREE} with Cray pointers. This example is intended to run on -32-bit systems, where the default integer kind is suitable to store -pointers; on 64-bit systems, ptr_x would need to be declared as -@code{integer(kind=8)}. +@code{FREE} with Cray pointers. @smallexample program test_malloc + implicit none integer i - integer ptr_x real*8 x(*), z pointer(ptr_x,x) -- 2.47.2