Changeset: 41c4ae1558f5 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=41c4ae1558f5
Modified Files:
monetdb5/mal/mal_builder.c
monetdb5/mal/mal_builder.h
Branch: Jan2014
Log Message:
Added missing interface function.
diffs (40 lines):
diff --git a/monetdb5/mal/mal_builder.c b/monetdb5/mal/mal_builder.c
--- a/monetdb5/mal/mal_builder.c
+++ b/monetdb5/mal/mal_builder.c
@@ -223,6 +223,18 @@ pushLng(MalBlkPtr mb, InstrPtr q, lng va
}
InstrPtr
+pushSht(MalBlkPtr mb, InstrPtr q, sht val)
+{
+ int _t;
+ ValRecord cst;
+
+ cst.vtype= TYPE_sht;
+ cst.val.shval= val;
+ _t = defConstant(mb,TYPE_sht,&cst);
+ return pushArgument(mb, q, _t);
+}
+
+InstrPtr
pushDbl(MalBlkPtr mb, InstrPtr q, dbl val)
{
int _t;
diff --git a/monetdb5/mal/mal_builder.h b/monetdb5/mal/mal_builder.h
--- a/monetdb5/mal/mal_builder.h
+++ b/monetdb5/mal/mal_builder.h
@@ -34,12 +34,13 @@ mal_export InstrPtr newRaiseStmt(MalBlkP
mal_export InstrPtr newExitStmt(MalBlkPtr mb, str nme);
mal_export InstrPtr newReturnStmt(MalBlkPtr mb);
mal_export InstrPtr newFcnCall(MalBlkPtr mb, char *mod, char *fcn);
+mal_export InstrPtr pushSht(MalBlkPtr mb, InstrPtr q, sht val);
mal_export InstrPtr pushInt(MalBlkPtr mb, InstrPtr q, int val);
+mal_export InstrPtr pushLng(MalBlkPtr mb, InstrPtr q, lng val);
mal_export InstrPtr pushWrd(MalBlkPtr mb, InstrPtr q, wrd val);
mal_export InstrPtr pushBte(MalBlkPtr mb, InstrPtr q, bte val);
mal_export InstrPtr pushOid(MalBlkPtr mb, InstrPtr q, oid val);
mal_export InstrPtr pushVoid(MalBlkPtr mb, InstrPtr q);
-mal_export InstrPtr pushLng(MalBlkPtr mb, InstrPtr q, lng val);
mal_export InstrPtr pushDbl(MalBlkPtr mb, InstrPtr q, dbl val);
mal_export InstrPtr pushFlt(MalBlkPtr mb, InstrPtr q, flt val);
mal_export InstrPtr pushStr(MalBlkPtr mb, InstrPtr q, const char *val);
_______________________________________________
checkin-list mailing list
[email protected]
https://www.monetdb.org/mailman/listinfo/checkin-list
