[BioRuby-cvs] bioruby/test/unit/bio/db/embl test_common.rb, NONE, 1.1

[Mitsuteru C. Nakao]

Update of /home/repository/bioruby/bioruby/test/unit/bio/db/embl
In directory pub.open-bio.org:/tmp/cvs-serv4178/test/unit/bio/db/embl

Added Files:
	test_common.rb 
Log Message:
* Initially imported unit test for Bio::EMBLDB::Common.


--- NEW FILE: test_common.rb ---
#
# test/unit/bio/db/embl/common.rb - Unit test for Bio::EMBL::COMMON module
#
#   Copyright (C) 2005 Mitsuteru Nakao <n at bioruby.org>
#
#  This library is free software; you can redistribute it and/or
#  modify it under the terms of the GNU Lesser General Public
#  License as published by the Free Software Foundation; either
#  version 2 of the License, or (at your option) any later version.
#
#  This library is distributed in the hope that it will be useful,
#  but WITHOUT ANY WARRANTY; without even the implied warranty of
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
#  Lesser General Public License for more details.
#
#  You should have received a copy of the GNU Lesser General Public
#  License along with this library; if not, write to the Free Software
#  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307  USA
#
#  $Id: test_common.rb,v 1.1 2005/10/27 09:37:22 nakao Exp $
#

require 'pathname'
libpath = Pathname.new(File.join(File.dirname(__FILE__), ['..'] * 5, 'lib')).cleanpath.to_s
$:.unshift(libpath) unless $:.include?(libpath)

require 'test/unit'
require 'bio/db/embl/common'


module Bio

  class EMBL_API
    include Bio::EMBLDB::Common
  end


  class TestEMBLCommon < Test::Unit::TestCase

    def setup
      @obj = Bio::EMBLDB::Common
    end

    def test_ac
      assert(@obj.instance_methods.find {|x| x ==  'ac' })
    end

    def test_accessions
      assert(@obj.instance_methods.find {|x| x ==  'accessions' })
    end
    
    def test_accession
      assert(@obj.instance_methods.find {|x| x ==  'accession' })
    end

    def test_de
      assert(@obj.instance_methods.find {|x| x ==  'de' })
    end
    
    def test_description
      assert(@obj.instance_methods.find {|x| x ==  'description' })
    end

    def test_definition
      assert(@obj.instance_methods.find {|x| x ==  'definition' })
    end

    def test_os
      assert(@obj.instance_methods.find {|x| x ==  'os' })
    end

    def test_og
      assert(@obj.instance_methods.find {|x| x ==  'og' })
    end
    
    def test_oc
      assert(@obj.instance_methods.find {|x| x ==  'oc' })
    end
    
    def test_kw
      assert(@obj.instance_methods.find {|x| x ==  'kw' })
    end

    def test_keywords
      assert(@obj.instance_methods.find {|x| x ==  'keywords' })
    end

    def test_ref
      assert(@obj.instance_methods.find {|x| x ==  'ref' })
    end

    def test_references
      assert(@obj.instance_methods.find {|x| x ==  'references' })
    end

    def test_dr
      assert(@obj.instance_methods.find {|x| x ==  'dr' })
    end
  end


  class TestEMBLAPI < Test::Unit::TestCase

    def setup
      data =<<END
AC   A12345; B23456;
DE   Dummy data for Bio::EMBL::Common APIs.
OS   Ruby Class Library for Bioinformatics (BioRuby) (open-bio).
OC   
OG
KW
R
DR
END
      @obj = Bio::EMBL_API.new(data)
    end

    def test_ac
      assert_equal(@obj.ac, ["A12345", "B23456"])
    end

    def test_accessions
      assert_equal(@obj.accessions, ["A12345", "B23456"])
    end

  end

  
end