我试图使用f90wrap包装一些Fortran,它建立在f2py上。 (我可以使用f2py,但我想扩展一些代码以使用派生类型)。
这是一个简单的.f90
测试代码,我试图包装:
module test_mod
integer::p
end module
我用以下命令编译和包装:
gfortran -fPIC -c test.f90
f90wrap -m test test.f90
f2py-f90wrap -c -m _test f90wrap_*.f90
当我跑:
python test.py
在这个生成的test.py
文件中:
import _test
import f90wrap.runtime
import logging
class Test_Mod(f90wrap.runtime.FortranModule):
"""
Module test_mod
Defined at test.f90 lines 1-3
"""
@property
def p(self):
"""
Element p ftype=integer pytype=int
Defined at test.f90 line 3
"""
return _test.f90wrap_test_mod__get__p()
@p.setter
def p(self, p):
_test.f90wrap_test_mod__set__p(p)
def __str__(self):
ret = ['<test_mod>{\n']
ret.append(' p : ')
ret.append(repr(self.p))
ret.append('}')
return ''.join(ret)
_dt_array_initialisers = []
test_mod = Test_Mod()
我收到以下错误:
File "test.py", line 1, in <module>
import _test
ImportError: _test.cpython-35m-x86_64-linux-gnu.so: undefined symbol: __test_mod_MOD_p
通过f90-wrap repo挖掘并查看了那里的一些测试的makefile,我在下面的.f90文件中看到相同的进程不会产生同样的问题:
module testextends_mod
PUBLIC
! -----------------------------------------------
type Superclass
! IN: Ask subroutine to stop in the middle.
integer :: stop_at = -1 ! -1 --> don't stop
end type Superclass
type, extends(Superclass) :: Subclass1
integer :: nl
end type
type, extends(Superclass) :: Subclass2
integer :: nl
end type
end module
任何人都可以看到我在这里做错了什么?
以下作品:
gfortran -c -O3 -fPIC test.f90
f90wrap -v -m test test.f90
f2py-f90wrap -c -m _test f90wrap_test.f90 test.o