This repository was archived by the owner on Dec 10, 2024. It is now read-only.
This repository was archived by the owner on Dec 10, 2024. It is now read-only.
Cassandane unhappy on 32-bit machine #21
Closed
Description
I noticed several additional cassandane test failures when running on a 32-bit machine. Turns out that you can't use the 'Q' type in unpack on 32-bit perl. Oops.
There's one place in Cassandane/Cyrus/Metadata.pm that uses this:
if ($entry[2]) {
my ($modseq, $modtime, $flags) =
unpack("Q>Q>C", bytes::substr($entry[2], $Config{longsize}));
if ($flags and not $tombstones) {
next;
}
if ($withmdata) {
$annot->{modseq} = $modseq;
$annot->{flags} = $flags;
}
}
Some searching tells me that you can replace "Q>" with "N2" if you process the entries in the list in pairs. But I've never really gotten into Perl at this level and so this is a bit beyond me.