From 8c685e616f341221fd2682797a7d3219d5c7dcd8 Mon Sep 17 00:00:00 2001 From: Tobias Burnus Date: Wed, 18 Feb 2009 19:09:38 +0100 Subject: intrinsic.texi (MALLOC): Make example more portable. 2009-02-18 Tobias Burnus * intrinsic.texi (MALLOC): Make example more portable. From-SVN: r144266 --- gcc/fortran/intrinsic.texi | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'gcc/fortran/intrinsic.texi') diff --git a/gcc/fortran/intrinsic.texi b/gcc/fortran/intrinsic.texi index 1243795..711eecb 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) -- cgit v1.1