scalesppmacx_fc_real_size.patch
ppm1.0.4/m4/acx_fc_real_size.m4 20170923 18:04:11.070289406 0400  

56  56 
[AC_LANG_PUSH([Fortran]) 
57  57 
AC_RUN_IFELSE(AC_LANG_PROGRAM([], 
58  58 
[ integer :: itest 
59 
real :: rtest


59 
$1 :: rtest


60  60 
integer :: integer_io_length 
61  61 
integer :: real_io_length 
62  62 
integer :: integer_bits 
...  ...  
69  69 
write(10,*)real_bits 
70  70 
close(10)]), 
71  71 
[AS_VAR_SET([acx_fortran_Sizeof], `cat conftestval`) 
72 
AS_VAR_SET([acx_fortran_Sizeof],[`expr ]AS_VAR_GET([acx_fortran_Sizeof])[ / $acx_cv_c_char_bits`])],


72 
AS_VAR_ARITH([acx_fortran_Sizeof],AS_VAR_GET([acx_fortran_Sizeof])[ / $acx_cv_c_char_bits])],


73  73 
[AS_VAR_SET([acx_fortran_Sizeof], [unavailable])]) 
74  74 
/bin/rm f conftestval 
75  75 
AC_LANG_POP([Fortran]) 