← Back to branch summary

~ubuntu-branches/ubuntu/lucid/blender/lucid

« back to all changes in this revision

Viewing changes to scons/scons-local-1.1.0/SCons/Tool/aixf77.py

  • Committer: Bazaar Package Importer
  • Author(s): Chris Coulson
  • Date: 2009-08-06 22:32:19 UTC
  • mfrom: (1.2.10 upstream)
  • Revision ID: james.westby@ubuntu.com-20090806223219-8z4eej1u8levu4pz
Tags: 2.49a+dfsg-0ubuntu1
https://launchpad.net/bugs/382153
* Merge from debian unstable, remaining changes:
  - debian/control: Build-depend on python-2.6 rather than python-2.5.
  - debian/misc/*.desktop: Add Spanish translation to .desktop 
    files.
  - debian/pyversions: 2.6.
  - debian/rules: Clean *.o of source/blender/python/api2_2x/
* New upstream release (LP: #382153).
* Refreshed patches:
  - 01_sanitize_sys.patch
  - 02_tmp_in_HOME
  - 10_use_systemwide_ftgl
  - 70_portability_platform_detection
* Removed patches merged upstream:
  - 30_fix_python_syntax_warning
  - 90_ubuntu_ffmpeg_52_changes

Show diffs side-by-side

added added

removed removed

Lines of Context:
scons/scons-local-1.1.0/SCons/Tool/aixf77.py
 
1
"""engine.SCons.Tool.aixf77
 
2
 
 
3
Tool-specific initialization for IBM Visual Age f77 Fortran compiler.
 
4
 
 
5
There normally shouldn't be any need to import this module directly.
 
6
It will usually be imported through the generic SCons.Tool.Tool()
 
7
selection method.
 
8
"""
 
9
 
 
10
#
 
11
# Copyright (c) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 The SCons Foundation
 
12
#
 
13
# Permission is hereby granted, free of charge, to any person obtaining
 
14
# a copy of this software and associated documentation files (the
 
15
# "Software"), to deal in the Software without restriction, including
 
16
# without limitation the rights to use, copy, modify, merge, publish,
 
17
# distribute, sublicense, and/or sell copies of the Software, and to
 
18
# permit persons to whom the Software is furnished to do so, subject to
 
19
# the following conditions:
 
20
#
 
21
# The above copyright notice and this permission notice shall be included
 
22
# in all copies or substantial portions of the Software.
 
23
#
 
24
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY
 
25
# KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE
 
26
# WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 
27
# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
 
28
# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
 
29
# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
 
30
# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 
31
#
 
32
 
 
33
__revision__ = "src/engine/SCons/Tool/aixf77.py 3603 2008/10/10 05:46:45 scons"
 
34
 
 
35
import os.path
 
36
 
 
37
#import SCons.Platform.aix
 
38
 
 
39
import f77
 
40
 
 
41
# It would be good to look for the AIX F77 package the same way we're now
 
42
# looking for the C and C++ packages.  This should be as easy as supplying
 
43
# the correct package names in the following list and uncommenting the
 
44
# SCons.Platform.aix_get_xlc() call the in the function below.
 
45
packages = []
 
46
 
 
47
def get_xlf77(env):
 
48
    xlf77 = env.get('F77', 'xlf77')
 
49
    xlf77_r = env.get('SHF77', 'xlf77_r')
 
50
    #return SCons.Platform.aix.get_xlc(env, xlf77, xlf77_r, packages)
 
51
    return (None, xlf77, xlf77_r, None)
 
52
 
 
53
def generate(env):
 
54
    """
 
55
    Add Builders and construction variables for the Visual Age FORTRAN
 
56
    compiler to an Environment.
 
57
    """
 
58
    path, _f77, _shf77, version = get_xlf77(env)
 
59
    if path:
 
60
        _f77 = os.path.join(path, _f77)
 
61
        _shf77 = os.path.join(path, _shf77)
 
62
 
 
63
    f77.generate(env)
 
64
 
 
65
    env['F77'] = _f77
 
66
    env['SHF77'] = _shf77
 
67
 
 
68
def exists(env):
 
69
    path, _f77, _shf77, version = get_xlf77(env)
 
70
    if path and _f77:
 
71
        xlf77 = os.path.join(path, _f77)
 
72
        if os.path.exists(xlf77):
 
73
            return xlf77
 
74
    return None