Changeset: 0d38a7e161f8 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=0d38a7e161f8
Modified Files:
monetdb5/modules/mal/bbp.c
monetdb5/modules/mal/bbp.mal
Branch: default
Log Message:
Move bbp to :oid headed
diffs (44 lines):
diff --git a/monetdb5/modules/mal/bbp.c b/monetdb5/modules/mal/bbp.c
--- a/monetdb5/modules/mal/bbp.c
+++ b/monetdb5/modules/mal/bbp.c
@@ -784,9 +784,10 @@ CMDbbpGetObjects(Client cntxt, MalBlkPtr
(void) cntxt;
(void) mb; /* fool compiler */
OpenBox("getObjects");
- b = BATnew(TYPE_int, TYPE_str, BBPsize);
+ b = BATnew(TYPE_void, TYPE_str, BBPsize);
if (b == 0)
throw(MAL, "bbp.getObjects", INTERNAL_OBJ_CREATE);
+ BATseqbase(b,0);
for (i = 0; i < box->sym->vtop; i++) {
v = &box->val->stk[i];
BUNins(b, &v->val.bval, getVarName(box->sym, i), FALSE);
diff --git a/monetdb5/modules/mal/bbp.mal b/monetdb5/modules/mal/bbp.mal
--- a/monetdb5/modules/mal/bbp.mal
+++ b/monetdb5/modules/mal/bbp.mal
@@ -18,7 +18,7 @@ comment "Enter a new bat into the bbp bo
pattern deposit(name:str,loc:str) :bat[:oid,:any_2]
address CMDbbpbindDefinition
comment "Relate a logical name to a physical BAT in the buffer pool.";
-command commit(b:bat[:any_1,:any_2]):void
+command commit(b:bat[:oid,:any_2]):void
address CMDbbpSubCommit
comment "Commit updates for single BAT.";
pattern commit():void
@@ -82,14 +82,14 @@ command expand(b:bat[:oid,:any_2],fnme:s
address CMDbbpexpand
comment "Expand a compressed image of BAT heaps";
-pattern getObjects():bat[:int,:str]
+pattern getObjects():bat[:oid,:str]
address CMDbbpGetObjects
comment "View of the box content.";
# @+ BAT buffer pool
# The following list of operations permits inspection of the
# buffer pool
-command getIndex(b:bat[:any_1,:any_2]):int
+command getIndex(b:bat[:oid,:any_2]):int
address CMDbbpgetIndex
comment "Retrieve the index in the BBP";
command getType() :bat[:oid,:str]
_______________________________________________
Checkin-list mailing list
[email protected]
http://mail.monetdb.org/mailman/listinfo/checkin-list
