/*
*
* Copyright 2002-2004 The Ant-Contrib project
*
* 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.
*/
package net.sf.antcontrib.cpptasks.openwatcom;
import java.io.File;
import net.sf.antcontrib.cpptasks.compiler.LinkType;
import net.sf.antcontrib.cpptasks.compiler.Linker;
import net.sf.antcontrib.cpptasks.parser.FortranParser;
import net.sf.antcontrib.cpptasks.parser.Parser;
import org.apache.tools.ant.types.Environment;
/**
* 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
*/
public Parser createParser(final File source) {
return new FortranParser();
}
/**
* Get linker.
* @param type link type
* @return linker
*/
public Linker getLinker(final LinkType type) {
return OpenWatcomFortranLinker.getInstance().getLinker(type);
}
}