Changeset: 0e737819fa92 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=0e737819fa92
Modified Files:
        monetdb5/modules/mal/extensions.c
Branch: headless
Log Message:

Use COLelement (name may have to be changed) instead of home-brewn (and 
incorrect) COLvalue.


diffs (50 lines):

diff --git a/monetdb5/modules/mal/extensions.c 
b/monetdb5/modules/mal/extensions.c
--- a/monetdb5/modules/mal/extensions.c
+++ b/monetdb5/modules/mal/extensions.c
@@ -213,28 +213,6 @@
  * variable. If it returns zero the control variable has been reset
  * to zero and end of stream has been reached.
 */
-static ptr
-COLvalue(COL *b, oid o)
-{
-       switch( COLtype(b)){
-       case TYPE_bte:
-               return (ptr)(((bte*)COLbase(b))+o);
-       case TYPE_sht:
-               return (ptr)(((sht*)COLbase(b))+o);
-       case TYPE_int:
-               return (ptr)(((int*)COLbase(b))+o);
-       case TYPE_lng:
-               return (ptr)(((lng*)COLbase(b))+o);
-       case TYPE_flt:
-               return (ptr)(((flt*)COLbase(b))+o);
-       case TYPE_dbl:
-               return (ptr)(((dbl*)COLbase(b))+o);
-       case TYPE_str:
-               return (ptr)COLget_str(b,o);
-       default:
-               return NULL;
-       }
-}
 str
 CHPnewIterator(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci)
 {
@@ -260,7 +238,7 @@
                return MAL_SUCCEED;
        }
        *cursor = o =  COLfirst(b);
-       VALinit(val, COLtype(b), COLvalue(b, o));
+       VALinit(val, COLtype(b), COLelement(b, o));
        CBPreleaseref(b);
        return MAL_SUCCEED;
 }
@@ -292,7 +270,7 @@
                return MAL_SUCCEED;
        }
        *cursor = o;
-       VALinit(val, COLtype(b), COLvalue(b, o));
+       VALinit(val, COLtype(b), COLelement(b, o));
        CBPreleaseref(b);
        return MAL_SUCCEED;
 }
_______________________________________________
Checkin-list mailing list
[email protected]
http://mail.monetdb.org/mailman/listinfo/checkin-list

Reply via email to