From a9fc113f0b2cc214af7fe68a2684b3e8ee5f1687 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?St=C3=A9phane=20Adjemian=20=28Hermes=29?=
<stephane.adjemian@univ-lemans.fr>
Date: Tue, 17 Nov 2015 11:51:47 +0100
Subject: [PATCH] Added skipline as a missing function.
---
src/initialize_unit_tests_toolbox.m | 6 ++++-
src/missing/skipline/skipline.m | 39 +++++++++++++++++++++++++++++
2 files changed, 44 insertions(+), 1 deletion(-)
create mode 100644 src/missing/skipline/skipline.m
diff --git a/src/initialize_unit_tests_toolbox.m b/src/initialize_unit_tests_toolbox.m
index e18a934..df3db50 100644
--- a/src/initialize_unit_tests_toolbox.m
+++ b/src/initialize_unit_tests_toolbox.m
@@ -3,4 +3,8 @@ unit_tests_src_root = strrep(which('initialize_unit_tests_toolbox'),'initialize_
if ~exist('isoctave','file')
addpath([unit_tests_src_root '/missing/isoctave'])
-end
\ No newline at end of file
+end
+
+if ~exist('skipline','file')
+ addpath([unit_tests_src_root '/missing/skipline'])
+end
diff --git a/src/missing/skipline/skipline.m b/src/missing/skipline/skipline.m
new file mode 100644
index 0000000..5b311ab
--- /dev/null
+++ b/src/missing/skipline/skipline.m
@@ -0,0 +1,39 @@
+function skipline(n, fid)
+% This function prints n newlines to fid
+%
+% INPUTS
+%
+% n [integer] Number of newlines to print
+% fid [integer] file id returned by fopen
+%
+% OUTPUTS
+% None
+%
+
+% Copyright (C) 2013-2014 Dynare Team
+%
+% This file is part of Dynare.
+%
+% Dynare 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.
+%
+% Dynare 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 Dynare. If not, see <http://www.gnu.org/licenses/>.
+
+if nargin < 2
+ fid = 1;
+ if nargin < 1
+ n = 1;
+ end
+end
+
+for i=1:n
+ fprintf(fid,'\n');
+end
\ No newline at end of file
--
GitLab