Commit 01b962be authored by Leo Gordon's avatar Leo Gordon
Browse files

added support for stringification/destringification of accumulated values (an...

added support for stringification/destringification of accumulated values (an element is allowed to be a complex structure)
parent 5047b48a
......@@ -23,6 +23,7 @@ use strict;
use Scalar::Util ('weaken');
use Bio::EnsEMBL::Utils::Argument ('rearrange');
use Bio::EnsEMBL::Hive::Utils ('stringify');
sub new {
my $class = shift @_;
......@@ -106,7 +107,7 @@ sub dataflow {
'receiving_job_id' => $receiving_job_id,
'struct_name' => $struct_name,
'key_signature' => $key_signature,
'value' => $output_id->{$struct_name},
'value' => stringify( $output_id->{$struct_name} ),
};
}
......
......@@ -23,6 +23,8 @@ package Bio::EnsEMBL::Hive::DBSQL::AccumulatorAdaptor;
use strict;
use Bio::EnsEMBL::Hive::Utils ('destringify');
use base ('Bio::EnsEMBL::Hive::DBSQL::NakedTableAdaptor');
......@@ -40,7 +42,9 @@ sub fetch_structures_for_job_id {
my %structures = ();
ROW: while(my ($struct_name, $key_signature, $value) = $sth->fetchrow() ) {
ROW: while(my ($struct_name, $key_signature, $stringified_value) = $sth->fetchrow() ) {
my $value = destringify($stringified_value);
my $sptr = \$structures{$struct_name};
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment