Initial commit of Octave module.
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10290 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
50b1578e19
commit
393391965c
275 changed files with 14004 additions and 5 deletions
25
Examples/test-suite/octave/array_member_runme.m
Normal file
25
Examples/test-suite/octave/array_member_runme.m
Normal file
|
|
@ -0,0 +1,25 @@
|
|||
array_member
|
||||
|
||||
f = Foo();
|
||||
f.data = cvar.global_data;
|
||||
|
||||
for i=0:7,
|
||||
if (get_value(f.data,i) != get_value(cvar.global_data,i))
|
||||
error("Bad array assignment");
|
||||
endif
|
||||
endfor
|
||||
|
||||
for i=0:7,
|
||||
set_value(f.data,i,-i);
|
||||
endfor
|
||||
|
||||
cvar.global_data = f.data;
|
||||
|
||||
for i=0:7,
|
||||
if (get_value(f.data,i) != get_value(cvar.global_data,i))
|
||||
error("Bad array assignment")
|
||||
endif
|
||||
endfor
|
||||
|
||||
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue