diff options
| author | Random Hacker <random_hacker@xapek.org> | 2012-03-08 11:29:06 +0100 |
|---|---|---|
| committer | Random Hacker <random_hacker@xapek.org> | 2012-03-08 11:29:06 +0100 |
| commit | 6dd26ef3f562d551216420b982e9f9dfc2340bd0 (patch) | |
| tree | ba701090bc44144f17bfa8c8b6cf0cd1b61e9ece /ebus-racket/db-pq.rkt | |
| parent | a84447cf9c06c2813df831b3fde105c45d02727c (diff) | |
| download | ebus-alt-6dd26ef3f562d551216420b982e9f9dfc2340bd0.tar.gz ebus-alt-6dd26ef3f562d551216420b982e9f9dfc2340bd0.zip | |
ebus-racket: db-pq: cast real to double
Diffstat (limited to 'ebus-racket/db-pq.rkt')
| -rw-r--r-- | ebus-racket/db-pq.rkt | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ebus-racket/db-pq.rkt b/ebus-racket/db-pq.rkt index 03ef154..3b15a73 100644 --- a/ebus-racket/db-pq.rkt +++ b/ebus-racket/db-pq.rkt @@ -63,7 +63,7 @@ ;; then calls 'insert` (define (insert-field sensor-name datatype offset value) (cond ((member datatype (list "data1c" "data2b" "data2c")) - (insert sensor-name "float" value)) + (insert sensor-name "float" (real->double-flonum value))) ((member datatype (list "bit" "byte" "data1b" "word" "bcd")) (insert sensor-name "int" value)) ((member datatype (list "byteEnum")) |