Modulo:Giochi olimpici/test
Vai alla navigazione
Vai alla ricerca
-- Unit tests per il [[Modulo:Olimpiade]]. Cliccare sulla pagina di discussione per eseguire i test.
local p = require('Modulo:UnitTests')
function p:test_EdizOlimp()
self:preprocess_equals_many('{{EdizOlimp/Sandbox|', '}}', {
-- chiave inesistente
{ 'x|1896|E', '' },
-- estive
{ 'a|1896|E', '1896' },
{ 'c|1896|E', 'Atene' },
{ 'd|1896|E', 'Atene' },
{ 'e|1896|E', 'I' },
{ 'p|1896|E', 'Grecia' },
{ 'b|1896|E', 'GRC 1822-1969' },
-- da numero edizione
{ 'a|II|E', '1900' },
-- estive default
{ 'a|1896', '1896' },
{ 'a|1896|X', '1896' },
-- invernali
{ 'a|1924|I', '1924' },
{ 'c|1924|I', 'Chamonix-Mont-Blanc' },
{ 'd|1924|I', 'Chamonix-Mont-Blanc' },
{ 'e|1924|I', 'I' },
{ 'p|1924|I', 'Francia' },
{ 'b|1924|I', 'FRA' },
-- da numero edizione
{ 'a|II|I', '1928' }
})
end
function p:test_EdizOlimp_P()
self:preprocess_equals_many('{{EdizOlimp/Sandbox|', '}}', {
-- chiave inesistente
{ 'x|1960|E|P', '' },
-- estive
{ 'a|1960|E|P', '1960' },
{ 'c|1960|E|P', 'Roma' },
{ 'd|1960|E|P', 'Roma' },
{ 'e|1960|E|P', 'I' },
{ 'p|1960|E|P', 'Italia' },
{ 'b|1960|E|P', 'ITA' },
-- da numero edizione
{ 'a|II|E|P', '1964' },
-- estive default
{ 'a|1960||P', '1960' },
{ 'a|1960|X|P', '1960' },
-- invernali
{ 'a|1976|I|P', '1976' },
{ 'c|1976|I|P', 'Örnsköldsvik' },
{ 'd|1976|I|P', 'Örnsköldsvik' },
{ 'e|1976|I|P', 'I' },
{ 'p|1976|I|P', 'Svezia' },
{ 'b|1976|I|P', 'SWE' },
-- da numero edizione
{ 'a|II|I|P', '1980' }
})
end
function p:test_EdizOlimp_G()
self:preprocess_equals_many('{{EdizOlimp/Sandbox|', '}}', {
-- chiave inesistente
{ 'x|2010|E|G', '' },
-- estive
{ 'a|2010|E|G', '2010' },
{ 'c|2010|E|G', 'Singapore' },
{ 'd|2010|E|G', 'Singapore' },
{ 'e|2010|E|G', 'I' },
{ 'p|2010|E|G', 'Singapore' },
{ 'b|2010|E|G', 'SIN' },
-- da numero edizione
{ 'a|II|E|G', '2014' },
-- estive default
{ 'a|2010||G', '2010' },
{ 'a|2010|X|G', '2010' },
-- invernali
{ 'a|2012|I|G', '2012' },
{ 'c|2012|I|G', 'Innsbruck' },
{ 'd|2012|I|G', 'Innsbruck' },
{ 'e|2012|I|G', 'I' },
{ 'p|2012|I|G', 'Austria' },
{ 'b|2012|I|G', 'AUT' },
-- da numero edizione
{ 'a|II|I|G', '2016' },
})
end
function p:test_giochi_olimpici_estivi()
self:preprocess_equals_many('{{Link Giochi olimpici/Sandbox|', '}}', {
-- senza disciplina
{ '|1896', '[[Giochi della I Olimpiade|Atene 1896]]' },
{ '|1900', '[[Giochi della II Olimpiade|Parigi 1900]]' },
{ '|1904', '[[Giochi della III Olimpiade|Saint Louis 1904]]' },
{ '|1906', '[[Giochi olimpici intermedi|Atene 1906]]' },
{ '|1908', '[[Giochi della IV Olimpiade|Londra 1908]]' },
{ '|1912', '[[Giochi della V Olimpiade|Stoccolma 1912]]' },
{ '|1920', '[[Giochi della VII Olimpiade|Anversa 1920]]' },
{ '|1924', '[[Giochi della VIII Olimpiade|Parigi 1924]]' },
{ '|1928', '[[Giochi della IX Olimpiade|Amsterdam 1928]]' },
{ '|1932', '[[Giochi della X Olimpiade|Los Angeles 1932]]' },
{ '|1936', '[[Giochi della XI Olimpiade|Berlino 1936]]' },
{ '|1948', '[[Giochi della XIV Olimpiade|Londra 1948]]' },
{ '|1952', '[[Giochi della XV Olimpiade|Helsinki 1952]]' },
{ '|1956', '[[Giochi della XVI Olimpiade|Melbourne 1956]]' },
{ '|1960', '[[Giochi della XVII Olimpiade|Roma 1960]]' },
{ '|1964', '[[Giochi della XVIII Olimpiade|Tokyo 1964]]' },
{ '|1968', '[[Giochi della XIX Olimpiade|Città del Messico 1968]]' },
{ '|1972', '[[Giochi della XX Olimpiade|Monaco di Baviera 1972]]' },
{ '|1976', '[[Giochi della XXI Olimpiade|Montréal 1976]]' },
{ '|1980', '[[Giochi della XXII Olimpiade|Mosca 1980]]' },
{ '|1984', '[[Giochi della XXIII Olimpiade|Los Angeles 1984]]' },
{ '|1988', '[[Giochi della XXIV Olimpiade|Seul 1988]]' },
{ '|1992', '[[Giochi della XXV Olimpiade|Barcellona 1992]]' },
{ '|1996', '[[Giochi della XXVI Olimpiade|Atlanta 1996]]' },
{ '|2000', '[[Giochi della XXVII Olimpiade|Sydney 2000]]' },
{ '|2004', '[[Giochi della XXVIII Olimpiade|Atene 2004]]' },
{ '|2008', '[[Giochi della XXIX Olimpiade|Pechino 2008]]' },
{ '|2012', '[[Giochi della XXX Olimpiade|Londra 2012]]' },
{ '|2016', '[[Giochi della XXXI Olimpiade|Rio de Janeiro 2016]]' },
-- con disciplina
{ 'lotta|1896', '[[lotta ai Giochi della I Olimpiade|Atene 1896]]' },
{ 'pentathlon moderno|2004', '[[pentathlon moderno ai Giochi della XXVIII Olimpiade|Atene 2004]]' },
-- specialità
{ 'atletica leggera|1988|specialità=decathlon', '[[atletica leggera ai Giochi della XXIV Olimpiade - Decathlon|Seul 1988]]' },
-- 1906
{ '|1906', '[[Giochi olimpici intermedi|Atene 1906]]' },
{ 'calcio|1906', '[[calcio ai Giochi olimpici intermedi|Atene 1906]]' },
-- anno non trovato
{ '|1000', '\'\'1000 - Nessuna Olimpiade estiva\'\'' },
-- formatting
{ '|1896|formatting=label', 'Atene 1896' },
{ '|1896|formatting=target', 'Giochi della I Olimpiade' },
{ '|1896|formatting=città_paese', '[[Atene|Atene]], [[Grecia]]' }
})
end
function p:test_giochi_olimpici_invernali()
self:preprocess_equals_many('{{Link Giochi olimpici/Sandbox|', '}}', {
-- senza disciplina
{ '|1924|I', '[[I Giochi olimpici invernali|Chamonix-Mont-Blanc 1924]]' },
{ '|1928|I', '[[II Giochi olimpici invernali|Sankt Moritz 1928]]' },
{ '|1932|I', '[[III Giochi olimpici invernali|Lake Placid 1932]]' },
{ '|1936|I', '[[IV Giochi olimpici invernali|Garmisch-Partenkirchen 1936]]' },
{ '|1948|I', '[[V Giochi olimpici invernali|Sankt Moritz 1948]]' },
{ '|1952|I', '[[VI Giochi olimpici invernali|Oslo 1952]]' },
{ '|1956|I', '[[VII Giochi olimpici invernali|Cortina d\'Ampezzo 1956]]' },
{ '|1960|I', '[[VIII Giochi olimpici invernali|Squaw Valley 1960]]' },
{ '|1964|I', '[[IX Giochi olimpici invernali|Innsbruck 1964]]' },
{ '|1968|I', '[[X Giochi olimpici invernali|Grenoble 1968]]' },
{ '|1972|I', '[[XI Giochi olimpici invernali|Sapporo 1972]]' },
{ '|1976|I', '[[XII Giochi olimpici invernali|Innsbruck 1976]]' },
{ '|1980|I', '[[XIII Giochi olimpici invernali|Lake Placid 1980]]' },
{ '|1984|I', '[[XIV Giochi olimpici invernali|Sarajevo 1984]]' },
{ '|1988|I', '[[XV Giochi olimpici invernali|Calgary 1988]]' },
{ '|1992|I', '[[XVI Giochi olimpici invernali|Albertville 1992]]' },
{ '|1994|I', '[[XVII Giochi olimpici invernali|Lillehammer 1994]]' },
{ '|1998|I', '[[XVIII Giochi olimpici invernali|Nagano 1998]]' },
{ '|2002|I', '[[XIX Giochi olimpici invernali|Salt Lake City 2002]]' },
{ '|2006|I', '[[XX Giochi olimpici invernali|Torino 2006]]' },
{ '|2010|I', '[[XXI Giochi olimpici invernali|Vancouver 2010]]' },
{ '|2014|I', '[[XXII Giochi olimpici invernali|Soči 2014]]' },
{ '|2018|I', '[[XXIII Giochi olimpici invernali|Pyeongchang 2018]]' },
{ '|2022|I', '[[XXIV Giochi olimpici invernali|Pechino 2022]]' },
-- con disciplina
{ 'sci di fondo|1924|I', '[[sci di fondo ai I Giochi olimpici invernali|Chamonix-Mont-Blanc 1924]]' },
{ 'sci di fondo|2014|I', '[[sci di fondo ai XXII Giochi olimpici invernali|Soči 2014]]' },
-- VIII (1960) e XI (1972) edizione iniziano con vocale
{ 'sci alpino|1960|I', '[[sci alpino agli VIII Giochi olimpici invernali|Squaw Valley 1960]]' },
{ 'sci alpino|1972|I', '[[sci alpino agli XI Giochi olimpici invernali|Sapporo 1972]]' },
-- anno non trovato
{ '|1000|I', '\'\'1000 - Nessuna Olimpiade invernale\'\'' },
-- formatting
{ '|1924|I|formatting=label', 'Chamonix-Mont-Blanc 1924' },
{ '|1924|I|formatting=target', 'I Giochi olimpici invernali' },
{ '|1924|I|formatting=città_paese', '[[Chamonix-Mont-Blanc|Chamonix-Mont-Blanc]], [[Francia]]' }
})
end
function p:test_giochi_paralimpici_estivi()
self:preprocess_equals_many('{{Link Giochi olimpici/Sandbox|', '}}', {
-- senza disciplina
{ '|1960|E|P', '[[I Giochi paralimpici estivi|Roma 1960]]' },
{ '|1964|E|P', '[[II Giochi paralimpici estivi|Tōkyō 1964]]' },
{ '|1968|E|P', '[[III Giochi paralimpici estivi|Tel Aviv 1968]]' },
{ '|1972|E|P', '[[IV Giochi paralimpici estivi|Heidelberg 1972]]' },
{ '|1976|E|P', '[[V Giochi paralimpici estivi|Toronto 1976]]' },
{ '|1980|E|P', '[[VI Giochi paralimpici estivi|Arnhem 1980]]' },
{ '|1984|E|P', '[[VII Giochi paralimpici estivi|New York 1984]]' },
{ '|1988|E|P', '[[VIII Giochi paralimpici estivi|Seul 1988]]' },
{ '|1992|E|P', '[[IX Giochi paralimpici estivi|Barcellona 1992]]' },
{ '|1996|E|P', '[[X Giochi paralimpici estivi|Atlanta 1996]]' },
{ '|2000|E|P', '[[XI Giochi paralimpici estivi|Sydney 2000]]' },
{ '|2004|E|P', '[[XII Giochi paralimpici estivi|Atene 2004]]' },
{ '|2008|E|P', '[[XIII Giochi paralimpici estivi|Pechino 2008]]' },
{ '|2012|E|P', '[[XIV Giochi paralimpici estivi|Londra 2012]]' },
-- con disciplina
{ 'atletica leggera|1960|E|P', '[[atletica leggera ai I Giochi paralimpici estivi|Roma 1960]]' },
{ 'atletica leggera|2012|E|P', '[[atletica leggera ai XIV Giochi paralimpici estivi|Londra 2012]]' },
-- VIII (1988) e XI (2000) edizione iniziano con vocale
{ 'atletica leggera|1988|E|P', '[[atletica leggera agli VIII Giochi paralimpici estivi|Seul 1988]]' },
{ 'atletica leggera|2000|E|P', '[[atletica leggera agli XI Giochi paralimpici estivi|Sydney 2000]]' },
-- anno non trovato
{ '|1000|E|P', '\'\'1000 - Nessuna Paralimpiade estiva\'\'' },
-- formatting
{ '|1960|E|P|formatting=label', 'Roma 1960' },
{ '|1960|E|P|formatting=target', 'I Giochi paralimpici estivi' },
{ '|1960|E|P|formatting=città_paese', '[[Roma|Roma]], [[Italia]]' }
})
end
function p:test_giochi_paralimpici_invernali()
self:preprocess_equals_many('{{Link Giochi olimpici/Sandbox|', '}}', {
-- senza disciplina
{ '|1976|I|P', '[[I Giochi paralimpici invernali|Örnsköldsvik 1976]]' },
{ '|1980|I|P', '[[II Giochi paralimpici invernali|Geilo 1980]]' },
{ '|1984|I|P', '[[III Giochi paralimpici invernali|Innsbruck 1984]]' },
{ '|1988|I|P', '[[IV Giochi paralimpici invernali|Innsbruck 1988]]' },
{ '|1992|I|P', '[[V Giochi paralimpici invernali|Tignes 1992]]' },
{ '|1994|I|P', '[[VI Giochi paralimpici invernali|Lillehammer 1994]]' },
{ '|1998|I|P', '[[VII Giochi paralimpici invernali|Nagano 1998]]' },
{ '|2002|I|P', '[[VIII Giochi paralimpici invernali|Salt Lake City 2002]]' },
{ '|2006|I|P', '[[IX Giochi paralimpici invernali|Torino 2006]]' },
{ '|2010|I|P', '[[X Giochi paralimpici invernali|Vancouver 2010]]' },
{ '|2014|I|P', '[[XI Giochi paralimpici invernali|Soči 2014]]' },
{ '|2018|I|P', '[[XII Giochi paralimpici invernali|Pyeongchang 2018]]' },
{ '|2022|I|P', '[[XIII Giochi paralimpici invernali|Pechino 2022]]' },
-- con disciplina
{ 'biathlon|1994|I|P', '[[biathlon ai VI Giochi paralimpici invernali|Lillehammer 1994]]' },
{ 'biathlon|1998|I|P', '[[biathlon ai VII Giochi paralimpici invernali|Nagano 1998]]' },
-- VIII (2002) e XI (2014) edizione iniziano con vocale
{ 'biathlon|2002|I|P', '[[biathlon agli VIII Giochi paralimpici invernali|Salt Lake City 2002]]' },
{ 'biathlon|2014|I|P', '[[biathlon agli XI Giochi paralimpici invernali|Soči 2014]]' },
-- anno non trovato
{ '|1000|I|P', '\'\'1000 - Nessuna Paralimpiade invernale\'\'' },
-- formatting
{ '|1976|I|P|formatting=label', 'Örnsköldsvik 1976' },
{ '|1976|I|P|formatting=target', 'I Giochi paralimpici invernali' },
{ '|1976|I|P|formatting=città_paese', '[[Örnsköldsvik|Örnsköldsvik]], [[Svezia]]' }
})
end
function p:test_giochi_olimpici_giovanili_estivi()
self:preprocess_equals_many('{{Link Giochi olimpici/Sandbox|', '}}', {
-- senza disciplina
{ '|2010|E|G', '[[I Giochi olimpici giovanili estivi|Singapore 2010]]' },
{ '|2014|E|G', '[[II Giochi olimpici giovanili estivi|Nanchino 2014]]' },
{ '|2018|E|G', '[[III Giochi olimpici giovanili estivi|Buenos Aires 2018]]' },
-- con disciplina
{ 'atletica leggera|2010|E|G', '[[atletica leggera ai I Giochi olimpici giovanili estivi|Singapore 2010]]' },
{ 'atletica leggera|2014|E|G', '[[atletica leggera ai II Giochi olimpici giovanili estivi|Nanchino 2014]]' },
-- anno non trovato
{ '|1000|E|G', '\'\'1000 - Nessuna Olimpiade giovanile estiva\'\'' },
-- formatting
{ '|2010|E|G|formatting=label', 'Singapore 2010' },
{ '|2010|E|G|formatting=target', 'I Giochi olimpici giovanili estivi' },
{ '|2010|E|G|formatting=città_paese', '[[Singapore|Singapore]], [[Singapore]]' }
})
end
function p:test_giochi_olimpici_giovanili_invernali()
self:preprocess_equals_many('{{Link Giochi olimpici/Sandbox|', '}}', {
-- senza disciplina
{ '|2012|I|G', '[[I Giochi olimpici giovanili invernali|Innsbruck 2012]]' },
{ '|2016|I|G', '[[II Giochi olimpici giovanili invernali|Lillehammer 2016]]' },
-- con disciplina
{ 'sci alpino|2012|I|G', '[[sci alpino ai I Giochi olimpici giovanili invernali|Innsbruck 2012]]' },
{ 'sci alpino|2016|I|G', '[[sci alpino ai II Giochi olimpici giovanili invernali|Lillehammer 2016]]' },
-- anno non trovato
{ '|1000|I|G', '\'\'1000 - Nessuna Olimpiade giovanile invernale\'\'' },
-- formatting
{ '|2012|I|G|formatting=label', 'Innsbruck 2012' },
{ '|2012|I|G|formatting=target', 'I Giochi olimpici giovanili invernali' },
{ '|2012|I|G|formatting=città_paese', '[[Innsbruck|Innsbruck]], [[Austria]]' }
})
end
return p