Changeset: fd903434188a for MonetDB URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=fd903434188a Modified Files: clients/Tests/exports.stable.out gdk/gdk_storage.c monetdb5/mal/Tests/tst233.stable.out monetdb5/mal/Tests/tst234.stable.out monetdb5/mal/Tests/tst235.stable.out monetdb5/modules/mal/Tests/inspect05.mal monetdb5/modules/mal/Tests/inspect05.stable.out.int128 monetdb5/modules/mal/mal_io.c monetdb5/modules/mal/mal_io.h monetdb5/modules/mal/mal_io.mal Branch: default Log Message:
Weeding out the various table printing options. We keep for the time being the BAT approach to print tables. The corresponding code BATmultiprintf still can be reduced in complexity. diffs (truncated from 437 to 300 lines): diff --git a/clients/Tests/exports.stable.out b/clients/Tests/exports.stable.out --- a/clients/Tests/exports.stable.out +++ b/clients/Tests/exports.stable.out @@ -1298,12 +1298,8 @@ str INSPECTgetkind(Client cntxt, MalBlkP str INSPECTshowFunction(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr p); str INSPECTshowFunction3(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr p); str INSPECTtypeName(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci); -str IOdatafile(str *ret, str *fnme); str IOexport(bit *ret, bat *bid, str *fnme); -str IOfotable(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci); -str IOftable(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci); str IOimport(bat *ret, bat *bid, str *fnme); -str IOotable(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci); str IOprintBoth(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci, int indx, str hd, str tl, int nobat); str IOprint_tables(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr p); str IOprint_val(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr p); @@ -1312,8 +1308,6 @@ str IOprintfStream(Client cntxt, MalBlkP str IOprompt_val(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci); str IOtable(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci); str IOtableAll(stream *f, Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci, int i, int order, int printhead, int printorder); -str IOtotable(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci); -str IOttable(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci); str ITRbunIterator(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci); str ITRbunNext(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci); str ITRnewChunk(lng *res, bat *vid, bat *bid, lng *granule); diff --git a/gdk/gdk_storage.c b/gdk/gdk_storage.c --- a/gdk/gdk_storage.c +++ b/gdk/gdk_storage.c @@ -1102,6 +1102,11 @@ BATmultiprintf(stream *s, int argc, BAT assert(argc >= 2); assert(order < argc); assert(order >= 0); + // the only flags used so far + assert(printhead == TRUE); + assert(order == 0); + assert(printorder == TRUE); + argc--; if ((bats = GDKzalloc((argc + 1) * sizeof(BAT *))) == NULL) return GDK_FAIL; diff --git a/monetdb5/mal/Tests/tst233.stable.out b/monetdb5/mal/Tests/tst233.stable.out --- a/monetdb5/mal/Tests/tst233.stable.out +++ b/monetdb5/mal/Tests/tst233.stable.out @@ -25,7 +25,7 @@ function user.dir():void; dl := bbp.getLRefCount(); dn := bbp.getNames(); ds := algebra.subsort(dn,false,false); - io.table(ds,d,dl); + io.print(ds,d,dl); end user.dir; function user.tmp1(b:bat[:any_1,:any_2]):void; end user.tmp1; diff --git a/monetdb5/mal/Tests/tst234.stable.out b/monetdb5/mal/Tests/tst234.stable.out --- a/monetdb5/mal/Tests/tst234.stable.out +++ b/monetdb5/mal/Tests/tst234.stable.out @@ -25,7 +25,7 @@ function user.dir():void; dl := bbp.getLRefCount(); dn := bbp.getNames(); ds := algebra.subsort(dn,false,false); - io.table(ds,d,dl); + io.print(ds,d,dl); end user.dir; function user.tmp1(b:bat[:any_1,:any_2]):bat[:any_1,:any_2]; tmp1 := algebra.copy(b); diff --git a/monetdb5/mal/Tests/tst235.stable.out b/monetdb5/mal/Tests/tst235.stable.out --- a/monetdb5/mal/Tests/tst235.stable.out +++ b/monetdb5/mal/Tests/tst235.stable.out @@ -24,7 +24,7 @@ function user.dir():void; dl := bbp.getLRefCount(); dn := bbp.getNames(); ds := algebra.subsort(dn,false,false); - io.table(ds,d,dl); + io.print(ds,d,dl); end user.dir; function user.createBAT(name:str):bat[:oid,:int]; res := bat.new(:oid,:int); diff --git a/monetdb5/modules/mal/Tests/inspect05.mal b/monetdb5/modules/mal/Tests/inspect05.mal --- a/monetdb5/modules/mal/Tests/inspect05.mal +++ b/monetdb5/modules/mal/Tests/inspect05.mal @@ -13,5 +13,5 @@ a0:= algebra.leftfetchjoin(m0,a); (fv,forder):= algebra.subsort(f0,false,true); -io.table(1,fv,k0,m1,s0,a0); +io.print(fv,k0,m1,s0,a0); diff --git a/monetdb5/modules/mal/Tests/inspect05.stable.out.int128 b/monetdb5/modules/mal/Tests/inspect05.stable.out.int128 --- a/monetdb5/modules/mal/Tests/inspect05.stable.out.int128 +++ b/monetdb5/modules/mal/Tests/inspect05.stable.out.int128 @@ -32,85 +32,85 @@ function user.main():void; a := inspect.getAddresses(); a0 := algebra.leftfetchjoin(m0,a); (fv,forder) := algebra.subsort(f0,false,true); - io.table(1,fv,k0,m1,s0,a0); + io.print(fv,k0,m1,s0,a0); end user.main; #--------------------------# # t t t t t # name # str str str str str # type #--------------------------# -[ "append", "command", "bat", "(i:bat[:oid,:any_1],u:any_1):bat[:oid,:any_1] ", "BKCappend_val_wrap;" ] -[ "append", "command", "bat", "(tt:int,heapfile:str):bat[:oid,:any_1] ", "BKCattach;" ] -[ "append", "command", "bat", "(i:bat[:oid,:any_1],u:any_1,force:bit):bat[:oid,:any_1] ", "BKCappend_val_force_wrap;" ] -[ "append", "command", "bat", "(i:bat[:oid,:any_1],u:bat[:oid,:any_1],force:bit):bat[:oid,:any_1] ", "BKCappend_force_wrap;" ] -[ "attach", "command", "bat", "(i:bat[:oid,:any_1],u:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCappend_wrap;" ] -[ "delete", "command", "bat", "(sz:wrd):bat[:oid,:oid] ", "BKCdensebat;" ] -[ "delete", "command", "bat", "(b:bat[:oid,:any_1],src:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCdelete_bat_bun;" ] -[ "delete", "command", "bat", "(b:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCdelete_all;" ] -[ "densebat", "command", "bat", "(b:bat[:oid,:any_1],h:oid):bat[:oid,:any_1] ", "BKCdelete;" ] -[ "getAccess", "command", "bat", "(b:bat[:oid,:any_1]):str ", "BKCgetBBPname;" ] -[ "getCapacity", "command", "bat", "(b:bat[:oid,:any_1]):oid ", "BKCgetSequenceBase;" ] -[ "getColumnType", "command", "bat", "(b:bat[:oid,:any_1]):str ", "BKCgetAccess;" ] -[ "getName", "command", "bat", "(bid:bat[:oid,:any_1]):str ", "BKCgetRole;" ] -[ "getRole", "command", "bat", "(b:bat[:oid,:any_1]):str ", "BKCgetColumnType;" ] -[ "getSequenceBase", "command", "bat", "(b:bat[:oid,:any_1]):lng ", "BKCgetCapacity;" ] -[ "getSize", "command", "bat", "(b:bat[:oid,:any_1]):lng ", "BKCgetSize;" ] -[ "imprints", "command", "bat", "(b:bat[:oid,:hge]):lng ", "CMDBATimprintsize;" ] -[ "imprints", "command", "bat", "(b:bat[:oid,:hge]):void ", "CMDBATimprints;" ] -[ "imprints", "command", "bat", "(b:bat[:oid,:dbl]):lng ", "CMDBATimprintsize;" ] -[ "imprints", "command", "bat", "(b:bat[:oid,:flt]):lng ", "CMDBATimprintsize;" ] -[ "imprints", "command", "bat", "(b:bat[:oid,:lng]):lng ", "CMDBATimprintsize;" ] -[ "imprints", "command", "bat", "(b:bat[:oid,:int]):lng ", "CMDBATimprintsize;" ] -[ "imprints", "command", "bat", "(b:bat[:oid,:sht]):lng ", "CMDBATimprintsize;" ] -[ "imprintsize", "command", "bat", "(b:bat[:oid,:bte]):lng ", "CMDBATimprintsize;" ] -[ "imprintsize", "command", "bat", "(b:bat[:oid,:dbl]):void ", "CMDBATimprints;" ] -[ "imprintsize", "command", "bat", "(b:bat[:oid,:flt]):void ", "CMDBATimprints;" ] -[ "imprintsize", "command", "bat", "(b:bat[:oid,:lng]):void ", "CMDBATimprints;" ] -[ "imprintsize", "command", "bat", "(b:bat[:oid,:int]):void ", "CMDBATimprints;" ] -[ "imprintsize", "command", "bat", "(b:bat[:oid,:sht]):void ", "CMDBATimprints;" ] -[ "imprintsize", "command", "bat", "(b:bat[:oid,:bte]):void ", "CMDBATimprints;" ] -[ "info", "command", "bat", "(a:bat[:oid,:oid],b:bat[:oid,:oid]):bat[:oid,:oid] ", "BKCintersectcand;" ] -[ "intersectcand", "command", "bat", "(b1:bat[:oid,:any_1],b2:bat[:oid,:any_2]):bit ", "BKCisSynced;" ] -[ "isPersistent", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCisPersistent;" ] -[ "isSorted", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCisTransient;" ] -[ "isSortedReverse", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCisSortedReverse;" ] -[ "isSynced", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCisSorted;" ] -[ "isTransient", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCgetKey;" ] -[ "isaKey", "command", "bat", "(b:bat[:oid,:any_1]) (X_2:bat[:oid,:str],X_3:bat[:oid,:str]) ", "BKCinfo;" ] -[ "mergecand", "command", "bat", "(a:bat[:oid,:oid],b:bat[:oid,:oid]):bat[:oid,:oid] ", "BKCmergecand;" ] -[ "mirror", "command", "bat", "(b:bat[:any_1,:any_2]):bat[:any_1,:any_1] ", "BKCmirror;" ] -[ "new", "command", "bat", "(nme:str):bat[:oid,:any_1] ", "CMDBATderivedByName;" ] -[ "new", "pattern", "bat", "(b:bat[:oid,:any_1],size:lng):bat[:oid,:any_1] ", "CMDBATnewDerived;" ] -[ "new", "pattern", "bat", "(b:bat[:oid,:any_1]):bat[:oid,:any_1] ", "CMDBATnewDerived;" ] -[ "new", "pattern", "bat", "(ht:oid,tt:any_1,size:lng):bat[:oid,:any_1] ", "CMDBATnew_persistent;" ] -[ "new", "pattern", "bat", "(ht:oid,tt:any_1,size:int):bat[:oid,:any_1] ", "CMDBATnew_persistent;" ] -[ "new", "pattern", "bat", "(ht:oid,tt:any_1):bat[:oid,:any_1] ", "CMDBATnew_persistent;" ] -[ "new_persistent", "pattern", "bat", "(ht:oid,tt:any_1,size:lng):bat[:oid,:any_1] ", "CMDBATnew;" ] -[ "new_persistent", "pattern", "bat", "(ht:oid,tt:any_1,size:int):bat[:oid,:any_1] ", "CMDBATnew;" ] -[ "new_persistent", "pattern", "bat", "(ht:oid,tt:any_1):bat[:oid,:any_1] ", "CMDBATnew;" ] -[ "order", "command", "bat", "(b:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCorder_rev;" ] -[ "orderReverse", "command", "bat", "(b:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCorder;" ] -[ "partition", "pattern", "bat", "(b:bat[:oid,:any_1],pieces:int,n:int):bat[:oid,:any_1] ", "CMDBATpartition2;" ] -[ "partition", "pattern", "bat", "(b:bat[:oid,:any_1]):bat[:oid,:any_1]... ", "CMDBATpartition;" ] -[ "replace", "command", "bat", "(b:bat[:oid,:any_1],del:bat[:oid,:oid]):bat[:oid,:oid] ", "BKCreuseBATmap;" ] -[ "replace", "command", "bat", "(b:bat[:oid,:any_1],del:bat[:oid,:oid]):bat[:oid,:any_1] ", "BKCreuseBAT;" ] -[ "replace", "command", "bat", "(b:bat[:oid,:any_1],rid:bat[:oid,:oid],val:bat[:oid,:any_1],force:bit):bat[:oid,:any_1] ", "BKCbat_inplace_force;" ] -[ "replace", "command", "bat", "(b:bat[:oid,:any_1],rid:bat[:oid,:oid],val:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCbat_inplace;" ] -[ "reuse", "command", "bat", "(b:bat[:oid,:any_1],h:oid,t:any_1,force:bit):bat[:oid,:any_1] ", "BKCbun_inplace_force;" ] -[ "reuseMap", "command", "bat", "(b:bat[:oid,:any_1],h:oid,t:any_1):bat[:oid,:any_1] ", "BKCbun_inplace;" ] -[ "reverse", "command", "bat", "(b:bat[:any_1,:any_2]):bat[:any_2,:any_1] ", "BKCreverse;" ] -[ "save", "pattern", "bat", "(val:any_1):bat[:oid,:any_1] ", "CMDBATsingle;" ] -[ "save", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCsetImprints;" ] -[ "setAccess", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCsetHash;" ] -[ "setColumn", "command", "bat", "(nme:str):bit ", "BKCsave;" ] -[ "setColumn", "command", "bat", "(nme:bat[:oid,:any_1]):void ", "BKCsave2;" ] -[ "setHash", "command", "bat", "(b:bat[:oid,:any_1]):void ", "BKCsetPersistent;" ] -[ "setImprints", "command", "bat", "(b:bat[:oid,:any_1]):void ", "BKCsetTransient;" ] -[ "setKey", "command", "bat", "(b:bat[:oid,:any_1],h:str,t:str):void ", "BKCsetColumns;" ] -[ "setName", "command", "bat", "(b:bat[:oid,:any_1],t:str):void ", "BKCsetColumn;" ] -[ "setPersistent", "command", "bat", "(b:bat[:oid,:any_1],h:str,t:str):void ", "BKCsetRole;" ] -[ "setRole", "command", "bat", "(b:bat[:oid,:any_1],s:str):void ", "BKCsetName;" ] -[ "setTransient", "command", "bat", "(b:bat[:oid,:any_1],mode:str):bat[:oid,:any_1] ", "BKCsetAccess;" ] -[ "single", "command", "bat", "(b:bat[:oid,:any_1],mode:bit):bat[:oid,:any_1] ", "BKCsetkey;" ] +[ 0@0, "append", "command", "bat", "(i:bat[:oid,:any_1],u:any_1):bat[:oid,:any_1] ", "BKCappend_val_wrap;" ] +[ 1@0, "append", "command", "bat", "(tt:int,heapfile:str):bat[:oid,:any_1] ", "BKCattach;" ] +[ 2@0, "append", "command", "bat", "(i:bat[:oid,:any_1],u:any_1,force:bit):bat[:oid,:any_1] ", "BKCappend_val_force_wrap;" ] +[ 3@0, "append", "command", "bat", "(i:bat[:oid,:any_1],u:bat[:oid,:any_1],force:bit):bat[:oid,:any_1] ", "BKCappend_force_wrap;" ] +[ 4@0, "attach", "command", "bat", "(i:bat[:oid,:any_1],u:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCappend_wrap;" ] +[ 5@0, "delete", "command", "bat", "(sz:wrd):bat[:oid,:oid] ", "BKCdensebat;" ] +[ 6@0, "delete", "command", "bat", "(b:bat[:oid,:any_1],src:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCdelete_bat_bun;" ] +[ 7@0, "delete", "command", "bat", "(b:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCdelete_all;" ] +[ 8@0, "densebat", "command", "bat", "(b:bat[:oid,:any_1],h:oid):bat[:oid,:any_1] ", "BKCdelete;" ] +[ 9@0, "getAccess", "command", "bat", "(b:bat[:oid,:any_1]):str ", "BKCgetBBPname;" ] +[ 10@0, "getCapacity", "command", "bat", "(b:bat[:oid,:any_1]):oid ", "BKCgetSequenceBase;" ] +[ 11@0, "getColumnType", "command", "bat", "(b:bat[:oid,:any_1]):str ", "BKCgetAccess;" ] +[ 12@0, "getName", "command", "bat", "(bid:bat[:oid,:any_1]):str ", "BKCgetRole;" ] +[ 13@0, "getRole", "command", "bat", "(b:bat[:oid,:any_1]):str ", "BKCgetColumnType;" ] +[ 14@0, "getSequenceBase", "command", "bat", "(b:bat[:oid,:any_1]):lng ", "BKCgetCapacity;" ] +[ 15@0, "getSize", "command", "bat", "(b:bat[:oid,:any_1]):lng ", "BKCgetSize;" ] +[ 16@0, "imprints", "command", "bat", "(b:bat[:oid,:hge]):lng ", "CMDBATimprintsize;" ] +[ 17@0, "imprints", "command", "bat", "(b:bat[:oid,:hge]):void ", "CMDBATimprints;" ] +[ 18@0, "imprints", "command", "bat", "(b:bat[:oid,:dbl]):lng ", "CMDBATimprintsize;" ] +[ 19@0, "imprints", "command", "bat", "(b:bat[:oid,:flt]):lng ", "CMDBATimprintsize;" ] +[ 20@0, "imprints", "command", "bat", "(b:bat[:oid,:lng]):lng ", "CMDBATimprintsize;" ] +[ 21@0, "imprints", "command", "bat", "(b:bat[:oid,:int]):lng ", "CMDBATimprintsize;" ] +[ 22@0, "imprints", "command", "bat", "(b:bat[:oid,:sht]):lng ", "CMDBATimprintsize;" ] +[ 23@0, "imprintsize", "command", "bat", "(b:bat[:oid,:bte]):lng ", "CMDBATimprintsize;" ] +[ 24@0, "imprintsize", "command", "bat", "(b:bat[:oid,:dbl]):void ", "CMDBATimprints;" ] +[ 25@0, "imprintsize", "command", "bat", "(b:bat[:oid,:flt]):void ", "CMDBATimprints;" ] +[ 26@0, "imprintsize", "command", "bat", "(b:bat[:oid,:lng]):void ", "CMDBATimprints;" ] +[ 27@0, "imprintsize", "command", "bat", "(b:bat[:oid,:int]):void ", "CMDBATimprints;" ] +[ 28@0, "imprintsize", "command", "bat", "(b:bat[:oid,:sht]):void ", "CMDBATimprints;" ] +[ 29@0, "imprintsize", "command", "bat", "(b:bat[:oid,:bte]):void ", "CMDBATimprints;" ] +[ 30@0, "info", "command", "bat", "(a:bat[:oid,:oid],b:bat[:oid,:oid]):bat[:oid,:oid] ", "BKCintersectcand;" ] +[ 31@0, "intersectcand", "command", "bat", "(b1:bat[:oid,:any_1],b2:bat[:oid,:any_2]):bit ", "BKCisSynced;" ] +[ 32@0, "isPersistent", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCisPersistent;" ] +[ 33@0, "isSorted", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCisTransient;" ] +[ 34@0, "isSortedReverse", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCisSortedReverse;" ] +[ 35@0, "isSynced", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCisSorted;" ] +[ 36@0, "isTransient", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCgetKey;" ] +[ 37@0, "isaKey", "command", "bat", "(b:bat[:oid,:any_1]) (X_2:bat[:oid,:str],X_3:bat[:oid,:str]) ", "BKCinfo;" ] +[ 38@0, "mergecand", "command", "bat", "(a:bat[:oid,:oid],b:bat[:oid,:oid]):bat[:oid,:oid] ", "BKCmergecand;" ] +[ 39@0, "mirror", "command", "bat", "(b:bat[:any_1,:any_2]):bat[:any_1,:any_1] ", "BKCmirror;" ] +[ 40@0, "new", "command", "bat", "(nme:str):bat[:oid,:any_1] ", "CMDBATderivedByName;" ] +[ 41@0, "new", "pattern", "bat", "(b:bat[:oid,:any_1],size:lng):bat[:oid,:any_1] ", "CMDBATnewDerived;" ] +[ 42@0, "new", "pattern", "bat", "(b:bat[:oid,:any_1]):bat[:oid,:any_1] ", "CMDBATnewDerived;" ] +[ 43@0, "new", "pattern", "bat", "(ht:oid,tt:any_1,size:lng):bat[:oid,:any_1] ", "CMDBATnew_persistent;" ] +[ 44@0, "new", "pattern", "bat", "(ht:oid,tt:any_1,size:int):bat[:oid,:any_1] ", "CMDBATnew_persistent;" ] +[ 45@0, "new", "pattern", "bat", "(ht:oid,tt:any_1):bat[:oid,:any_1] ", "CMDBATnew_persistent;" ] +[ 46@0, "new_persistent", "pattern", "bat", "(ht:oid,tt:any_1,size:lng):bat[:oid,:any_1] ", "CMDBATnew;" ] +[ 47@0, "new_persistent", "pattern", "bat", "(ht:oid,tt:any_1,size:int):bat[:oid,:any_1] ", "CMDBATnew;" ] +[ 48@0, "new_persistent", "pattern", "bat", "(ht:oid,tt:any_1):bat[:oid,:any_1] ", "CMDBATnew;" ] +[ 49@0, "order", "command", "bat", "(b:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCorder_rev;" ] +[ 50@0, "orderReverse", "command", "bat", "(b:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCorder;" ] +[ 51@0, "partition", "pattern", "bat", "(b:bat[:oid,:any_1],pieces:int,n:int):bat[:oid,:any_1] ", "CMDBATpartition2;" ] +[ 52@0, "partition", "pattern", "bat", "(b:bat[:oid,:any_1]):bat[:oid,:any_1]... ", "CMDBATpartition;" ] +[ 53@0, "replace", "command", "bat", "(b:bat[:oid,:any_1],del:bat[:oid,:oid]):bat[:oid,:oid] ", "BKCreuseBATmap;" ] +[ 54@0, "replace", "command", "bat", "(b:bat[:oid,:any_1],del:bat[:oid,:oid]):bat[:oid,:any_1] ", "BKCreuseBAT;" ] +[ 55@0, "replace", "command", "bat", "(b:bat[:oid,:any_1],rid:bat[:oid,:oid],val:bat[:oid,:any_1],force:bit):bat[:oid,:any_1] ", "BKCbat_inplace_force;" ] +[ 56@0, "replace", "command", "bat", "(b:bat[:oid,:any_1],rid:bat[:oid,:oid],val:bat[:oid,:any_1]):bat[:oid,:any_1] ", "BKCbat_inplace;" ] +[ 57@0, "reuse", "command", "bat", "(b:bat[:oid,:any_1],h:oid,t:any_1,force:bit):bat[:oid,:any_1] ", "BKCbun_inplace_force;" ] +[ 58@0, "reuseMap", "command", "bat", "(b:bat[:oid,:any_1],h:oid,t:any_1):bat[:oid,:any_1] ", "BKCbun_inplace;" ] +[ 59@0, "reverse", "command", "bat", "(b:bat[:any_1,:any_2]):bat[:any_2,:any_1] ", "BKCreverse;" ] +[ 60@0, "save", "pattern", "bat", "(val:any_1):bat[:oid,:any_1] ", "CMDBATsingle;" ] +[ 61@0, "save", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCsetImprints;" ] +[ 62@0, "setAccess", "command", "bat", "(b:bat[:oid,:any_1]):bit ", "BKCsetHash;" ] +[ 63@0, "setColumn", "command", "bat", "(nme:str):bit ", "BKCsave;" ] +[ 64@0, "setColumn", "command", "bat", "(nme:bat[:oid,:any_1]):void ", "BKCsave2;" ] +[ 65@0, "setHash", "command", "bat", "(b:bat[:oid,:any_1]):void ", "BKCsetPersistent;" ] +[ 66@0, "setImprints", "command", "bat", "(b:bat[:oid,:any_1]):void ", "BKCsetTransient;" ] +[ 67@0, "setKey", "command", "bat", "(b:bat[:oid,:any_1],h:str,t:str):void ", "BKCsetColumns;" ] +[ 68@0, "setName", "command", "bat", "(b:bat[:oid,:any_1],t:str):void ", "BKCsetColumn;" ] +[ 69@0, "setPersistent", "command", "bat", "(b:bat[:oid,:any_1],h:str,t:str):void ", "BKCsetRole;" ] +[ 70@0, "setRole", "command", "bat", "(b:bat[:oid,:any_1],s:str):void ", "BKCsetName;" ] +[ 71@0, "setTransient", "command", "bat", "(b:bat[:oid,:any_1],mode:str):bat[:oid,:any_1] ", "BKCsetAccess;" ] +[ 72@0, "single", "command", "bat", "(b:bat[:oid,:any_1],mode:bit):bat[:oid,:any_1] ", "BKCsetkey;" ] # 08:55:30 > # 08:55:30 > Done. diff --git a/monetdb5/modules/mal/mal_io.c b/monetdb5/modules/mal/mal_io.c --- a/monetdb5/modules/mal/mal_io.c +++ b/monetdb5/modules/mal/mal_io.c @@ -152,12 +152,6 @@ IOprint_val(Client cntxt, MalBlkPtr mb, } str -IOprint_tables(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr p) -{ - return IOtableAll(cntxt->fdout, cntxt, mb, stk, p, 1, 0, FALSE, TRUE); -} - -str IOprompt_val(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci) { return IOprintBoth(cntxt, mb, stk, pci, 1, 0, 0, 1); @@ -533,8 +527,8 @@ IOprintfStream(Client cntxt, MalBlkPtr m * The table printing routine implementations rely on the multiprintf. * They merely differ in destination and order prerequisite */ -str -IOtableAll(stream *f, Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci, int i, int order, int printhead, int printorder) +static str +IOtableAll(stream *f, Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci, int i) { BAT *piv[MAXPARAMS], *b; int nbats = 0; @@ -559,60 +553,18 @@ IOtableAll(stream *f, Client cntxt, MalB piv[nbats++] = b; } /*if(printhead) */ nbats++; - BATmultiprintf(f, nbats, piv, printhead, order, printorder); + BATmultiprintf(f, nbats, piv, TRUE, 0, TRUE); for (k = 0; k < nbats - 1; k++) BBPunfix(piv[k]->batCacheid); return MAL_SUCCEED; } str -IOotable(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci) +IOtable(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci) { - int order; - order = *getArgReference_int(stk, pci, 1); - return IOtableAll(cntxt->fdout, cntxt, mb, stk, pci, 2, order, TRUE, TRUE); + return IOtableAll(cntxt->fdout, cntxt, mb, stk, pci, 1); } -str -IOtable(Client cntxt, MalBlkPtr mb, MalStkPtr stk, InstrPtr pci) -{ _______________________________________________ checkin-list mailing list checkin-list@monetdb.org https://www.monetdb.org/mailman/listinfo/checkin-list