Re: Re: Trouble with floats in Postgresql

>>
>> Just as another data point, I can't reproduce this bug with CLSQL
>> 3.5.7 and Postgresql 8.0.7 (SBCL 0.9.12, linux/x86).

Here the results of my try with 3.5.7, Postgresql 8.1.x 
SBCL 0.9.12.5 (Debian AMD64 unstable)
DB> (def-view-class t1 ()
      ((val :type float :accessor val)))
#<CLSQL-SYS::STANDARD-DB-CLASS T1>

DB> (defun test-t1 ()
      (drop-table 't1)
      (create-view-from-class 't1)
      (let ((obj (make-instance 't1)))
        (setf (val obj) 0.07)
        (update-records-from-instance obj)
        (let ((fobj (car (select 't1 :flatp t))))
          (val fobj))))
TEST-T1
DB> (test-t1)
0.0d0

Regards
Friedrich