Add nonregression test for bug 2181

2 files changed, 32 insertions, 0 deletions

diff --git a/tests/nonRegression/bug2181.sci b/tests/nonRegression/bug2181.sci
new file mode 100644
index 0000000..ac163ee
--- /dev/null
+++ b/tests/nonRegression/bug2181.sci
@@ -0,0 +1,31 @@
+// Non-regression test file for bug 2181
+// Pierre MARECHAL - Scilab Project
+// Copyright INRIA
+// 30 octobre 2006
+
+mode(-1);
+clear;
+
+if MSDOS then
+        
+        test1 = getrelativefilename("D:\","C:\Program Files\scilab\readme.txt");
+        test2 = getrelativefilename("C:\","C:\Program Files\scilab\readme.txt");
+        test3 = getrelativefilename("C:\Documents and Settings","C:\Program Files\scilab\readme.txt");
+        test4 = getrelativefilename("C:\PROGRAM FILES\toto","c:\program files\scilab\readme.txt");
+        
+        res1 = ( test1 == "C:\Program Files\scilab\readme.txt" );
+        res2 = ( test2 == "C:\Program Files\scilab\readme.txt" );
+        res3 = ( test3 == "..\Program Files\scilab\readme.txt" );
+        res4 = ( test4 == "..\scilab\readme.txt" );
+        
+        if (res1 & res2 & res3) then 
+                affich_result(%T,2181);
+        else
+                affich_result(%F,2181);
+        end
+        
+else
+        affich_result(%T,2181);
+end
+
+clear
diff --git a/tests/nonRegression/list_nonreg.txt b/tests/nonRegression/list_nonreg.txt
index b9d5fa8..39b5ea5 100644
--- a/tests/nonRegression/list_nonreg.txt
+++ b/tests/nonRegression/list_nonreg.txt
@@ -154,3 +154,4 @@
 2137
 2149
 2162
+2181