From 0dfe2214b52373aeef52ece3e1e496b77a1ea74b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?St=C3=A9phane=20Adjemian=20=28Charybdis=29?=
<stephane.adjemian@univ-lemans.fr>
Date: Tue, 23 Jun 2015 09:51:30 +0200
Subject: [PATCH] Added unit test.
---
src/@dates/intersect.m | 13 +++++++++++++
1 file changed, 13 insertions(+)
diff --git a/src/@dates/intersect.m b/src/@dates/intersect.m
index 5518d13..d8b7b26 100644
--- a/src/@dates/intersect.m
+++ b/src/@dates/intersect.m
@@ -67,3 +67,16 @@ q.time = time;
%$ t(2) = dassert(isempty(c2),true);
%$ T = all(t);
%@eof:1
+
+%@test:2
+%$ % Define some dates objects
+%$ d1 = dates('1950Q1'):dates('1969Q4') ;
+%$ d2 = dates('1950Q1'):dates('1969Q4') ;
+%$
+%$ % Call the tested routine.
+%$ c1 = intersect(d1,d2);
+%$
+%$ % Check the results.
+%$ t(1) = dassert(c1,d1);
+%$ T = all(t);
+%@eof:2
--
GitLab