From 5d9a696ba55ecf5e755b3c3c91a55cb21369ea45 Mon Sep 17 00:00:00 2001
From: Lincoln Stein <lstein@tunno.(none)>
Date: Tue, 6 Jul 2010 16:06:22 -0400
Subject: [PATCH] ported interval statistics to oracle adaptor, but not
 testedperl -cw Bio/DB/GFF/Adaptor/dbi/oracle.pmperl -cw
 Bio/DB/GFF/Adaptor/dbi/oracle.pm

---
 Bio/DB/GFF/Adaptor/dbi/oracle.pm | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

diff --git a/Bio/DB/GFF/Adaptor/dbi/oracle.pm b/Bio/DB/GFF/Adaptor/dbi/oracle.pm
index 490415f17..d9a8c47f8 100644
--- a/Bio/DB/GFF/Adaptor/dbi/oracle.pm
+++ b/Bio/DB/GFF/Adaptor/dbi/oracle.pm
@@ -492,8 +492,19 @@ index => {
 CREATE  INDEX fattribute_to_feature_fid ON fattribute_to_feature (fid,fattribute_id)
 }
 	   } # fattribute_to_feature indexes
-} # fattribute_to_feature  
+}, # fattribute_to_feature  
 
+       finterval_stats => {
+table=> q{
+CREATE TABLE "finterval_stats" (
+   "ftypeid"          integer DEFAULT '0' NOT NULL,
+   "fref"             VARCHAR(100) DEFAULT '' NOT NULL,
+   "fbin"             integer DEFAULT '0' NOT NULL,
+   "fcum_count"       integer DEFAULT '0' NOT NULL,
+   CONSTRAINT finterval_stats_pk PRIMARY KEY (ftypeid,fref,fbin)
+)
+} # finterval_stats table
+},# finterval_stats
 
 );
   return \%schema;
-- 
2.11.4.GIT