# HG changeset patch
# User i7tiol
# Date 1366834575 0
# Node ID 5679336054453ff792b6ab20faa47a8cd0c90110
# Parent  3fd12a47467e76338005bbd2f147a06e3f14ad78
Add copy-in from variable to demos.

diff -r 3fd12a47467e -r 567933605445 main/database/DESCRIPTION
--- a/main/database/DESCRIPTION	Tue Apr 23 04:33:45 2013 +0000
+++ b/main/database/DESCRIPTION	Wed Apr 24 20:16:15 2013 +0000
@@ -1,6 +1,6 @@
 Name: database
 Version: 2.1.1
-Date: 2013-04-23
+Date: 2013-04-24
 Author: Olaf Till <i7tiol@t-online.de>
 Maintainer: Olaf Till <i7tiol@t-online.de>
 Title: Database.
diff -r 3fd12a47467e -r 567933605445 main/database/inst/pq_connect.m
--- a/main/database/inst/pq_connect.m	Tue Apr 23 04:33:45 2013 +0000
+++ b/main/database/inst/pq_connect.m	Wed Apr 24 20:16:15 2013 +0000
@@ -129,12 +129,18 @@
 %! pq_exec_params (conn, "create table complex_bool_array_array (a complex_bool_array_type[]);")
 %! pq_update_types (conn);
 %! pq_exec_params (conn, "insert into complex_bool_array_array values ($1);", {struct("ndims", 1, "data", {{{true, struct("ndims", 2, "data", {{true, false; true, true}})}; {false, struct("ndims", 1, "data", {{false; true}})}}})}, setdbopts ("param_types", {"complex_bool_array_type[]"}))
+%! data = pq_exec_params (conn, "select * from complex_bool_array_array;").data;
+%! ## copy in from variable
+%! pq_exec_params (conn, "copy complex_bool_array_array from stdin with binary;", setdbopts ("copy_in_data", data, "copy_in_from_variable", true, "copy_in_types", {"complex_bool_array_type[]"}))
 %! pq_exec_params (conn, "select * from complex_bool_array_array;")
 %! ## recursive type, composite-composite-array
 %! pq_exec_params (conn, "create type complex_complex_bool_array_type as (b bool, c complex_bool_array_type);")
-%! pq_exec_params (conn, "create table complex_complex_bool_array (a complex_complex_bool_array_type);");
+%! pq_exec_params (conn, "create table complex_complex_bool_array (a complex_complex_bool_array_type);")
 %! pq_update_types (conn);
 %! pq_exec_params (conn, "insert into complex_complex_bool_array values ($1);", {{false, {true, struct("ndims", 2, "data", {{true, false; true, true}})}}}, setdbopts ("param_types", {"complex_complex_bool_array_type"}))
+%! data = pq_exec_params (conn, "select * from complex_complex_bool_array").data;
+%! ## copy in from variable
+%! pq_exec_params (conn, "copy complex_complex_bool_array from stdin with binary;", setdbopts ("copy_in_data", data, "copy_in_from_variable", true, "copy_in_types", {"complex_complex_bool_array_type"}))
 %! pq_exec_params (conn, "select * from complex_complex_bool_array")
 %! pq_exec_params (conn, "drop table complex_complex_bool_array;")
 %! pq_exec_params (conn, "drop table complex_bool_array_array;")