text: // Copyright (c) 2018, Forschungzentrum Juelich GmbH, Juelich Supercomputing Centre
  // All rights reserved.
  //
  // Redistribution and use in source and binary forms, with or without
  // modification, are permitted provided that the following conditions are met:
  //
  //     * Redistributions of source code must retain the above copyright notice,
  //       this list of conditions and the following disclaimer.
  //     * Redistributions in binary form must reproduce the above copyright
  //       notice, this list of conditions and the following disclaimer in the
  //       documentation and/or other materials provided with the distribution.
  //
  // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  // AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  // ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
  // LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  // CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  // SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  // INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  // CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  // ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  // POSSIBILITY OF SUCH DAMAGE.
  
  import path from 'path';
  
  import {BaseCompiler} from '../base-compiler';
  import * as utils from '../utils';
  
  export class FortranCompiler extends BaseCompiler {
      static get key() {
          return 'fortran';
      }
  
      async runCompiler(compiler, options, inputFilename, execOptions) {
          if (!execOptions) {
              execOptions = this.getDefaultExecOptions();
          }
          // Switch working directory of compiler to temp directory that also holds the source.
          // This makes it possible to generate .mod files.
          execOptions.customCwd = path.dirname(inputFilename);
  
          const result = await this.exec(compiler, options, execOptions);
          result.inputFilename = inputFilename;
          const baseFilename = './' + path.basename(inputFilename);
          result.stdout = utils.parseOutput(result.stdout, baseFilename);
          result.stderr = utils.parseOutput(result.stderr, baseFilename);
          return result;
      }
  }
  