[Swig-cvs] SF.net SVN: swig:[12280] branches/gsoc2009-sploving/Examples/test-suite/ scilab/arrays_global_runme.sci

[<gra...@us...>]

Revision: 12280
          http://swig.svn.sourceforge.net/swig/?rev=12280&view=rev
Author:   grayswandir
Date:     2010-10-15 08:01:54 +0000 (Fri, 15 Oct 2010)

Log Message:
-----------
Test arrays_global added

Added Paths:
-----------
    branches/gsoc2009-sploving/Examples/test-suite/scilab/arrays_global_runme.sci

Added: branches/gsoc2009-sploving/Examples/test-suite/scilab/arrays_global_runme.sci
===================================================================
--- branches/gsoc2009-sploving/Examples/test-suite/scilab/arrays_global_runme.sci	                        (rev 0)
+++ branches/gsoc2009-sploving/Examples/test-suite/scilab/arrays_global_runme.sci	2010-10-15 08:01:54 UTC (rev 12280)
@@ -0,0 +1,20 @@
+exec("swigtest.start", -1);
+
+if array_const_i_get() <> [10, 20] then swingtesterror(); end
+
+if BeginString_FIX44a_get() <> "FIX.a.a" then swingtesterror(); end
+if BeginString_FIX44b_get() <> "FIX.b.b" then swingtesterror(); end
+if BeginString_FIX44c_get() <> "FIX.c.c" then swingtesterror(); end
+if BeginString_FIX44d_get() <> "FIX.d.d" then swingtesterror(); end
+if BeginString_FIX44d_get() <> "FIX.d.d" then swingtesterror(); end
+if BeginString_FIX44b_set(strcat(["12","\0","45"])) <> "" then swingtesterror(); end
+if BeginString_FIX44b_get() <> "12\045" then swingtesterror(); end
+if BeginString_FIX44d_get() <> "FIX.d.d" then swingtesterror(); end
+if BeginString_FIX44e_get() <> "FIX.e.e" then swingtesterror(); end
+if BeginString_FIX44f_get() <> "FIX.f.f" then swingtesterror(); end
+
+if test_a("hello","hi","chello","chi") <> "hi" then swingtesterror(); end
+
+if test_b("1234567","hi") <> "1234567" then swingtesterror(); end
+
+exec("swigtest.quit", -1);


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.