jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Initial commit of Octave module.

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10290 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Xavier Delacour 2008-03-01 23:35:44 +00:00
commit 393391965c
275 changed files with 14004 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

135
Examples/test-suite/octave/std_containers_runme.m Normal file
View file

@ -0,0 +1,135 @@
std_containers
cube = {{{1, 2}, {3, 4}}, {{5, 6}, {7, 8}}};
icube = std_containers.cident(cube);
for i=len(cube),
if (cube{i} != icube{i})
error("bad cident")
endif
endfor
p = {1,2};
if (p != std_containers.pident(p))
error("bad pident")
endif
v = {1,2,3,4,5,6};
iv = std_containers.vident(v);
for i=0:len(v),
if (v{i} != iv{i})
error("bad vident")
endif
endfor
iv = std_containers.videntu(v);
for i=0:len(v),
if (v{i} != iv{i})
error("bad videntu")
endif
endfor
vu = std_containers.vector_ui(v);
if (vu{2} != std_containers.videntu(vu){2})
error("bad videntu")
endif
if (v(0:3)(1) != vu(0:3)(1))
error("bad getslice")
endif
m = {[1,2,3],[2,3],[3,4]};
im = std_containers.midenti(m);
for i=0:len(m),
for j=0:len(m(i)),
if (m(i)(j) != im(i)(j))
error("bad getslice")
endif
endfor
endfor
m = {[1,0,1],[1,1],[1,1]};
im = std_containers.midentb(m);
for i=0:len(m),
for j in range(0,len(m[i])):
if (m(i)(j) != im(i)(j))
error("bad getslice")
endif
endfor
endfor
mi = std_containers.imatrix(m);
mc = std_containers.cmatrix(m);
if (mi(0)(1) != mc(0)(1))
error("bad matrix")
endif
map ={};
map{'hello'} = 1;
map{'hi'} = 2;
map{'3'} = 2;
imap = std_containers.mapident(map);
for k in map,
if (map(k) != imap(k))
error("bad map")
endif
endfor
mapc ={};
c1 = std_containers.C();
c2 = std_containers.C();
mapc(1) = swig_this(c1);
mapc(2) = c2;
std_containers.mapidentc(mapc);
vi = std_containers.vector_i([2,2,3,4]);
v = [1,2];
v1 = std_containers.v_inout(vi);
vi(1), v1(1);
[v1,v2] = std_containers.v_inout2(v1,v2);
a1 = std_containers.A(1);
a2 = std_containers.A(2);
p1 = {1,a1};
p2 = {2,a2};
v = (p1,p2);
v2= std_containers.pia_vident(v);
v2(0)(1).a;
v2(1)(1).a;
v3 = std_containers.vector_piA(v2);
v3(0)(1).a;
v3(1)(1).a;
s = std_containers.set_i();
s.append(1);
s.append(2);
s.append(3);
j=1;
for i in s,
if (i != j)
error
endif
j = j + 1;
endfor