dwww Home | Show directory contents | Find package

exec("swigtest.start", -1);

// Class Klass
try
  klass = new_Klass("allprotected_klass")
catch
  swigtesterror(lasterror());
end

checkequal(Klass_getName(klass), "allprotected_klass",  "Klass_getName(new_Klass(""allprotected_klass""))");

// Class PubBase
try
  pubBase = new_PubBase("allprotected_PubBase");
catch
  swigtesterror(lasterror());
end

checkequal(PubBase_virtualMethod(pubBase), "PublicBase", "PubBase_virtualMethod(pubBase)");

class = PubBase_instanceMethod(pubBase, klass);
checkequal(Klass_getName(class), "allprotected_klass", "Klass_getName(PubBase_instanceMethod(pubBase, klass))");

class = PubBase_instanceOverloaded(pubBase, klass);
checkequal(Klass_getName(class), "allprotected_klass", "Klass_getName(PubBase_instanceOverloaded(pubBase, klass))");

class = PubBase_instanceOverloaded(pubBase, klass, "allprotected_klass2");
checkequal(Klass_getName(class), "allprotected_klass2", "Klass_getName(PubBase_instanceOverloaded(pubBase, klass, ""allprotected_klass2""))");

class = PubBase_staticMethod(klass);
checkequal(Klass_getName(class), "allprotected_klass", "Klass_getName(PubBase_staticMethod(klass))");

class = PubBase_staticOverloaded(klass);
checkequal(Klass_getName(class), "allprotected_klass", "Klass_getName(PubBase_staticOverloaded(klass))");


class = PubBase_staticOverloaded(klass, "allprotected_klass3");
checkequal(Klass_getName(class), "allprotected_klass3", "Klass_getName(PubBase_staticOverloaded(klass, ""allprotected_klass3""))");

checkequal(PubBase_EnumVal1_get(), 0, "PubBase_EnumVal1_get()");
checkequal(PubBase_EnumVal2_get(), 1, "(PubBase_EnumVal2_get()");

v=getversion("scilab");
if v(1) < 6 then
    PubBase_instanceMemb_set(pubBase, 12);
    checkequal(PubBase_instanceMemb_get(pubBase), 12, "PubBase_instanceMemb_get(pubBase)");
else
    PubBase_instanceMemberVariable_set(pubBase, 12);
    checkequal(PubBase_instanceMemberVariable_get(pubBase), 12, "PubBase_instanceMemberVariable_get(pubBase)");
end

if v(1) < 6 then
    checkequal(PubBase_staticConstM_get(), 20, "PubBase_staticConstMemberVariable_get()");
    checkequal(PubBase_staticMember_get(), 10, "PubBase_staticMemberVariable_get()")
else
    checkequal(PubBase_staticConstMemberVariable_get(), 20, "PubBase_staticConstMemberVariable_get()");
    checkequal(PubBase_staticMemberVariable_get(), 10, "PubBase_staticMemberVariable_get()")
end

PubBase_stringMember_set(pubBase, "dummy");
checkequal(PubBase_stringMember_get(pubBase), "dummy", "PubBase_stringMember_get()");

// TODO does not work (wrong ENUM mapping?)
//PubBase_anEnum_get(PubBase)
//PubBase_anEnum_set(PubBase, ???)


// Class ProcBase
try
// Constructor is propected and must not be defined here
  ProcBase = new_ProctectedBase("allprotected_ProcBase");
  swigtesterror();
catch
end

checkequal(ProcBase_EnumVal1_get(), 0, "ProcBase_EnumVal1_get()");
checkequal(ProcBase_EnumVal2_get(), 1, "ProcBase_EnumVal2_get()");

try
  delete_Klass(klass);
catch
  swigtesterror();
end
try
  delete_PubBase(pubBase);
catch
  swigtesterror();
end

exec("swigtest.quit", -1);

Generated by dwww version 1.15 on Tue Jul 2 00:31:09 CEST 2024.