[RFC] Full float128, third iteration

[Angelo Graziosi]

Il 10/09/2010 17.31, FX ha scritto:
>> $ gfortran-4.6 -Wall test_qp.f90 -o test_qp
>> /usr/local/gfortran/bin/../lib/gcc/i686-pc-cygwin/4.6.0/../../../libgfortran.a(write.o):(.text$write_float+0x1fc): undefined reference to `_libgfortran_dtoaq'
>> /usr/local/gfortran/bin/../lib/gcc/i686-pc-cygwin/4.6.0/../../../libgfortran.a(read.o):(.text$__gfortrani_convert_real+0x95): undefined reference to `_libgfortran_strtopQ'
>> collect2: ld returned 1 exit status
>>
>> (I have also tried adding '-L/foo/lib -lquad' and '/foo/bin' to PATH)
>>
>> What have I done of wrong?
>
> Hard to tell. Do you have those symbols defined in the libquad shared lib? (You should be able to check using "nm".)
> Also, why are you using a static library for libgfortran instead of shared library?

It seems I can build this test case

$ cat test_qp.f90
program test_qp
   implicit none
   integer, parameter :: QP = 16
   real(QP) :: x = 0.124_QP
   print *, x,precision(x),digits(x)
end program test_qp

with this workaround:

$ gfortran-4.6 test_qp.f90 -o test_qp 
/usr/local/gfortran/lib/libgfortran.a /foo/lib/libquad.a

$ ./test_qp.exe
   0.12399999999999999999999999999999999                33         113

Ciao,
Angelo.