diff --git a/trunk/prec.f90 b/trunk/prec.f90
index 3d4b1abb0..5aef6e736 100644
--- a/trunk/prec.f90
+++ b/trunk/prec.f90
@@ -8,7 +8,7 @@
 !    *** Precision of real and integer variables ***
  integer, parameter :: pReal = selected_real_kind(15,300)  ! 15 significant digits, up to 1e+-300
  integer, parameter :: pInt  = selected_int_kind(9)        ! up to +- 1e9
- integer, parameter :: pLongInt  = 4                       ! should be 64bit
+ integer, parameter :: pLongInt  = 8                       ! should be 64bit
 
 
  type :: p_vec