/* * #%L * Native ARchive plugin for Maven * %% * Copyright (C) 2002 - 2014 NAR Maven Plugin developers. * %% * Licensed under the Apache License, Version 2.0 (the "License"); * you may not use this file except in compliance with the License. * You may obtain a copy of the License at * * http://www.apache.org/licenses/LICENSE-2.0 * * Unless required by applicable law or agreed to in writing, software * distributed under the License is distributed on an "AS IS" BASIS, * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. * See the License for the specific language governing permissions and * limitations under the License. * #L% */ package com.github.maven_nar.cpptasks.openwatcom; import java.io.File; import org.apache.tools.ant.types.Environment; import com.github.maven_nar.cpptasks.compiler.LinkType; import com.github.maven_nar.cpptasks.compiler.Linker; import com.github.maven_nar.cpptasks.parser.FortranParser; import com.github.maven_nar.cpptasks.parser.Parser; /** * Adapter for the OpenWatcom Fortran compiler. * * @author Curt Arnold */ public final class OpenWatcomFortranCompiler extends OpenWatcomCompiler { /** * Singleton. */ private static final OpenWatcomFortranCompiler[] INSTANCE = new OpenWatcomFortranCompiler[] { new OpenWatcomFortranCompiler("wfl386", false, null) }; /** * Get instance. * * @return OpenWatcomFortranCompiler compiler instance */ public static OpenWatcomFortranCompiler getInstance() { return INSTANCE[0]; } /** * Constructor. * * @param command * String command * @param newEnvironment * boolean use new environment * @param env * Environment environment */ private OpenWatcomFortranCompiler(final String command, final boolean newEnvironment, final Environment env) { super(command, "/?", new String[] { ".f90", ".for", ".f" }, new String[] { ".i", ".i90", ".fpp" }, newEnvironment, env); } /** * Create dependency parser. * * @param source * File source file * @return Parser parser */ @Override public Parser createParser(final File source) { return new FortranParser(); } /** * Get linker. * * @param type * link type * @return linker */ @Override public Linker getLinker(final LinkType type) { return OpenWatcomFortranLinker.getInstance().getLinker(type); } }