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

Use a different assert in octave check 'module_path' for some octave version

Browse source 
Octave >= 4.4 < 6 seem to handle the SWIG generated .oct files differently.
Before the .oct file e.g. swigexample.oct is loaded exists('swigexample')
returns 3 (name is a ‘.oct’ or ‘.mex’ file in Octave’s path.)
After loading swigexample.oct exists('swigexample') returns 1 (name is a variable.)
Whereas all other octave version return always 3.
isglobal('swigexample') return always true.
This commit is contained in:
Markus Friedrich 2022-01-16 22:13:09 +01:00
commit d0121bff6e
1 changed files with 24 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

28
Examples/octave/module_load/runme.m
View file

@ -19,7 +19,12 @@ clear all
# load module in a function globally before base context
clear all;
function testme_1
assert(exist("swigexample") == 3);
if compare_versions(version(), '4.4', '>=') && compare_versions(version(), '6', '<')
% in octave >= 4.4 < 6 'swigexample' is recognized as variable (1) instead of a .oct file (3) on the second call of 'swigexample'
assert(exist("swigexample") == 3 || exist("swigexample") == 1);
else
assert(exist("swigexample") == 3);
end
swigexample;
assert(isglobal("swigexample"));
assert(cvar.ivar == ifunc);
@ -32,7 +37,12 @@ assert(isglobal("swigexample"));
assert(cvar.ivar == ifunc);
clear all
function testme_2
assert(exist("swigexample") == 3);
if compare_versions(version(), '4.4', '>=') && compare_versions(version(), '6', '<')
% in octave >= 4.4 < 6 'swigexample' is recognized as variable (1) instead of a .oct file (3) on the second call of 'swigexample'
assert(exist("swigexample") == 3 || exist("swigexample") == 1);
else
assert(exist("swigexample") == 3);
end
swigexample;
assert(isglobal("swigexample"));
assert(cvar.ivar == ifunc);
@ -52,7 +62,12 @@ swigexample;
assert(isglobal("swigexample"));
assert(cvar.ivar == ifunc);
function testme_3
assert(exist("swigexample") == 3);
if compare_versions(version(), '4.4', '>=') && compare_versions(version(), '6', '<')
% in octave >= 4.4 < 6 'swigexample' is recognized as variable (1) instead of a .oct file (3) on the second call of 'swigexample'
assert(exist("swigexample") == 3 || exist("swigexample") == 1);
else
assert(exist("swigexample") == 3);
end
swigexample;
assert(isglobal("swigexample"));
assert(cvar.ivar == ifunc);
@ -65,7 +80,12 @@ swigexample;
assert(isglobal("swigexample"));
assert(cvar.ivar == ifunc);
function testme_4
assert(exist("swigexample") == 3);
if compare_versions(version(), '4.4', '>=') && compare_versions(version(), '6', '<')
% in octave >= 4.4 < 6 'swigexample' is recognized as variable (1) instead of a .oct file (3) on the second call of 'swigexample'
assert(exist("swigexample") == 3 || exist("swigexample") == 1);
else
assert(exist("swigexample") == 3);
end
swigexample;
assert(isglobal("swigexample"));
assert(cvar.ivar == ifunc);