Module:Marriage/testcases

-- Unit tests for [[Module:{{ROOTPAGENAME}}]]. Click talk page to run tests.
local p = require('Module:UnitTests')

-- Example unit test.
function p:tests()
	
	self:preprocess_equals('{{#invoke:Marriage | main | Name | 1910 | 1950 | end=divorced }}', 'Name (<abbr title="married">m.</abbr> 1910; <abbr title="divorced">div.</abbr> 1950)')
	self:preprocess_equals('{{#invoke:Marriage | main |  | 1910 | 1950 | end=divorced}}', '(<abbr title="married">m.</abbr> 1910; <abbr title="divorced">div.</abbr> 1950)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name |  | 1950 | end=divorced}}', 'Name (<abbr title="divorced">div.</abbr> 1950)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name | 1910 |  | end=}}', 'Name (<abbr title="married">m.</abbr> 1910)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name | 1910 | 1950 | }}', 'Name (<abbr title="married">m.</abbr> 1910–1950)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name | 1910 |  | end=divorced}}', 'Name (<abbr title="married">m.</abbr> 1910; <abbr title="divorced">div.</abbr>)')
	self:preprocess_equals('{{#invoke:Marriage | main |  | 1910 }}', '(<abbr title="married">m.</abbr> 1910)')
	self:preprocess_equals('{{#invoke:Marriage | main |  |  |  | }}', '')
	self:preprocess_equals('{{#invoke:Marriage | main | Name | 1910 | 1950 | end }}', 'Name (<abbr title="married">m.</abbr> 1910–1950)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name | 1910 | 1950 | reason }}', 'Name (<abbr title="married">m.</abbr> 1910–1950)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name | | | reason=divorced }}', 'Name (<abbr title="divorced">div.</abbr>)')
	self:preprocess_equals('{{#invoke:Marriage | main | | | | reason=divorced }}', '(<abbr title="divorced">div.</abbr>)')

	
	self:preprocess_equals('{{#invoke:Marriage | main | Name | 1910 | 1950 | end=died }}', 'Name (<abbr title="married">m.</abbr> 1910; died 1950)')
	self:preprocess_equals('{{#invoke:Marriage | main |  | 1910 | 1950 | end=died}}', '(<abbr title="married">m.</abbr> 1910; died 1950)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name |  | 1950 | end=died}}', 'Name (died 1950)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name |  | 1950 | end=d.}}', 'Name (died 1950)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name |  | 1950 | end=d}}', 'Name (died 1950)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name | 1910 |  | end=}}', 'Name (<abbr title="married">m.</abbr> 1910)')
	self:preprocess_equals('{{#invoke:Marriage | main | Name | 1910 |  | end=separated}}', 'Name (<abbr title="married">m.</abbr> 1910; <abbr title="separated">sep.</abbr>)')
	self:preprocess_equals('{{#invoke:Marriage | main | | | | reason=annulled}}', '(<abbr title="annulled">ann.</abbr>)')

	
end

return p