blob: bfa509abef90261c5d722cf5da82eaa493fc2150 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
link loadfuncpp
procedure main()
myext := loadfuncpp("./isexternal.so", "myext", 0)
ismine := loadfuncpp("./isexternal.so", "ismine", 1)
x := myext()
write(image(x))
write(image(type(x)))
write("is mine? ", ismine(x))
write("is also mine? ", ismine(3))
end
|
