mirror of
https://github.com/pgvector/pgvector.git
synced 2026-06-06 05:51:21 +08:00
de6502ab6e
postgres/postgres@549ec20 moved to using "done_testing()" from the Perl testing framework, which removed the need to include test counts.
35 lines
1006 B
Perl
35 lines
1006 B
Perl
use strict;
|
|
use warnings;
|
|
use PostgresNode;
|
|
use TestLib;
|
|
use Test::More;
|
|
|
|
my $dim = 1024;
|
|
|
|
# Initialize node
|
|
my $node = get_new_node('node');
|
|
$node->init;
|
|
$node->start;
|
|
|
|
# Create table
|
|
$node->safe_psql("postgres", "CREATE EXTENSION vector;");
|
|
$node->safe_psql("postgres", "CREATE TABLE tst (v1 vector(1024), v2 vector(1024), v3 vector(1024));");
|
|
|
|
# Test insert succeeds
|
|
$node->safe_psql("postgres",
|
|
"INSERT INTO tst SELECT array_agg(n), array_agg(n), array_agg(n) FROM generate_series(1, $dim) n"
|
|
);
|
|
|
|
# Change storage to PLAIN
|
|
$node->safe_psql("postgres", "ALTER TABLE tst ALTER COLUMN v1 SET STORAGE PLAIN");
|
|
$node->safe_psql("postgres", "ALTER TABLE tst ALTER COLUMN v2 SET STORAGE PLAIN");
|
|
$node->safe_psql("postgres", "ALTER TABLE tst ALTER COLUMN v3 SET STORAGE PLAIN");
|
|
|
|
# Test insert fails
|
|
my ($ret, $stdout, $stderr) = $node->psql("postgres",
|
|
"INSERT INTO tst SELECT array_agg(n), array_agg(n), array_agg(n) FROM generate_series(1, $dim) n"
|
|
);
|
|
like($stderr, qr/row is too big/);
|
|
|
|
done_testing();
|