changed pointer attribute to allocatable in p_vec and p_intvec

2014-06-25 16:08:49 +00:00 · 2014-06-25 16:08:49 +00:00 · 57a865c886
parent 03d1bb6b8b
commit 57a865c886
1 changed files with 2 additions and 2 deletions
--- a/code/prec.f90
+++ b/code/prec.f90
@ -53,11 +53,11 @@ module prec
 real(pReal), parameter, public :: tol_math_check = 1.0e-8_pReal                                    !< tolerance for internal math self-checks (rotation)

 type, public :: p_vec                                                                              !< variable length datatype used for storage of state
-   real(pReal), dimension(:), pointer :: p
+   real(pReal), dimension(:), allocatable :: p
 end type p_vec

 type, public :: p_intvec
-   integer(pInt), dimension(:), pointer :: p
+   integer(pInt), dimension(:), allocatable :: p
 end type p_intvec

 #ifdef NEWSTATE