U
|
P ±d ã @ s d dl Z d dlZd dlZd dlmZ ddlmZ G dd dejZej j
|
e ¡ dkdd ej j
|
e ej ¡jd
|
k d d G d d d eZG dd deZdS )é N)Úarrayé )Úutilc @ s e Zd Zdd ZdS )ÚTestReturnRealc C s® |dkrd}nd}t |dd |ks*tt |dd |ksBtt |dd |ksZtt |dd |ksrtt |d d |kstt |dgd |ks¤tt |d
|
d |ks¼tt |tdd |ksØtt |tdgd |ksött |tdggd |kstt |tdg d ¡d |ks>tt |tdgd d |ks`tt |tdgdd |kstt |tdgdd |ks¤tt |tdgdd |ksÆtt |tdgdd |ksètt |tdgdd |ks
|
t|dkr*|d|dks*tt t|d¡ t t|g ¡ t t|d¡ t t||¡ t t|i ¡ z"|dd }t |dkstW n t
|
k
|
r¨ Y nX d S )N)Út0Zt4Ús0Zs4gñhãµøä>g éê g @m@g33333Sm@Z234z234.6iÿÿÿ)r Úbé ÚhÚiÚlÚBÚfÚdgZb××çtigu <ä7~Úabc© é
|
i )ÚinfÚInfinity) ÚabsÚAssertionErrorr ZastypeÚpytestZraisesÚ
|
ValueErrorÚ
|
IndexErrorÚ ExceptionÚreprÚ OverflowError)ÚselfÚtZtnameÚerrÚrr r úXd:\z\workplace\vscode\pyvenv\venv\Lib\site-packages\numpy/f2py/tests/test_return_real.pyÚcheck_function
|
s@ "&""""""
|
z TestReturnReal.check_functionN)Ú__name__Ú
|
__module__Ú __qualname__r# r r r r" r s r ÚDarwinzVProne to error when run with numpy/f2py/tests on mac os, but not when run in isolation)Úreasoné z32-bit builds are buggyc @ s4 e Zd ZdZdZdZej dd d¡¡dd Z
|
d S )
|
ÚTestCReturnRealz.pyfZc_ext_return_realax
|
python module c_ext_return_real
|
usercode '''
|
float t4(float value) { return value; }
|
void s4(float *t4, float value) { *t4 = value; }
|
double t8(double value) { return value; }
|
void s8(double *t8, double value) { *t8 = value; }
|
'''
|
interface
|
function t4(value)
|
real*4 intent(c) :: t4,value
|
end
|
function t8(value)
|
real*8 intent(c) :: t8,value
|
end
|
subroutine s4(t4,value)
|
intent(c) s4
|
real*4 intent(out) :: t4
|
real*4 intent(c) :: value
|
end
|
subroutine s8(t8,value)
|
intent(c) s8
|
real*8 intent(out) :: t8
|
real*8 intent(c) :: value
|
end
|
end interface
|
end python module c_ext_return_real
|
Únamez t4,t8,s4,s8ú,c C s | t| j||¡ d S ©N©r# ÚgetattrÚmodule©r r+ r r r" Útest_all\ s zTestCReturnReal.test_allN) r$ r% r& ÚsuffixÚ module_nameÚcoder ÚmarkÚ parametrizeÚsplitr2 r r r r" r* 3 s
|
|
r* c @ sd e Zd Ze dddd¡e dddd¡gZej dd d¡¡d d
|
Z
|
ej dd d¡¡d d Z d S )ÚTestFReturnRealÚtestsÚsrcZ return_realzfoo77.fz foo90.f90r+ zt0,t4,t8,td,s0,s4,s8,sdr, c C s | t| j||¡ d S r- r. r1 r r r" Ú test_all_f77g s z TestFReturnReal.test_all_f77c C s | t| jj||¡ d S r- )r# r/ r0 Zf90_return_realr1 r r r" Ú test_all_f90k s z TestFReturnReal.test_all_f90N) r$ r% r& r ZgetpathÚsourcesr r6 r7 r8 r< r= r r r r" r9 a s þ
|
r9 )Úplatformr ÚnumpyÚnpr Ú r ZF2PyTestr r6 ZskipifÚsystemZdtypeZintpÚitemsizer* r9 r r r r" Ú<module> s *
|
þþ%
|
