Changeset 103274


Ignore:
Timestamp:
Feb 19, 2013, 11:26:00 PM (7 years ago)
Author:
larryv@…
Message:

portconfigure.tcl: Replace redundant switch bodies with fallthroughs.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port1.0/portconfigure.tcl

    r103272 r103274  
    488488    # Set defaults
    489489    switch -exact ${type} {
    490         cc   { set ret [find_developer_tool cc] }
     490        cc   -
    491491        objc { set ret [find_developer_tool cc] }
    492492        cxx  { set ret [find_developer_tool c++] }
     
    497497        gcc {
    498498            switch -exact ${type} {
    499                 cc   { set ret [find_developer_tool gcc] }
     499                cc   -
    500500                objc { set ret [find_developer_tool gcc] }
    501501                cxx  { set ret [find_developer_tool g++] }
     
    505505        gcc-3.3 {
    506506            switch -exact ${type} {
    507                 cc   { set ret [find_developer_tool gcc-3.3] }
     507                cc   -
    508508                objc { set ret [find_developer_tool gcc-3.3] }
    509509                cxx  { set ret [find_developer_tool g++-3.3] }
     
    513513        gcc-4.0 {
    514514            switch -exact ${type} {
    515                 cc   { set ret [find_developer_tool gcc-4.0] }
     515                cc   -
    516516                objc { set ret [find_developer_tool gcc-4.0] }
    517517                cxx  { set ret [find_developer_tool g++-4.0] }
     
    521521        gcc-4.2 {
    522522            switch -exact ${type} {
    523                 cc   { set ret [find_developer_tool gcc-4.2] }
     523                cc   -
    524524                objc { set ret [find_developer_tool gcc-4.2] }
    525525                cxx  { set ret [find_developer_tool g++-4.2] }
     
    529529        llvm-gcc-4.2 {
    530530            switch -exact ${type} {
    531                 cc   { set ret [find_developer_tool llvm-gcc-4.2] }
     531                cc   -
    532532                objc { set ret [find_developer_tool llvm-gcc-4.2] }
    533533                cxx  { set ret [find_developer_tool llvm-g++-4.2] }
     
    537537        clang {
    538538            switch -exact ${type} {
    539                 cc   { set ret [find_developer_tool clang] }
     539                cc   -
    540540                objc { set ret [find_developer_tool clang] }
    541541                cxx  {
     
    551551        apple-gcc-4.0 {
    552552            switch -exact ${type} {
    553                 cc   { set ret ${prefix}/bin/gcc-apple-4.0 }
     553                cc   -
    554554                objc { set ret ${prefix}/bin/gcc-apple-4.0 }
    555555                cpp  { set ret ${prefix}/bin/cpp-apple-4.0 }
     
    558558        apple-gcc-4.2 {
    559559            switch -exact ${type} {
    560                 cc   { set ret ${prefix}/bin/gcc-apple-4.2 }
     560                cc   -
    561561                objc { set ret ${prefix}/bin/gcc-apple-4.2 }
    562562                cpp  { set ret ${prefix}/bin/cpp-apple-4.2 }
     
    566566        macports-gcc {
    567567            switch -exact ${type} {
    568                 cc   { set ret ${prefix}/bin/gcc }
     568                cc   -
    569569                objc { set ret ${prefix}/bin/gcc }
    570570                cxx  { set ret ${prefix}/bin/g++ }
    571571                cpp  { set ret ${prefix}/bin/cpp }
    572                 fc   { set ret ${prefix}/bin/gfortran }
    573                 f77  { set ret ${prefix}/bin/gfortran }
     572                fc   -
     573                f77  -
    574574                f90  { set ret ${prefix}/bin/gfortran }
    575575            }
     
    577577        macports-llvm-gcc-4.2 {
    578578            switch -exact ${type} {
    579                 cc   { set ret ${prefix}/bin/llvm-gcc-4.2 }
     579                cc   -
    580580                objc { set ret ${prefix}/bin/llvm-gcc-4.2 }
    581581                cxx  { set ret ${prefix}/bin/llvm-g++-4.2 }
     
    585585        macports-clang {
    586586            switch -exact ${type} {
    587                 cc   { set ret ${prefix}/bin/clang }
     587                cc   -
    588588                objc { set ret ${prefix}/bin/clang }
    589589                cxx  { set ret ${prefix}/bin/clang++ }
     
    593593            if {[regexp {macports-clang-(.*)\.(.*)} $compiler -> major minor]} {
    594594                switch -exact ${type} {
    595                     cc   { set ret ${prefix}/bin/clang-mp-${major}.${minor} }
     595                    cc   -
    596596                    objc { set ret ${prefix}/bin/clang-mp-${major}.${minor} }
    597597                    cxx  { set ret ${prefix}/bin/clang++-mp-${major}.${minor} }
    598598                }
    599599            } elseif {[regexp {macports-dragonegg-(.*)\.(.*)} $compiler -> major minor]} {
    600             switch -exact ${type} {
    601                     cc   { set ret ${prefix}/bin/dragonegg-${major}.${minor}-gcc }
     600                switch -exact ${type} {
     601                    cc   -
    602602                    objc { set ret ${prefix}/bin/dragonegg-${major}.${minor}-gcc }
    603603                    cxx  { set ret ${prefix}/bin/dragonegg-${major}.${minor}-g++ }
    604604                    cpp  { set ret ${prefix}/bin/dragonegg-${major}.${minor}-cpp }
    605                     fc   { set ret ${prefix}/bin/dragonegg-${major}.${minor}-gfortran }
    606                     f77  { set ret ${prefix}/bin/dragonegg-${major}.${minor}-gfortran }
     605                    fc   -
     606                    f77  -
    607607                    f90  { set ret ${prefix}/bin/dragonegg-${major}.${minor}-gfortran }
    608608                }
    609609            } elseif {[regexp {macports-gcc-(.*)\.(.*)} $compiler -> major minor]} {
    610610                switch -exact ${type} {
    611                     cc   { set ret ${prefix}/bin/gcc-mp-${major}.${minor} }
     611                    cc   -
    612612                    objc { set ret ${prefix}/bin/gcc-mp-${major}.${minor} }
    613613                    cxx  { set ret ${prefix}/bin/g++-mp-${major}.${minor} }
    614614                    cpp  { set ret ${prefix}/bin/cpp-mp-${major}.${minor} }
    615                     fc   { set ret ${prefix}/bin/gfortran-mp-${major}.${minor} }
    616                     f77  { set ret ${prefix}/bin/gfortran-mp-${major}.${minor} }
     615                    fc   -
     616                    f77  -
    617617                    f90  { set ret ${prefix}/bin/gfortran-mp-${major}.${minor} }
    618618                }
Note: See TracChangeset for help on using the changeset viewer.