Add tests for various access methods

Author: alerque

spec/fluent_spec.lua

@@ -46,6 +46,47 @@ describe('fluent.bundle', function ()
     assert.equals("qux", en:format("foo.baz"))
   end)
 
+  describe('messages', function ()
+    local en = FluentBundle("en-US")
+    en:add_messages("hi = Hello { $name }!\nfoo = bar\nbar = baz\n    .bax = qux")
+
+    it('can be accessed as properties', function ()
+      assert.same("bar", en.foo:format())
+      assert.same("bar", en["foo"]:format())
+      assert.same("baz", en.bar:format())
+      assert.same("baz", en["bar"]:format())
+    end)
+
+    it('attributes can be accessed as properties', function ()
+      assert.same("qux", en["bar.bax"]())
+      assert.same("qux", en.bar["bax"]())
+      assert.same("qux", en.bar.bax())
+    end)
+
+    it('can be called', function ()
+      assert.same("bar", en.foo())
+      assert.same("bar", en["foo"]())
+      assert.same("baz", en.bar())
+      assert.same("baz", en["bar"]())
+    end)
+
+    it('can be called with parameters', function ()
+      assert.same("Hello World!", en.hi({name = "World"}))
+      assert.same("Hello World!", en["hi"]({name = "World"}))
+      assert.same("Hello World!", en["hi"]:format({name = "World"}))
+    end)
+
+    it('can be cast to strings', function ()
+      assert.same("baz", tostring(en.bar))
+      assert.same("bar", tostring(en["foo"]))
+      assert.same("xbar", "x" .. en.foo)
+      assert.same("xbaz", "x" .. en["bar"])
+      assert.same("barx", en.foo .. "x")
+      assert.same("bazx", en["bar"] .. "x")
+    end)
+
+  end)
+
   it('should keep locale instances separate', function ()
     local en = FluentBundle("en-US")
     local tr = FluentBundle("tr-TR")