mirror of https://github.com/swig/swig
82 lines
2.2 KiB
Lua
82 lines
2.2 KiB
Lua
require("import") -- the import fn
|
|
import("overload_template") -- import code
|
|
for k,v in pairs(overload_template) do _G[k]=v end -- move to global
|
|
|
|
-- lua has only one numeric type, so maximum(int,int) and maximum(double,double) are the same
|
|
-- whichever one was wrapper first will be used (which is int)
|
|
|
|
f = foo()
|
|
|
|
a = maximum(3,4)
|
|
|
|
-- mix 1
|
|
assert(mix1("hi") == 101)
|
|
assert(mix1(1.0, 1.0) == 102)
|
|
assert(mix1(1.0) == 103)
|
|
|
|
-- mix 2
|
|
assert(mix2("hi") == 101)
|
|
assert(mix2(1.0, 1.0) == 102)
|
|
assert(mix2(1.0) == 103)
|
|
|
|
-- mix 3
|
|
assert(mix3("hi") == 101)
|
|
assert(mix3(1.0, 1.0) == 102)
|
|
assert(mix3(1.0) == 103)
|
|
|
|
-- Combination 1
|
|
assert(overtparams1(100) == 10)
|
|
assert(overtparams1(100.0, 100) == 20)
|
|
|
|
-- Combination 2
|
|
assert(overtparams2(100.0, 100) == 40)
|
|
|
|
-- Combination 3
|
|
assert(overloaded() == 60)
|
|
assert(overloaded(100.0, 100) == 70)
|
|
|
|
-- Combination 4
|
|
assert(overloadedagain("hello") == 80)
|
|
assert(overloadedagain() == 90)
|
|
|
|
-- specializations
|
|
assert(specialization(10) == 202 or specialization(10.0) == 203) -- only one works
|
|
assert(specialization(10, 10) == 204 or specialization(10.0, 10.0) == 205) -- ditto
|
|
assert(specialization("hi", "hi") == 201)
|
|
|
|
-- simple specialization
|
|
xyz()
|
|
xyz_int()
|
|
xyz_double()
|
|
|
|
-- a bit of everything
|
|
assert(overload("hi") == 0)
|
|
assert(overload(1) == 10)
|
|
assert(overload(1, 1) == 20)
|
|
assert(overload(1, "hello") == 30)
|
|
|
|
k = Klass()
|
|
assert(overload(k) == 10)
|
|
assert(overload(k, k) == 20)
|
|
assert(overload(k, "hello") == 30)
|
|
-- this one is incorrect: it mactches overload(10.0, "hi") with int overload(T t, const char *c)
|
|
--print(overload(10.0, "hi"))
|
|
--assert(overload(10.0, "hi") == 40)
|
|
assert(overload() == 50)
|
|
|
|
-- everything put in a namespace
|
|
assert(nsoverload("hi") == 1000,"nsoverload()")
|
|
assert(nsoverload(1) == 1010,"nsoverload(int t)")
|
|
assert(nsoverload(1, 1) == 1020,"nsoverload(int t, const int &)")
|
|
assert(nsoverload(1, "hello") == 1030,"nsoverload(int t, const char *)")
|
|
assert(nsoverload(k) == 1010,"nsoverload(Klass t)")
|
|
assert(nsoverload(k, k) == 1020,"nsoverload(Klass t, const Klass &)")
|
|
assert(nsoverload(k, "hello") == 1030,"nsoverload(Klass t, const char *)")
|
|
-- again this one fails
|
|
--assert(nsoverload(10.0, "hi") == 1040,"nsoverload(double t, const char *)")
|
|
assert(nsoverload() == 1050,"nsoverload(const char *)")
|
|
|
|
A_foo(1)
|
|
b = B()
|
|
b:foo(1)
|