Changeset 98 for trunk/spec/linguistics_spec.rb

Timestamp:

01/29/08 23:01:39 (10 months ago)

Author:

deveiant

Message:

Started update of specs and build system

Location:

trunk/spec

Files:

• . (added)
• linguistics_spec.rb (moved) (moved from trunk/tests/use.tests.rb) (3 diffs)

trunk/spec/linguistics_spec.rb

@@ -1 @@
-#!/usr/bin/ruby -w
-#
-# Unit test for the 'use' function of the Linguistics module.
-# $Id$
-#
-# Copyright (c) 2003 The FaerieMUD Consortium.
-# 
+#!/usr/bin/env spec -cfs
 
-unless defined? Linguistics::TestCase
-    testsdir = File::dirname( File::expand_path( __FILE__ ) )
-    $LOAD_PATH.unshift testsdir unless $LOAD_PATH.include?( testsdir )
+BEGIN {
+    require 'pathname'
+    basedir = Pathname.new( __FILE__ ).dirname.parent
 
-    require 'lingtestcase'
+    libdir = basedir + "lib"
+
+    $LOAD_PATH.unshift( libdir ) unless $LOAD_PATH.include?( libdir )
+}
+
+begin
+    require 'spec/runner'
+    require 'linguistics'
+rescue LoadError
+    unless Object.const_defined?( :Gem )
+        require 'rubygems'
+        retry
+    end
+    raise
 end
 
 
-### This test suite tests the language-installation function of the Linguistics
-### module.
-module Linguistics
-class UseTestCase < Linguistics::TestCase
-
-    LanguageCodes = [ :en, :EN, 'en', 'EN', 'En', 'eN' ]
-    BogusLanguageCodes = [ :zz, :ry, :qi ]
-    MissingLanguageCodes = [ :ja, :fr, :es ]
+describe Linguistics do
 
     TestArray = %w{stone stick hammer stone lantern}
@@ -28 +28 @@
     TestNumber = 5
 
-    def test_00_UseEnglish
-        printTestHeader "Linguistics: Use <language>"
+    before( :all ) do
+        Linguistics.use( :en )
+    end
 
-        # Test the only (currently) valid codes
-        LanguageCodes.each do |code|
-            assert_nothing_raised {
-                Linguistics::use( code )
-            }
+
+    it "loads a language's linguistic functions via variants of its ISO639 code" do
+
+        [:en, :EN, 'en', 'EN', 'En', 'eN'].each do |code|
+            res = Linguistics.use( code )
+            res.should have(3).members
+            res.should include(Array)
+            res.should include(String)
+            res.should include(Numeric)
         end
+    end
 
-        # Test bogus codes
-        BogusLanguageCodes.each do |code|
-            assert_raises( RuntimeError ) {
-                Linguistics::use( code )
-            }
+
+    it "raises an error when a language that doesn't exist is requested" do
+        [ :zz, :ry, :qi ].each do |code|
+            lambda { 
+                Linguistics.use( code )
+              }.should raise_error( RuntimeError, /unknown language code/i )
         end
-
-        # Test valid, but missing languages (might fail for implementors of new
-        # languages).
-        MissingLanguageCodes.each do |code|
-            assert_raises( LoadError ) {
-                Linguistics::use( code )
-            }
+    end
+    
+    
+    it "raises an error for valid languages that don't have any linguistic functions to load" do
+        [ :ja, :fr, :es ].each do |code|
+            lambda {
+                Linguistics.use( code )
+              }.should raise_error( LoadError, /failed to load language extension/i )
         end
 
@@ -56 +64 @@
 
 
-    def test_10_InflectorMethod
-        printTestHeader "Linguistics: Inflector method (core classes)"
-        rval = nil
+    it "adds a method with the same name as the language code to Array that returns an inflector" +
+       " proxy for that language" do
+        TestArray.should respond_to( :en )
+        TestArray.en.should be_a_kind_of( Linguistics::LanguageProxyClass )
+    end
+    
+    
+    it "adds a method with the same name as the language code to String that returns an inflector" +
+       " proxy for that language" do
+        TestString.should respond_to( :en )
+        TestString.en.should be_a_kind_of( Linguistics::LanguageProxyClass )
+    end
+    
+    
+    it "adds a method with the same name as the language code to Numeric that returns an inflector" +
+       " proxy for that language" do
+        TestNumber.should respond_to( :en )
+        TestNumber.en.should be_a_kind_of( Linguistics::LanguageProxyClass )
+    end
+    
+    
+    it "allows one to extend an additional class by passing it in the ':classes' argument to ::use" do
+        Linguistics.use( :en, :classes => Symbol )
+        :foo.should respond_to( :en )
+        :foo.en.should be_a_kind_of( Linguistics::LanguageProxyClass )
+    end
+    
 
-        # This shouldn't be necessary, but it's here for completeness
-        Linguistics::use( :en )
+    it "allows one to extend multiple additional classes by passing them in an Array in the "+
+       " ':classes' argument to ::use" do
+        Linguistics.use( :en, :classes => [IO, Class, Range] )
+        $stderr.should respond_to( :en )
+        $stderr.en.should be_a_kind_of( Linguistics::LanguageProxyClass )
 
-        [ TestArray, TestString, TestNumber ].each do |obj|
-            debug_msg "obj.class.instance_variables = %s" %
-                obj.class.instance_variables.inspect
+        Object.should respond_to( :en )
+        Object.en.should be_a_kind_of( Linguistics::LanguageProxyClass )
 
-            assert_respond_to obj, :en
-            assert_nothing_raised {
-                rval = obj.en
-            }
-            assert_kind_of Linguistics::LanguageProxyClass, rval
-        end
+        (0..155).should respond_to( :en )
+        (0..155).en.should be_a_kind_of( Linguistics::LanguageProxyClass )
     end
-
-
-    def test_20_SpecifyClasses
-        printTestHeader "Linguistics: Extend specific classes"
-        
-        assert_nothing_raised( "One class, not in an array" ) {
-            Linguistics::use( :en, :classes => Symbol )
-        }
-        assert_respond_to :foo, :en
-
-        assert_nothing_raised( "One class, in an array" ) {
-            Linguistics::use( :en, :classes => [IO] )
-        }
-        assert_respond_to $stderr, :en
-
-        assert_nothing_raised( "Two classes, in an Array" ) {
-            Linguistics::use( :en, :classes => [Class, Range] )
-        }
-        assert_respond_to Array, :en
-        assert_respond_to( (1..5), :en )
-    end
-
+    
 end
-end