Ñò
™ÙÊKc @ sØ d Z d d g Z d d k Z d d k Z d d k Z e i d e i ƒ Z e i d e i ƒ Z e i d e i ƒ Z d „ Z
e i d ƒ Z e i d
ƒ Z e i d ƒ Z
d „ Z e i d
ƒ Z d „ Z d „ Z e i d ƒ Z d „ Z d „ Z e i d e i ƒ Z d „ Z d „ Z e d ƒ Z e d j ož y e i d Z Wn% e j
o e i Z e i Z n> Xe! e d ƒ Z e i" i# e ƒ \ Z$ Z% e$ Z& e! e& d ƒ Z e i' ƒ Z( e e( ƒ Z) e i* e) ƒ n d S( sÆ
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-separeted words in '<..>' will determine the number of
replicates.
'<..>' may have two different forms, named and short. For example,
named:
where anywhere inside a block '' 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:
, a short form of the named, useful when no 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 '\' then it will be replaced
by -th expression.
Note that all '<..>' forms in a block must have the same number of
comma-separated entries.
Predefined named template rules:
t process_strt process_fileiÿÿÿÿNs2 (\n|\A)(( (\$|\*))|)\s*(subroutine|function)\bs+ \n\s*end\s*(subroutine|function)\b.*(\n|\Z)s \n (\$|\*)\s*function\bc C s g } d } x t i | | ƒ } | d j o Pn | i ƒ } t i | | | i ƒ ƒ oT xQ | i d | | ƒ } | d j o Pn | } | | | d !d j o Pq^ q^ n | d 7} t i | | i ƒ ƒ } | o | i ƒ d p
t | ƒ } } | i
| | f ƒ q | S( s‘ 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.
i s
iÿÿÿÿi s
$i N( t routine_start_ret searcht Nonet startt function_start_ret matcht endt rfindt routine_end_ret lent append( t astrt spanlistt indt mR t iR ( ( sC /usr/lib64/python2.6/site-packages/numpy/distutils/from_template.pyt parse_structure; s(
(s <\s*(\w[\w\d]*)\s*>s <\s*(\w[\w\d]*)\s*=\s*(.*?)\s*>s <\s*((.*?))\s*>c C ss t i | ƒ } h } xW | D]O } | d i ƒ p
t | ƒ } | d i d d ƒ } t | ƒ } | | | \d+)\Zc C s¡ | i d ƒ } g } | D] } | | i ƒ q ~ } x[ t t | ƒ ƒ D]G } t i | | ƒ } | o' t | i d ƒ ƒ } | | | | s @rightarrow@s \c s¡ t | i d ƒ i d d ƒ ƒ } t i | ƒ o d | Sd } x/ ˆ i ƒ D]! } ˆ | | j o
| } qM qM W| d j o t ˆ ƒ } | ˆ | ( R R& R t template_name_reR R R- R ( t mobjR R t key( t lnames( sC /usr/lib64/python2.6/site-packages/numpy/distutils/from_template.pyt listrepl„ s !
s No replicates found for <%s>t _R s @comma@sH Mismatch in number of replacements (base <%s=%s>) for <%s=%s>. Ignoring.c s. | i d ƒ } ˆ i | ˆ d | g ƒ ˆ S( Ni ( R& t get( R6 R ( t rulest k( sC /usr/lib64/python2.6/site-packages/numpy/distutils/from_template.pyt namerepl¯ s t s
t >t <( R R R t subt list_reR t template_reR R; t
ValueErrort
startswithR" R R' R# (
t substrR R9 t numsubst base_rulet rR R) R t rulet numR> t newstr( ( R8 R< R= sC /usr/lib64/python2.6/site-packages/numpy/distutils/from_template.pyt
expand_sub~ sN
6
c C s³ | } d } t | ƒ } d } h } | i t ƒ xm | D]e } | | | | d !7} | i t | | | d !ƒ ƒ | t | | d | d !| ƒ 7} | d } q8 W| | | 7} | S( NR? i i ( R t updatet _special_namesR RN ( t allstrRM t writestrt structt oldendR RB ( ( sC /usr/lib64/python2.6/site-packages/numpy/distutils/from_template.pyR » s
"s9 (\n|\A)\s*include\s*['\"](?P[\w\d./\\]+[.]src)['\"]c C së t i i | ƒ } t | ƒ } g } x¶ | i ƒ D]¨ } t i | ƒ } | o | i d ƒ } t i i | ƒ p t i i | | ƒ } n t i i
| ƒ o d G| GH| i t | ƒ ƒ qÙ | i
| ƒ q1 | i
| ƒ q1 W| i ƒ | S( NR s Including file( t ost patht dirnamet opent readlinest include_src_reR R& t isabsR' t isfilet extendt resolve_includesR t close( t sourcet dt fidt linest lineR t fn( ( sC /usr/lib64/python2.6/site-packages/numpy/distutils/from_template.pyR^ Ï s"
c C s t | ƒ } t d i | ƒ ƒ S( NR? ( R^ R R' ( R` Rc ( ( sC /usr/lib64/python2.6/site-packages/numpy/distutils/from_template.pyR ã s sÿ
<_c=s,d,c,z>
<_t=real,double precision,complex,double complex>
t __main__i RJ t w(+ t __doc__t __all__RU t syst ret compilet IR R
R R RD R RC R R$ R R R5 RN R RZ R^ R RP t __name__t argvt filet
IndexErrort stdinRb t stdoutt outfileRX RV t splitextt baset extt newnamet readRQ RR t write( ( ( sC /usr/lib64/python2.6/site-packages/numpy/distutils/from_template.pyt / sH
=