1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
|
from numpy.testing import *
from numpy import array
import math
import util
class TestF77Callback(util.F2PyTest):
code = """
subroutine t(fun,a)
integer a
cf2py intent(out) a
external fun
call fun(a)
end
subroutine func(a)
cf2py intent(in,out) a
integer a
a = a + 11
end
subroutine func0(a)
cf2py intent(out) a
integer a
a = 11
end
subroutine t2(a)
cf2py intent(callback) fun
integer a
cf2py intent(out) a
external fun
call fun(a)
end
"""
@dec.slow
def test_all(self):
for name in "t,t2".split(","):
self.check_function(name)
def check_function(self, name):
t = getattr(self.module, name)
r = t(lambda : 4)
assert_( r==4,`r`)
r = t(lambda a:5,fun_extra_args=(6,))
assert_( r==5,`r`)
r = t(lambda a:a,fun_extra_args=(6,))
assert_( r==6,`r`)
r = t(lambda a:5+a,fun_extra_args=(7,))
assert_( r==12,`r`)
r = t(lambda a:math.degrees(a),fun_extra_args=(math.pi,))
assert_( r==180,`r`)
r = t(math.degrees,fun_extra_args=(math.pi,))
assert_( r==180,`r`)
r = t(self.module.func, fun_extra_args=(6,))
assert_( r==17,`r`)
r = t(self.module.func0)
assert_( r==11,`r`)
r = t(self.module.func0._cpointer)
assert_( r==11,`r`)
class A(object):
def __call__(self):
return 7
def mth(self):
return 9
a = A()
r = t(a)
assert_( r==7,`r`)
r = t(a.mth)
assert_( r==9,`r`)
if __name__ == "__main__":
import nose
nose.runmodule()
|
