Commit 8c685e61 by Tobias Burnus Committed by Tobias Burnus

intrinsic.texi (MALLOC): Make example more portable.

2009-02-18  Tobias Burnus  <burnus@net-b.de>

       * intrinsic.texi (MALLOC): Make example more portable.

From-SVN: r144266
parent 19e56697
2009-02-18 Tobias Burnus <burnus@net-b.de>
* intrinsic.texi (MALLOC): Make example more portable.
2009-02-13 Mikael Morin <mikael.morin@tele2.fr>
PR fortran/38259
......
......@@ -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)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment