From 42659d6cdbe63972aea27baf0289db8fcc1310fa Mon Sep 17 00:00:00 2001
From: pmarecha
Date: Thu, 5 Jun 2008 08:49:05 +0000
Subject: SVN is not FTP !

---
 src/Scilab2C/GeneralFunctions/SCI2Cerror.sci | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 src/Scilab2C/GeneralFunctions/SCI2Cerror.sci

(limited to 'src/Scilab2C/GeneralFunctions/SCI2Cerror.sci')

diff --git a/src/Scilab2C/GeneralFunctions/SCI2Cerror.sci b/src/Scilab2C/GeneralFunctions/SCI2Cerror.sci
new file mode 100644
index 00000000..444dcff5
--- /dev/null
+++ b/src/Scilab2C/GeneralFunctions/SCI2Cerror.sci
@@ -0,0 +1,11 @@
+function SCI2Cerror(errorstring);
+// function SCI2Cerror(errorstring);
+// -----------------------------------------------------------------
+// It is the error function but before issuing the error, perorms
+// the mclose('all');
+// 02-May-2006 -- Nutricato Raffaele: Author.
+// -----------------------------------------------------------------
+
+mclose('all')
+error('###########SCI2C_ERROR: '+errorstring);
+endfunction
-- 
cgit