Changeset: 98f3a3128f50 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=98f3a3128f50
Modified Files:
sql/server/rel_psm.c
Branch: SciQL-2
Log Message:
implementation fro result_type added according to default
the mserver now starts (with warnings) and the mclinet connects to it
diffs (30 lines):
diff --git a/sql/server/rel_psm.c b/sql/server/rel_psm.c
--- a/sql/server/rel_psm.c
+++ b/sql/server/rel_psm.c
@@ -641,8 +641,24 @@ sequential_block (mvc *sql, sql_subtype
static list *
result_type(mvc *sql, symbol *res)
{
- (void)*sql;
- (void)*res;
+ if (res->token == SQL_TYPE) {
+ sql_subtype *st = &res->data.lval->h->data.typeval;
+ sql_arg *a = sql_create_arg(sql->sa, "result", st, ARG_OUT);
+
+ return list_append(sa_list(sql->sa), a);
+ } else if (res->token == SQL_TABLE) {
+ sql_arg *a;
+ dnode *n = res->data.lval->h;
+ list *types = sa_list(sql->sa);
+
+ for(;n; n = n->next->next) {
+ sql_subtype *ct = &n->next->data.typeval;
+
+ a = sql_create_arg(sql->sa, n->data.sval, ct, ARG_OUT);
+ list_append(types, a);
+ }
+ return types;
+ }
return NULL;
}
_______________________________________________
checkin-list mailing list
[email protected]
https://www.monetdb.org/mailman/listinfo/checkin-list
