Changeset: 8dc0889e3130 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=8dc0889e3130
Modified Files:
        sql/server/rel_exp.c
        sql/server/rel_exp.h
Branch: default
Log Message:

Made by Niels to create a list of sql_subtype from a list of sql_exp
(transplanted from 19a93582e432648ae5d89d770e77149b85d9b0d0)


diffs (35 lines):

diff --git a/sql/server/rel_exp.c b/sql/server/rel_exp.c
--- a/sql/server/rel_exp.c
+++ b/sql/server/rel_exp.c
@@ -386,6 +386,20 @@ exp_subtype( sql_exp *e )
        return NULL;
 }
 
+list *
+exps_subtype( list *l )
+{
+       node *n;
+       list *t = list_create(l->sa);
+
+       for (n = l->h; n; n = n->next) {
+               sql_exp *e = n->data;
+
+               append(t, exp_subtype(e));
+       }
+       return t;
+}
+
 char *
 exp_name( sql_exp *e )
 {
diff --git a/sql/server/rel_exp.h b/sql/server/rel_exp.h
--- a/sql/server/rel_exp.h
+++ b/sql/server/rel_exp.h
@@ -67,6 +67,7 @@ extern sql_exp* exp_label(sql_allocator 
 extern void exp_swap( sql_exp *e );
 
 extern sql_subtype * exp_subtype( sql_exp *e );
+extern list * exps_subtype( list *l );
 extern char * exp_name( sql_exp *e );
 extern char * exp_relname( sql_exp *e );
 extern char * exp_func_name( sql_exp *e );
_______________________________________________
Checkin-list mailing list
[email protected]
http://mail.monetdb.org/mailman/listinfo/checkin-list

Reply via email to