Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
ensembl-gh-mirror
ensembl
Commits
78bc40f3
Commit
78bc40f3
authored
Jun 21, 2018
by
Marek Szuba
Browse files
Add some MicroRNA-specific tests to the RNAProduct test suite
parent
33c8d0e9
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
27 additions
and
1 deletion
+27
-1
modules/t/rnaProduct.t
modules/t/rnaProduct.t
+27
-1
No files found.
modules/t/rnaProduct.t
View file @
78bc40f3
...
...
@@ -20,6 +20,7 @@ use strict;
use
warnings
;
use
Bio::EnsEMBL::Test::
TestUtils
;
use
Bio::EnsEMBL::
MicroRNA
;
use
Bio::EnsEMBL::
RNAProduct
;
use
Bio::EnsEMBL::
Transcript
;
...
...
@@ -297,10 +298,35 @@ cmp_ok(scalar @$rp_exts, '>', 0, 'Can fetch RNAProduct by external ID');
# TODO: More RNAProductAdaptor tests
# Test generic_count(), inherited method from BaseAdaptor
is
(
$rp_a
->
generic_count
(),
@
{
$rp_a
->
list_dbIDs
()},
"
Number of features from generic_count is equal to the number of dbIDs from list_dbIDs
");
#
# MicroRNA-specific tests
#
subtest
'
MicroRNA tests
'
=>
sub
{
my
$mirna
;
$mirna
=
Bio::EnsEMBL::
MicroRNA
->
new
();
ok
(
$mirna
,
'
MicroRNA constructor works without arguments
');
isa_ok
(
$mirna
,
'
Bio::EnsEMBL::MicroRNA
',
'
miRNA object from new()
');
$mirna
=
Bio::EnsEMBL::
MicroRNA
->
new
(
-
SEQ_START
=>
314
,
-
ARM
=>
3
);
ok
(
$mirna
,
'
MicroRNA constructor works with arguments
');
is
(
$mirna
->
arm
(),
3
,
'
MicroRNA-specific parameters set OK
');
is
(
$mirna
->
start
(),
314
,
'
Generic RNAProduct parameters set OK
');
$mirna
=
$rp_a
->
fetch_by_dbID
(
1
);
ok
(
$mirna
,
'
Can fetch MicroRNA from RNAProductAdaptor
');
isa_ok
(
$mirna
,
'
Bio::EnsEMBL::MicroRNA
',
'
miRNA object from RNAProductAdaptor
');
isnt
(
$mirna
->
arm
(),
undef
,
'
Can retrieve miRNA arm value from DB
');
};
done_testing
();
1
;
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment