test_common.py 868 B

123456789101112131415161718192021222324252627
  1. from __future__ import division, absolute_import, print_function
  2. import os
  3. import sys
  4. import pytest
  5. import numpy as np
  6. from . import util
  7. from numpy.testing import assert_array_equal
  8. def _path(*a):
  9. return os.path.join(*((os.path.dirname(__file__),) + a))
  10. class TestCommonBlock(util.F2PyTest):
  11. sources = [_path('src', 'common', 'block.f')]
  12. @pytest.mark.skipif(sys.platform=='win32',
  13. reason='Fails with MinGW64 Gfortran (Issue #9673)')
  14. def test_common_block(self):
  15. self.module.initcb()
  16. assert_array_equal(self.module.block.long_bn,
  17. np.array(1.0, dtype=np.float64))
  18. assert_array_equal(self.module.block.string_bn,
  19. np.array('2', dtype='|S1'))
  20. assert_array_equal(self.module.block.ok,
  21. np.array(3, dtype=np.int32))