MonetDB: Dec2016 - Add some casts.

[Sjoerd Mullender]

Changeset: 034f77350093 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=034f77350093
Modified Files:
        sql/backends/monet5/sql_cast_impl_int.h
Branch: Dec2016
Log Message:

Add some casts.


diffs (24 lines):

diff --git a/sql/backends/monet5/sql_cast_impl_int.h 
b/sql/backends/monet5/sql_cast_impl_int.h
--- a/sql/backends/monet5/sql_cast_impl_int.h
+++ b/sql/backends/monet5/sql_cast_impl_int.h
@@ -48,7 +48,7 @@ FUN(do_,TP1,_dec2dec_,TP2) (TP2 *restric
                        GDKfree(buf);
                        return msg;
                }
-               val *= scales[s2 - s1];
+               val *= (TP1) scales[s2 - s1];
        } else if (s2 < s1) {
                if (val / scales[s1 - s2] <= GDKmin(TP2) ||
                    val / scales[s1 - s2] > GDKmax(TP2)) {
@@ -75,9 +75,9 @@ FUN(do_,TP1,_dec2dec_,TP2) (TP2 *restric
        *res = (TP2) val;
 #else
        if (s2 > s1) {
-               r *= scales[s2 - s1];
+               r *= (TP2) scales[s2 - s1];
        } else if (s2 < s1) {
-               r = (TP1) ((r
+               r = (TP2) ((r
 #ifndef TRUNCATE_NUMBERS
                              + (val < 0 ? -5 : 5) * scales[s1 - s2 - 1]
 #endif
_______________________________________________
checkin-list mailing list
checkin-list@monetdb.org
https://www.monetdb.org/mailman/listinfo/checkin-list