Non reg test for bug 3784
Sylvestre Ledru [Mon, 8 Dec 2008 07:08:51 +0000 (08:08 +0100)]
scilab/modules/localization/tests/nonreg_tests/bug_3784.dia.ref [new file with mode: 0644]
scilab/modules/localization/tests/nonreg_tests/bug_3784.tst [new file with mode: 0644]

diff --git a/scilab/modules/localization/tests/nonreg_tests/bug_3784.dia.ref b/scilab/modules/localization/tests/nonreg_tests/bug_3784.dia.ref
new file mode 100644 (file)
index 0000000..95148fb
--- /dev/null
@@ -0,0 +1,16 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - INRIA - Sylvestre LEDRU
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+// <-- Non-regression test for bug 3784 -->
+//
+// <-- Bugzilla URL -->
+// http://bugzilla.scilab.org/show_bug.cgi?id=3784
+//
+// <-- Short Description -->
+//    When Scilab is launched in French, bad read of the values
+// <-- FRENCH IMPOSED -->
+a=read(SCI+"/modules/graphics/demos/anim/anim6/yt.wrt",20,201);
+if (a(1,2) == - 7.) then bugmes();quit;end
diff --git a/scilab/modules/localization/tests/nonreg_tests/bug_3784.tst b/scilab/modules/localization/tests/nonreg_tests/bug_3784.tst
new file mode 100644 (file)
index 0000000..17fb731
--- /dev/null
@@ -0,0 +1,18 @@
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2008 - INRIA - Sylvestre LEDRU
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- Non-regression test for bug 3784 -->
+//
+// <-- Bugzilla URL -->
+// http://bugzilla.scilab.org/show_bug.cgi?id=3784
+//
+// <-- Short Description -->
+//    When Scilab is launched in French, bad read of the values
+// <-- FRENCH IMPOSED -->
+
+a=read(SCI+"/modules/graphics/demos/anim/anim6/yt.wrt",20,201);
+if (a(1,2) == - 7.) then pause, end