trxl 0.1.5 → 0.1.8

data/spec/trxl/conditionals_spec.rb

@@ -3,11 +3,11 @@ require 'spec_helper'
 describe "For conditional evaluation, the language" do
 
   include Trxl::SpecHelper
-  
+
   before(:each) do
     @parser = Trxl::Calculator.new
   end
-  
+
   it "should be able to evaluate conditional 'if' expressions without elsif and else branches" do
     program =  "test = fun(x) { if(x) TRUE end };"
     eval(program + "test(TRUE)").should be_true
@@ -23,7 +23,7 @@ describe "For conditional evaluation, the language" do
       end
     PROGRAM
     eval(program).should be_true
-    
+
     program = <<-PROGRAM
       if(FALSE)
         TRUE
@@ -32,7 +32,7 @@ describe "For conditional evaluation, the language" do
       end
     PROGRAM
     eval(program).should be_false
-    
+
     program = <<-PROGRAM
       if(NULL)
         TRUE
@@ -41,7 +41,7 @@ describe "For conditional evaluation, the language" do
       end
     PROGRAM
     eval(program).should be_false
-    
+
     program = <<-PROGRAM
       if(NULL != NULL)
         TRUE
@@ -200,7 +200,7 @@ describe "For conditional evaluation, the language" do
     PROGRAM
     eval(program).should == "else branch"
   end
-  
+
   it "should be able to evaluate conditional 'if' expressions with multiple elsif and an else branch" do
     program = <<-PROGRAM
     foo = fun() {
@@ -217,7 +217,7 @@ describe "For conditional evaluation, the language" do
     foo();
     PROGRAM
     eval(program).should == 0
-    
+
     program = <<-PROGRAM
     foo = fun() {
       if(2 == 1)
@@ -233,7 +233,7 @@ describe "For conditional evaluation, the language" do
     foo();
     PROGRAM
     eval(program).should == 1
-    
+
     program = <<-PROGRAM
     foo = fun() {
       if(2 == 0)
@@ -249,7 +249,7 @@ describe "For conditional evaluation, the language" do
     foo();
     PROGRAM
     eval(program).should == 2
-    
+
     program = <<-PROGRAM
     foo = fun() {
       if(2 == 0)
@@ -265,7 +265,7 @@ describe "For conditional evaluation, the language" do
     foo();
     PROGRAM
     eval(program).should == 3
-    
+
     program = <<-PROGRAM
     foo = fun(value) {
       if(value <=  5000)
@@ -284,9 +284,9 @@ describe "For conditional evaluation, the language" do
     };
     foo(13000);
     PROGRAM
-    eval(program).should == 15.92 
+    eval(program).should == 15.92
   end
-  
+
   it "should allow an arbitrary number of statements inside if/elsif/else expressions" do
     program = <<-PROGRAM
     foo = fun() {
@@ -306,7 +306,7 @@ describe "For conditional evaluation, the language" do
     };
     foo();
     PROGRAM
-    eval(program).should == 0   
+    eval(program).should == 0
 
     program = <<-PROGRAM
     foo = fun() {
@@ -326,7 +326,7 @@ describe "For conditional evaluation, the language" do
     };
     foo();
     PROGRAM
-    eval(program).should == 1   
+    eval(program).should == 1
 
     program = <<-PROGRAM
     foo = fun() {
@@ -346,7 +346,7 @@ describe "For conditional evaluation, the language" do
     };
     foo();
     PROGRAM
-    eval(program).should == 2   
+    eval(program).should == 2
 
     program = <<-PROGRAM
     foo = fun() {
@@ -366,9 +366,9 @@ describe "For conditional evaluation, the language" do
     };
     foo();
     PROGRAM
-    eval(program).should == 3  
+    eval(program).should == 3
   end
-  
+
   it "should allow arbitrary expressions as conditional expression" do
     program =  "test = fun(x) {if(x == 0) TRUE else FALSE end};"
     program << "test(0)"
@@ -432,6 +432,20 @@ describe "For conditional evaluation, the language" do
     foo("hello");
     PROGRAM
     eval(program).should == "something else"
+
+    program = <<-PROGRAM
+    foo = fun(x) {
+      case x
+        when NULL then "nil"
+        when 2 then "two"
+        when 3 then "three"
+        else FALSE
+      end
+    };
+    foo(NULL);
+    PROGRAM
+    eval(program).should == "nil"
+
   end
 
   it "should allow multiple statements in each branch of a 'case' expression" do
@@ -450,5 +464,5 @@ describe "For conditional evaluation, the language" do
     PROGRAM
     eval(program).should == [ 1, "one" ]
   end
-  
+
 end

data/spec/trxl/ranges_spec.rb

@@ -3,24 +3,24 @@ require 'spec_helper'
 describe "When working with Ranges, the Trxl::Calculator" do
 
   include Trxl::SpecHelper
-  
+
   before(:each) do
     @parser = Trxl::Calculator.new
   end
-  
+
   it "should return arrays for range literal expressions" do
     eval("0..0").should == [ 0 ]
     eval("0..-1").should == [ ]
     eval("0...0").should == [ ]
     eval("0...-1").should == [ ]
-    
+
     eval("1..5").should == [ 1, 2, 3, 4, 5 ]
     eval("1 .. 5").should == [ 1, 2, 3, 4, 5 ]
     eval("a = 1; b = 5; a..b").should == [ 1, 2, 3, 4, 5 ]
     eval("1...5").should == [ 1, 2, 3, 4 ]
     eval("1 ... 5").should == [ 1, 2, 3, 4 ]
     eval("a = 1; b = 5; a...b").should == [ 1, 2, 3, 4 ]
-    
+
     eval("\"a\"..\"a\"").should == [ "a" ]
     eval("\"a\"..\"c\"").should == [ "a", "b", "c" ]
     eval("\"a\" .. \"c\"").should == [ "a", "b", "c" ]
@@ -32,23 +32,26 @@ describe "When working with Ranges, the Trxl::Calculator" do
     eval("'a' .. 'c'").should == [ "a", "b", "c" ]
     eval("'a'...'c'").should == [ "a", "b" ]
     eval("'a' ... 'c'").should == [ "a", "b" ]
-    
+
     eval("'aa'..'aa'").should == [ "aa" ]
     eval("'aa'..'ac'").should == [ "aa", "ab", "ac" ]
     eval("'aa'...'ac'").should == [ "aa", "ab" ]
 
+    eval("'a'.. 'ac'").should == %w[a b c d e f g h i j k l m n o p q r s t u v w x y z aa ab ac]
+    eval("'a'...'ac'").should == %w[a b c d e f g h i j k l m n o p q r s t u v w x y z aa ab]
+
     eval("1..5 == [ 1, 2, 3, 4, 5 ]").should be_true
     eval("1...5 == [ 1, 2, 3, 4 ]").should be_true
-    
+
     eval("SIZE(1..5)").should == 5
-      
+
     eval("a..b == [ 1, 2 ]", { :a => 1, :b => 2 }).should be_true
     eval("a..c", { :a => 1, :b => nil, :c => 2 }).should == [ 1, 2]
-    
+
     lambda { eval("a..b", { :a => nil, :b => nil }) }.should raise_error
-    
+
   end
-  
+
   it "should store ranges as arrays" do
     eval("a = 1..5; a;").should == [ 1, 2, 3, 4, 5 ]
     eval("a = 1 .. 5; a;").should == [ 1, 2, 3, 4, 5 ]
@@ -59,23 +62,3 @@ describe "When working with Ranges, the Trxl::Calculator" do
   end
 
 end
-
-describe "When working with Strings, the Trxl::Calculator" do
-
-  include Trxl::SpecHelper
-  
-  before(:each) do
-    @parser = Trxl::Calculator.new
-  end
-  
-  it "should evaluate string literals to strings using double quotes (\"\")" do
-    eval("\"Test String\"").should == "Test String"
-    eval("s = \"Test String\"; s;").should == "Test String"
-  end
-  
-  it "should evaluate string literals to strings using single quotes ('')" do
-    eval("'Test String'").should == "Test String"
-    eval("s = 'Test String'; s;").should == "Test String"
-  end
-  
-end

data/spec/trxl/require_spec.rb

@@ -1,44 +1,44 @@
 require 'spec_helper'
 
 describe "For defining Trxl::StdLib, the Trxl::Calculator" do
-  
+
   include Trxl::SpecHelper
-  
+
   before(:each) do
     @parser = Trxl::Calculator.new
   end
-  
+
   it "should be able to require trxl code snippets and merge them into the current env" do
     program = "require 'stdlib'"
     env_after_require = eval(program)
     env_after_require.should have_key(:foreach_in)
-    env_after_require.should have_key(:_foreach_in_)
+    env_after_require.should have_key(:__foreach_in__)
     env_after_require.should have_key(:inject)
-    env_after_require.should have_key(:_inject_)
+    env_after_require.should have_key(:__inject__)
     env_after_require.should have_key(:map)
     env_after_require.should have_key(:ratio)
   end
-  
+
   it "should be able to require scoped trxl code snippets and merge them into the current env" do
     program = "require 'stdlib/foreach_in'"
     env_after_require = eval(program)
     env_after_require.should have_key(:foreach_in)
-    
+
     program = "require 'stdlib/inject'"
     env_after_require = eval(program)
     env_after_require.should have_key(:inject)
   end
-  
+
   it "should be able to require scoped trxl code snippets and merge them into the current env" do
     program = "require 'stdlib/foreach_in'"
     env_after_require = eval(program)
     env_after_require.should have_key(:foreach_in)
-    
+
     program = "require 'stdlib/inject'"
     env_after_require = eval(program)
     env_after_require.should have_key(:inject)
   end
-  
+
   it "should ignore a require statement if the library has already been loaded" do
     program = "require 'stdlib/inject'"
     program = "require 'stdlib/map'"
@@ -46,5 +46,5 @@ describe "For defining Trxl::StdLib, the Trxl::Calculator" do
     env_after_require.should have_key(:inject)
     env_after_require.should have_key(:map)
   end
-  
+
 end

data/spec/trxl/stdlib_spec.rb

@@ -3,15 +3,25 @@ require 'spec_helper'
 describe "The Trxl::StdLib" do
 
   include Trxl::SpecHelper
-  
+
   before(:each) do
     @parser = Trxl::Calculator.new
   end
-  
+
   it "should be able to parse the whole Trxl::StdLib code" do
     lambda { parse(Trxl::Calculator.stdlib) }.should_not raise_error
   end
-  
+
+  it "should define a foreach function that does not invoke the body function for empty enumerables" do
+    program = <<-PROGRAM
+      require 'stdlib/foreach_in';
+      test = [];
+      foreach_in([], fun(i) { test << i });
+      test;
+    PROGRAM
+    eval(program).should == []
+  end
+
   it "should define a foreach function with read access to the outer env" do
     program = <<-PROGRAM
       require 'stdlib/foreach_in';
@@ -19,20 +29,40 @@ describe "The Trxl::StdLib" do
     PROGRAM
     eval(program).should == 3
   end
-  
+
   it "should define a foreach function with write access to the outer env" do
     program = <<-PROGRAM
       require 'stdlib/foreach_in';
       sum = 0;
       a = 1..10;
-      foreach_in(a, fun(e) { 
-        sum = sum + e 
+      foreach_in(a, fun(e) {
+        sum = sum + e
       });
       sum;
     PROGRAM
     eval(program).should == 55
   end
 
+  it "should define an inject function that returns the original memo for empty enumerables" do
+    program = <<-PROGRAM
+      require 'stdlib/inject';
+      inject(0, [], fun(memo, val) { memo + val });
+    PROGRAM
+    eval(program).should == 0
+
+    program = <<-PROGRAM
+      require 'stdlib/inject';
+      inject([], [], fun(memo, val) { memo << val });
+    PROGRAM
+    eval(program).should == []
+
+    program = <<-PROGRAM
+      require 'stdlib/inject';
+      inject({}, [], fun(memo, val) { memo[val] });
+    PROGRAM
+    eval(program).should == {}
+  end
+
   it "should define an inject function with read access to the outer env" do
     program = <<-PROGRAM
       require 'stdlib/inject';
@@ -48,12 +78,12 @@ describe "The Trxl::StdLib" do
         base = 0;
         positives = inject(0, values, fun(memo, val) {
           if(ENV[val] == "yes")
-            base = base + 1; 
+            base = base + 1;
             memo + 1
-          elsif(ENV[val] == "no") 
-            base = base + 1; 
+          elsif(ENV[val] == "no")
+            base = base + 1;
             memo
-          else 
+          else
             memo
           end
         });
@@ -61,7 +91,7 @@ describe "The Trxl::StdLib" do
           ROUND((ROUND(positives, 10) / base) * 100, 2)
         else
           0
-        end        
+        end
       };
       ratio('a'..'c');
     PROGRAM
@@ -124,34 +154,34 @@ describe "The Trxl::StdLib" do
 
   it "should define a 'ratio' function for any enumerable collection" do
     env = {
-      :a => "Ja", 
+      :a => "Ja",
       :b => "Ja",
       :c => "Ja",
       :d => "Ja"
     }
     req_stmt = "require 'stdlib/ratio';"
     eval("#{req_stmt} ratio('a'..'d', 'Ja', 'keine Angabe');", env).should == 100
-    
+
     env = {
-      :a => "Ja", 
+      :a => "Ja",
       :b => "Ja",
       :c => "Nein",
       :d => "Nein"
     }
     req_stmt = "require 'stdlib/ratio';"
     eval("#{req_stmt} ratio('a'..'d', 'Ja', 'keine Angabe');", env).should == 50
-    
+
     env = {
-      :a => "Nein", 
+      :a => "Nein",
       :b => "Nein",
       :c => "Nein",
       :d => "Nein"
     }
     req_stmt = "require 'stdlib/ratio';"
     eval("#{req_stmt} ratio('a'..'d', 'Ja', 'keine Angabe');", env).should == 0
-    
+
     env = {
-      :a => "Ja", 
+      :a => "Ja",
       :b => "Nein",
       :c => "Nein",
       :d => "Nein",
@@ -159,13 +189,13 @@ describe "The Trxl::StdLib" do
     }
     req_stmt = "require 'stdlib/ratio';"
     eval("#{req_stmt} ratio('a'..'e', 'Ja', 'keine Angabe');", env).should == 25
-    
+
     env = {
       :a => "keine Angabe"
     }
     req_stmt = "require 'stdlib/ratio';"
     eval("#{req_stmt} ratio(['a'], 'Ja', 'keine Angabe');", env).should be_nil
-    
+
     env = {
       :a => "keine Angabe",
       :b => "keine Angabe",
@@ -173,14 +203,14 @@ describe "The Trxl::StdLib" do
     }
     req_stmt = "require 'stdlib/ratio';"
     eval("#{req_stmt} ratio('a'..'c', 'Ja', 'keine Angabe');", env).should be_nil
-    
+
     env = {
       :a => "Ja",
       :b => "keine Angabe"
     }
     req_stmt = "require 'stdlib/ratio';"
     eval("#{req_stmt} ratio('a'..'b', 'Ja', 'keine Angabe');", env).should == 100
-    
+
     env = {
       :a => "Nein",
       :b => "keine Angabe"
@@ -208,20 +238,20 @@ describe "The Trxl::StdLib" do
       in_groups_of(2, 1..4, fun(group) { SUM(group) });
     PROGRAM
     eval(program).should == [ 3, 7 ]
-    
+
     program = <<-PROGRAM
       require 'stdlib/in_groups_of';
       in_groups_of(2, 'a'..'d', fun(group) { group });
     PROGRAM
     eval(program).should == [ [ 'a', 'b' ], [ 'c', 'd' ] ]
-    
+
     env = Trxl::Environment.new({
-      :a => { 
-        1 => "Building 1", 
-        2 => "Building 2", 
-        3 => "Building 3" 
+      :a => {
+        1 => "Building 1",
+        2 => "Building 2",
+        3 => "Building 3"
       },
-      :b => { 
+      :b => {
         1 => "Feuerwehrgebäude",
         2 => "Schulgebäude",
         3 => "Wohngebäude"
@@ -244,14 +274,14 @@ describe "The Trxl::StdLib" do
       :r => { 1 => 100, 2 => 200, 3 => 300 },
       :s => { 1 => 100, 2 => 200, 3 => 300 },
       :t => { 1 => 100, 2 => 200, 3 => 300 },
-      :u => { 
+      :u => {
         1 => [ 15, 15, 15 ],
         1 => [ 20, 20, 20 ],
         1 => [ 30, 30, 30 ]
       }
     })
   end
-  
+
   it "should allow recursive functions as accumulator in 'in_groups_of' function calls" do
     program = <<-PROGRAM
       require 'stdlib/inject';
@@ -264,15 +294,155 @@ describe "The Trxl::StdLib" do
     PROGRAM
     eval(program).should == [ 3, 7 ]
   end
-  
+
+  it "should define a 'hash_values' function" do
+    program = <<-PROGRAM
+      require 'stdlib/hash_values';
+      hash_values(hash);
+    PROGRAM
+
+    eval(program, :hash => {}).should == []
+
+    eval(program, {
+      :hash => {
+        1 => 100,
+        2 => 200,
+        3 => 300
+      }
+    }).should == [ 100, 200, 300 ]
+
+    eval(program, {
+      :hash => {
+        1 => [ 100, 100, 100 ],
+        2 => [ 200, 200, 200 ],
+        3 => [ 300, 300, 300 ]
+      }
+    }).should == [
+      [ 100, 100, 100 ],
+      [ 200, 200, 200 ],
+      [ 300, 300, 300 ],
+    ]
+  end
+
+  it "should define a 'hash_range_values' function" do
+    program = <<-PROGRAM
+      require 'stdlib/hash_range_values';
+      hash_range_values('a'..'b');
+    PROGRAM
+
+    eval(program, {
+      :a => { 1 => 100 },
+      :b => { 2 => 200 }
+    }).should == [
+      [100],
+      [200]
+    ]
+
+    eval(program, {
+      :a => { 1 => [ 100, 100, 100 ], 2 => [ 200, 200, 200 ] },
+      :b => { 3 => [ 300, 300, 300 ], 4 => [ 400, 400, 400 ] }
+    }).should == [
+      [ [100, 100, 100], [ 200, 200, 200 ] ],
+      [ [300, 300, 300], [ 400, 400, 400 ] ]
+    ]
+  end
+
+  it "should define a 'hash_value_sum' function" do
+
+    program = <<-PROGRAM
+      require 'stdlib/hash_value_sum';
+      hash_value_sum(hash);
+    PROGRAM
+
+    eval(program, :hash => {}).should == 0
+
+    eval(program, {
+      :hash => {
+        1 => 100,
+        2 => 200,
+        3 => 300
+      }
+    }).should == 600
+
+    eval(program, {
+      :hash => {
+        1 => [ 100, 100, 100 ],
+        2 => [ 200, 200, 200 ],
+        3 => [ 300, 300, 300 ]
+      }
+    }).should == 1800
+  end
+
+  it "should define a 'avg_hash_value_sum' function" do
+
+    program = <<-PROGRAM
+      require 'stdlib/avg_hash_value_sum';
+      avg_hash_value_sum(hash);
+    PROGRAM
+
+    eval(program, :hash => {}).should == 0
+
+    eval(program, {
+      :hash => {
+        1 => 100,
+        2 => 200,
+        3 => 300
+      }
+    }).should == 200
+
+    eval(program, {
+      :hash => {
+        1 => [ 100, 110, 120 ],
+        2 => [ 200, 210, 220 ],
+        3 => [ 300, 310, 320 ]
+      }
+    }).should == 630
+  end
+
+  it "should define a 'hash_range_value_sum' function" do
+
+    program = <<-PROGRAM
+      require 'stdlib/hash_range_value_sum';
+      hash_range_value_sum('a'..'b');
+    PROGRAM
+
+    eval(program, {
+      :a => { 1 => 100 },
+      :b => { 2 => 200 }
+    }).should == 300
+
+    eval(program, {
+      :a => { 1 => [ 100, 100, 100 ] },
+      :b => { 2 => [ 200, 200, 200 ] }
+    }).should == 900
+  end
+
+  it "should define a 'avg_hash_range_value_sum' function" do
+
+    program = <<-PROGRAM
+      require 'stdlib/avg_hash_range_value_sum';
+      avg_hash_range_value_sum('a'..'b');
+    PROGRAM
+
+    eval(program, {
+      :a => { 1 => 100 },
+      :b => { 2 => 200 }
+    }).should == 300
+
+    eval(program, {
+      :a => { 1 => [ 100, 110, 120 ] },
+      :b => { 2 => [ 200, 210, 220 ] }
+    }).should == 320
+  end
+
   it "should define a 'sum_of_type' function" do
     env = {
       :types => {
-        1 => "Feuerwehrgebäude", 
-        2 => "Schulgebäude", 
+        1 => "Feuerwehrgebäude",
+        2 => "Schulgebäude",
         3 => "Sonstige",
       },
-      :values => { 
+      :values => {
         1 => [ 100, 100, 100 ],
         2 => [ 200, 200, 200 ],
         3 => [ 300, 300, 300 ]
@@ -283,15 +453,15 @@ describe "The Trxl::StdLib" do
     eval("#{req_stmt} sum_of_type('Schulgebäude', types, values);", env).should == 600
     eval("#{req_stmt} sum_of_type('Sonstige', types, values);", env).should == 900
   end
-  
+
   it "should define a 'avg_sum_of_type' function" do
     env = {
       :types => {
-        1 => "Feuerwehrgebäude", 
-        2 => "Schulgebäude", 
+        1 => "Feuerwehrgebäude",
+        2 => "Schulgebäude",
         3 => "Sonstige",
       },
-      :values => { 
+      :values => {
         1 => [ 100, 100, 100 ],
         2 => [ 200, 200, 200 ],
         3 => [ 300, 300, 300 ]
@@ -302,20 +472,20 @@ describe "The Trxl::StdLib" do
     eval("#{req_stmt} avg_sum_of_type('Schulgebäude', types, values);", env).should == 200
     eval("#{req_stmt} avg_sum_of_type('Sonstige', types, values);", env).should == 300
   end
-  
+
   it "should define a 'total_range_sum_of_type' function" do
     env = {
       :types => {
-        1 => "Feuerwehrgebäude", 
-        2 => "Schulgebäude", 
+        1 => "Feuerwehrgebäude",
+        2 => "Schulgebäude",
         3 => "Sonstige",
       },
-      :a => { 
+      :a => {
         1 => [ 100, 100, 100 ],
         2 => [ 200, 200, 200 ],
         3 => [ 300, 300, 300 ]
       },
-      :b => { 
+      :b => {
         1 => [ 100, 100, 100 ],
         2 => [ 200, 200, 200 ],
         3 => [ 300, 300, 300 ]
@@ -326,20 +496,20 @@ describe "The Trxl::StdLib" do
     eval("#{req_stmt} total_range_sum_of_type('Schulgebäude', types, 'a'..'b');", env).should == 1200
     eval("#{req_stmt} total_range_sum_of_type('Sonstige', types, 'a'..'b');", env).should == 1800
   end
-  
+
   it "should define a 'avg_range_sum_of_type' function" do
     env = {
       :types => {
-        1 => "Feuerwehrgebäude", 
-        2 => "Schulgebäude", 
+        1 => "Feuerwehrgebäude",
+        2 => "Schulgebäude",
         3 => "Sonstige",
       },
-      :a => { 
+      :a => {
         1 => [ 100, 100, 100 ],
         2 => [ 200, 200, 200 ],
         3 => [ 300, 300, 300 ]
       },
-      :b => { 
+      :b => {
         1 => [ 100, 100, 100 ],
         2 => [ 200, 200, 200 ],
         3 => [ 300, 300, 300 ]
@@ -350,7 +520,28 @@ describe "The Trxl::StdLib" do
     eval("#{req_stmt} avg_range_sum_of_type('Schulgebäude', types, 'a'..'b');", env).should == 400
     eval("#{req_stmt} avg_range_sum_of_type('Sonstige', types, 'a'..'b');", env).should == 600
   end
-  
+
+  it "should define a 'avg_range_sum' function" do
+
+    program = <<-PROGRAM
+      require 'stdlib/avg_range_sum';
+      avg_range_sum('a'..'c');
+    PROGRAM
+
+    eval(program, {
+      :a => [],
+      :b => [],
+      :c => []
+    }).should == 0
+
+    eval(program, {
+      :a => [100, 200, 300],
+      :b => [400, 500, 600],
+      :c => [700, 800, 900]
+    }).should == 1500
+
+  end
+
   it "should define a 'year_from_date' function" do
     req_stmt = "require 'stdlib/year_from_date';"
     eval("#{req_stmt} year_from_date('01/1999');").should == 1999
@@ -358,7 +549,7 @@ describe "The Trxl::StdLib" do
     eval("#{req_stmt} year_from_date('12/2008');").should == 2008
     eval("#{req_stmt} year_from_date('12/2008');").should == 2008
   end
-  
+
   it "should define a 'month_from_date' function" do
     req_stmt = "require 'stdlib/month_from_date';"
     eval("#{req_stmt} month_from_date('01/1999');").should == 1
@@ -366,5 +557,5 @@ describe "The Trxl::StdLib" do
     eval("#{req_stmt} month_from_date('1/2008');").should == 1
     eval("#{req_stmt} month_from_date('12/2008');").should == 12
   end
-  
+
 end