<s> """<STR_LIT>""" <EOL> __revision__ = "<STR_LIT>" <EOL> import SCons . Defaults <EOL> from SCons . Scanner . Fortran import FortranScan <EOL> from FortranCommon import add_all_to_env <EOL> def generate ( env ) : <EOL> """<STR_LIT>""" <EOL> fscan = FortranScan ( "<STR_LIT>" ) <EOL> SCons . Tool . SourceFileScanner . add_scanner ( '<STR_LIT>' , fscan ) <EOL> SCons . Tool . SourceFileScanner . add_scanner ( '<STR_LIT>' , fscan ) <EOL> if '<STR_LIT>' not in env : <EOL> env [ '<STR_LIT>' ] = [ '<STR_LIT>' ] <EOL> else : <EOL> env [ '<STR_LIT>' ] . append ( '<STR_LIT>' ) <EOL> if '<STR_LIT>' not in env : <EOL> env [ '<STR_LIT>' ] = [ '<STR_LIT>' ] <EOL> else : <EOL> env [ '<STR_LIT>' ] . append ( '<STR_LIT>' ) <EOL> add_all_to_env ( env ) <EOL> fc = '<STR_LIT>' <EOL> for dialect in [ '<STR_LIT>' , '<STR_LIT>' , '<STR_LIT>' , '<STR_LIT>' ] : <EOL> env [ '<STR_LIT:%s>' % dialect ] = fc <EOL> env [ '<STR_LIT>' % dialect ] = '<STR_LIT>' % dialect <EOL> if env [ '<STR_LIT>' ] == '<STR_LIT>' : <EOL> env [ '<STR_LIT>' % dialect ] = SCons . Util . CLVar ( '<STR_LIT>' % dialect ) <EOL> if env [ '<STR_LIT>' ] == '<STR_LIT:win32>' : <EOL> for dialect in [ '<STR_LIT>' , '<STR_LIT>' , '<STR_LIT>' , '<STR_LIT>' ] : <EOL> for var in [ '<STR_LIT>' % dialect , '<STR_LIT>' % dialect , <EOL> '<STR_LIT>' % dialect , '<STR_LIT>' % dialect ] : <EOL> env [ var ] = env [ var ] . replace ( '<STR_LIT>' , '<STR_LIT>' ) <EOL> env [ '<STR_LIT>' ] = "<STR_LIT>" <EOL> else : <EOL> env [ '<STR_LIT>' ] = "<STR_LIT>" <EOL> def exists ( env ) : <EOL> return env . Detect ( '<STR_LIT>' ) </s>
