/* testparams
Author: Giménez, Christian.
Copyright (C) 2017 Giménez, Christian
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see .
09 ago 2017
*/
:- module(testparams, [
]).
/** testparams: Parameters unit tests.
@author Gimenez, Christian
@license GPLv3
*/
:- license(gplv3).
:- use_module('../prolog/ical/parameters').
:- begin_tests(ical_params).
test(altrep, []) :-
altrep(param(`ALTREP`, [`http://an-uri.com/uri`]),
`ALTREP="http://an-uri.com/uri"`, []).
:- end_tests(ical_params).