?????????? ????????? - ??????????????? - /usr/lib64/python3.9/site-packages/numpy/distutils/__pycache__/from_template.cpython-39.opt-1.pyc
???????
a z[yc� � @ s� d Z ddgZddlZddlZddlZe�dej�Ze�dej�Ze�dej�Z dd � Z e�d �Z e�d �Z e�d �Z d d� Zdd� Ze�d�Zdd� Zdd� Ze�d�Zdd� Zdd� Ze�dej�Zdd � Zd d� Zed �Zd d � Zed!kr�e� dS )"a� process_file(filename) takes templated file .xxx.src and produces .xxx file where .xxx is .pyf .f90 or .f using the following template rules: '<..>' denotes a template. All function and subroutine blocks in a source file with names that contain '<..>' will be replicated according to the rules in '<..>'. The number of comma-separated words in '<..>' will determine the number of replicates. '<..>' may have two different forms, named and short. For example, named: <p=d,s,z,c> where anywhere inside a block '<p>' will be replaced with 'd', 's', 'z', and 'c' for each replicate of the block. <_c> is already defined: <_c=s,d,c,z> <_t> is already defined: <_t=real,double precision,complex,double complex> short: <s,d,c,z>, a short form of the named, useful when no <p> appears inside a block. In general, '<..>' contains a comma separated list of arbitrary expressions. If these expression must contain a comma|leftarrow|rightarrow, then prepend the comma|leftarrow|rightarrow with a backslash. If an expression matches '\<index>' then it will be replaced by <index>-th expression. Note that all '<..>' forms in a block must have the same number of comma-separated entries. Predefined named template rules: <prefix=s,d,c,z> <ftype=real,double precision,complex,double complex> <ftypereal=real,double precision,\0,\1> <ctype=float,double,complex_float,complex_double> <ctypereal=float,double,\0,\1> � process_str� process_file� Nz2(\n|\A)(( (\$|\*))|)\s*(subroutine|function)\bz+\n\s*end\s*(subroutine|function)\b.*(\n|\Z)z\n (\$|\*)\s*function\bc C s� g }d}t �| |�}|du r q�|�� }t�| ||�� �rl| �d||�}|dkrPql|}| ||d � dkr8qlq8|d7 }t�| |�� �}|r�|�� d p�t| � }}|� ||f� q|S )z� Return a list of tuples for each function or subroutine each tuple is the start and end of a subroutine or function to be expanded. r N� ���� z $� ) �routine_start_re�search�start�function_start_re�match�end�rfind�routine_end_re�len�append)�astrZspanlistZind�mr �ir � r �C/usr/lib64/python3.9/site-packages/numpy/distutils/from_template.py�parse_structure: s$ r z<\s*(\w[\w\d]*)\s*>z <\s*(\w[\w\d]*)\s*=\s*(.*?)\s*>z<\s*((.*?))\s*>c C sP t �| �}i }|D ]8}|d �� p(t|�}|d �dd�}t|�}|||< q|S )Nr r �\,�@comma@)�named_re�findall�strip� unique_key�replace�conv)r Zreps�namesZrep�name�repl�thelistr r r �find_repl_patternsY s r$ c C s" t | �}t�td| �d } | |fS )N� r )r$ �re�subnr )r r r r r � find_and_remove_repl_patternsc s r( z\A\\(?P<index>\d+)\Zc C s` | � d�}dd� |D �}tt|��D ]0}t�|| �}|r$t|�d��}|| ||< q$d�|�S )N�,c S s g | ] }|� � �qS r )r )�.0�xr r r � <listcomp>k � zconv.<locals>.<listcomp>�index)�split�ranger �item_rer �int�group�join)r �b�lr r �jr r r r i s r c C s< t | �� �}d}d}|s8d| }||v r2|d7 }qd}q|S )z( Obtain a unique key given a dictionary.Fr z__l%sT)�list�keys)ZadictZallkeysZdone�nZnewkeyr r r r s s r z\A\s*(\w[\w\d]*)\s*\Zc sl | � dd�} | � dd�} t| ��t�d| �} �fdd�}t�|| �} d }d }i �t�| �D ]�}|�vrZ��||�|d ��}|d u r�td| ��||vr�|� d �s�|||< d d � |� d �D �}t |�}|d u r�|}|�|< |}qZ||kr�|�|< qZt d |d � �| �||f � qZ��s| S � �fdd�} d} t|�D ]� | t�| | �d 7 } �q4| � dd�} | � dd�} | S )Nz\>z @rightarrow@z\<z @leftarrow@z<\1>c sj t | �d��dd��}t�|�r(d| S d }� �� D ]}� | |kr4|}q4|d u rbt� �}|� |< d| S )Nr r r z<%s>)r r3 r �template_name_rer r9 r )�mobjr# r! �key)�lnamesr r �listrepl� s z expand_sub.<locals>.listreplz No replicates found for <%s>�_c S s g | ]}|� d d��qS )r r) )r )r* r r r r r, � r- z expand_sub.<locals>.<listcomp>r) zHMismatch in number of replacements (base <%s=%s>) for <%s=%s>. Ignoring.c s$ | � d�}��|� d |g �� S )Nr )r3 �get)r< r! )�k�rulesr r �namerepl� s z expand_sub.<locals>.namereplr% z �>�<)r r$ r �sub�list_re� template_rer rA � ValueError� startswithr/ r �printr4 r0 ) Zsubstrr r? ZnumsubsZ base_rule�rr# ZruleZnumrD �newstrr )rB r> rC r � expand_sub� sH � rO c C s� | }d}t |�}d}i }|�t� |D ]T}t|||d � �\}}||7 }|�|� |t||d |d � |�7 }|d }q&|||d � 7 }|S )Nr% r r )r �update�_special_namesr( rO ) �allstrrN �writestr�structZoldendr rG Z cleanedstrZdefsr r r r � s z8(\n|\A)\s*include\s*['\"](?P<name>[\w\d./\\]+\.src)['\"]c C s� t j�| �}t| ���}g }|D ]h}t�|�}|r||�d�}t j�|�sTt j�||�}t j� |�rp|� t |�� q�|� |� q |� |� q W d � n1 s�0 Y |S )Nr! ) �os�path�dirname�open�include_src_rer r3 �isabsr4 �isfile�extend�resolve_includesr )�source�d�fid�lines�liner �fnr r r r] � s *r] c C s t | �}td�|��S )Nr% )r] r r4 )r^ ra r r r r � s z� <_c=s,d,c,z> <_t=real,double precision,complex,double complex> <prefix=s,d,c,z> <ftype=real,double precision,complex,double complex> <ctype=float,double,complex_float,complex_double> <ftypereal=real,double precision,\0,\1> <ctypereal=float,double,\0,\1> c C st zt jd } W n ty, t j}t j}Y n*0 t| d�}tj�| �\}}|}t|d�}|� � }t |�}|� |� d S )Nr rM �w) �sys�argv� IndexError�stdin�stdoutrX rU rV �splitext�readr �write)�filer` Zoutfile�base�extZnewnamerR rS r r r �main� s rp �__main__) �__doc__�__all__rU re r& �compile�Ir r r r rI r rH r$ r( r1 r r r; rO r rY r] r rQ rp �__name__r r r r �<module> s4 . <
| ver. 1.6 |
Github
|
.
| PHP 8.2.30 | ??????????? ?????????: 0 |
proxy
|
phpinfo
|
???????????