From 4b1e081eef45d537b46211c32791e7dc91c5322c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?St=C3=A9phane=20Adjemian=20=28Charybdis=29?=
 <stephane.adjemian@univ-lemans.fr>
Date: Wed, 11 Nov 2015 22:22:26 +0100
Subject: [PATCH] Added unit test.

---
 src/@dates/subsref.m | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

diff --git a/src/@dates/subsref.m b/src/@dates/subsref.m
index 55314c7..9f14322 100644
--- a/src/@dates/subsref.m
+++ b/src/@dates/subsref.m
@@ -327,3 +327,22 @@ end
 %$ T = all(t);
 %@eof:6
 
+%@test:7
+%$ % Define a dates object
+%$ B = dates('1950Q1','1950Q2','1950Q3','1950Q4','1951Q1');
+%$
+%$ % Try to extract a sub-dates object.
+%$ try
+%$     d = B([]);
+%$     t(1) = true;
+%$ catch
+%$     t(1) = false;
+%$ end
+%$
+%$ if t(1)
+%$     t(2) = dassert(isa(d,'dates'), true);
+%$     t(3) = dassert(isempty(d), true);
+%$ end
+%$ T = all(t);
+%@eof:7
+
-- 
GitLab