# Test hint bit behavior
use strict;
use warnings;
use PostgresNode;
use TestLib;
use Test::More;

my $one = get_new_node('one');
$one->init(has_archiving => 1,
	allows_streaming => 1);
$one->append_conf('postgresql.conf', 'wal_log_hints=1');
$one->start;
$one->safe_psql('postgres', 'create table t as select * from generate_series(1, 20) as g');
$one->safe_psql('postgres', 'create extension pageinspect');

$one->backup_fs_hot('bkp');

my $two = get_new_node('two');
$two->init_from_backup($one, 'bkp',
	has_streaming => 1);
$two->start;

$one->safe_psql('postgres', 'select * from t');
my $onebits = $one->safe_psql('postgres', "select lp, heap_tuple_infomask_flags(t_infomask, t_infomask2) from heap_page_items(get_raw_page('t', 0))");
$one->stop;
note $onebits;

$two->promote;
my $twobits = $two->safe_psql('postgres', "select lp, heap_tuple_infomask_flags(t_infomask, t_infomask2) from heap_page_items(get_raw_page('t', 0))");
note $twobits;
