lxl 0.2.4 → 0.3.0

data/test/lxl_test.rb

@@ -2,6 +2,12 @@ $LOAD_PATH.unshift('../lib')
 require 'test/unit'
 require 'lxl'
 
+class MyNamespace < LXL::Namespace
+  register_symbols :foo
+  register_deferred :bar
+  def capitalize(text) text.to_s.capitalize end
+end
+
 class LXLTest < Test::Unit::TestCase
 
   def test_single_formula
@@ -12,33 +18,93 @@ class LXLTest < Test::Unit::TestCase
     formulas = %{
       This is some text;
       "This is some ""quoted"" text";
-      ="This is some ""quoted"" text";
-      =FOO;
-      =bar;
-      =((1+2)*(10-6))/2;
-      =datetime("2004-11-22 11:11:00")=DATE(2004,11,22)+TIME(11,11,00);
-      =IN(" is ", "this is a string");
-      =LIST(1, "two", 3.0);
-      =IN("b", LIST("a", "b", "c"));
-      =AND(TRUE, NULL);
-      =OR(TRUE, FALSE);
-      =IF(1+1=2, "yes", "no");
+      ="This is some ""quoted"" text"
+      =";"=";"
+      =";"=":"
+      =A
+      =B
+      =((1+2)*(10-6))/2
+      =datetime("2004-11-22 11:11:00")=DATE(2004,11,22)+TIME(11,11,00)
+      =IN(" is ", "this is a string")
+      =LIST(1, "two", 3.0)
+      =IN("b", LIST("a", "b", "c"))
+      =AND(TRUE, NULL)
+      =OR(TRUE, FALSE)
+      =IF(1+1=2, "yes", "no")
+      ="this" & " and " & "that"
+      =2^3
+      =25%+25.2%
+      =0.25=25%
+      =0.2589=25.89%
+      ="embedded percentages 25% and semi-colons ; are working properly"
     }
-    expected = ["This is some text", "\"This is some \"quoted\" text\"", "This is some \"quoted\" text"]
-    expected += [:FOO, :BAR, 6, true, true, [1, "two", 3.0], true, false, true, "yes"]
-    lxl = LXL::Parser.new
-    lxl.register_symbols(:FOO, :BAR)
+    expected =  ["This is some text", "\"This is some \"quoted\" text\"", "This is some \"quoted\" text"]
+    expected += [true, false, :A, :B, 6, true, true, [1, "two", 3.0], true, false, true, "yes", "this and that"]
+    expected += [8, 0.502, true, true, "embedded percentages 25% and semi-colons ; are working properly"]
+    MyNamespace.register_symbols(:A, :B)
+    lxl = LXL::Parser.new(MyNamespace.new)
     results = lxl.eval(formulas)
     expected.each_index { |i| assert_equal(expected[i], results[i]) }
   end
+
+  def test_range
+    lxl = LXL::Parser.new(MyNamespace.new)
+    res = lxl.eval('=LIST(d5:b3, "x")')
+    assert_equal(LXL::Range, res.first.class)
+    assert_equal("B3", res.first.min)
+    assert_equal("D5", res.first.max)
+    assert_equal(res.first.collect.join(','), "B3,B4,B5,C3,C4,C5,D3,D4,D5")
+  end
   
   def test_deferred
-    lxl = LXL::Parser.new
-    lxl.register_deferred(:TESTING)
+    MyNamespace.register_deferred(:TESTING)
+    lxl = LXL::Parser.new(MyNamespace.new)
     res = lxl.eval('=TESTING(1,2,3)')
     assert_equal(LXL::Deferred, res.class)
-    assert_equal(:TESTING, res.symbol)
+    assert_equal(:testing, res.symbol)
     assert_equal(3, res.args.last)
   end
 
+  def test_ns_methods
+    ns = MyNamespace.new
+    assert_equal(true, ns.and(true, true))
+    assert_equal(false, ns.and(true, false))
+    assert_equal(true, ns.or(true, true))
+    assert_equal(true, ns.or(true, false))
+    assert_equal(false, ns.or(false, false))
+    assert_equal('yes', ns.if(true, 'yes', 'no'))
+    assert_equal('no', ns.if(false, 'yes', 'no'))
+    assert_equal(true, ns.in(1, [1,2]))
+    assert_equal(false, ns.in(1, [3,4]))
+    assert_equal(true, ns.in("a", "ab"))
+    assert_equal(false, ns.in("a", "cd"))
+    assert_equal(true, ns.datetime('Jan 1, 2005') == ns.date(2005,1,1))
+    assert_equal(false, ns.datetime('Jan 1, 2005 12:30') == ns.date(2005,1,1)+ns.time(12,30,01))
+    assert_equal('[1, "two", 3]', ns.list(1,'two',3).inspect)
+    assert_equal('Testing', ns.capitalize('TeSTinG'))
+  end
+  
+  def test_ns_symbols
+    ns = MyNamespace.new
+    assert_equal(:FOO, ns.const_get(:FOO))
+  end
+  
+  def test_ns_access
+    ns = MyNamespace.new
+    assert_equal(:failed, begin ns.__get__(:class) rescue :failed end)
+  end
+
+  class MyLXLNamespace < LXL::Namespace
+    NAME = 'John Doe'
+    def upper(text) text.to_s.upcase end
+  end
+
+  class MyLXL < LXL::Parser
+    def self.namespace_class() MyLXLNamespace end
+  end
+
+  def test_ns_mylxl
+    assert_equal('JOHN DOE', MyLXL.eval('=UPPER(NAME)'))
+  end
+
 end

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.8.3
 specification_version: 1
 name: lxl
 version: !ruby/object:Gem::Version 
-  version: 0.2.4
-date: 2005-02-09
+  version: 0.3.0
+date: 2005-02-12
 summary: LXL (Like Excel) is a mini-language that mimics Microsoft Excel formulas. Easily extended with new constants and functions.
 require_paths: 
   - lib
@@ -29,9 +29,10 @@ authors:
 files: 
   - lib
   - VERSION
-  - README
   - test
   - CHANGES
+  - setup.rb
+  - README.en
   - lib/lxl.rb
   - test/lxl_test.rb
 test_files: []

data/README

@@ -1,48 +0,0 @@
-LXL README
-============
-
-LXL (Like Excel) is a mini-language that mimics Microsoft Excel formulas.
-Easily extended with new constants and functions.
-
-Usage
------
-
-  formulas = %{
-    This is some text;
-    ="This is some ""quoted"" text";
-    =((1+2)*(10-6))/2;
-    =datetime("2004-11-22 11:11:00")=DATE(2004,11,22)+TIME(11,11,00);
-    =IN(" is ", "this is a string");
-    =LIST(1, "two", 3.0);
-    =IN("b", LIST("a", "b", "c"));
-    =AND(TRUE, NULL);
-    =OR(TRUE, FALSE);
-    =IF(1+1=2, "yes", "no");
-  }
-
-  # single formula
-  puts LXL.eval('=5+5').inspect # => 10
-
-  # multiple formulas separated by semi-colon
-  puts LXL.eval(formulas).inspect # => ["This is some text", "This is some \"quoted\" text", 6, true, true, [1, "two", 3.0], true, false, true, "yes"]
-  
-  See API docs for more information.
-
-Requirements
-------------
-
-  * Ruby 1.8.2
-
-Install
--------
-
-  gem install lxl
-
-License
--------
-
-  LXL incorporates John Carter's LittleLexer for parsing.
-  Distributes under the same terms as LittleLexer.
-  http://www.rubyforge.org/projects/littlelexer/
-
-Kevin Howe <kh@newclear.ca>