public static LispInput OpenInputFile(LispEnvironment aEnvironment, InputDirectories aInputDirectories, String aFileName, InputStatus aInputStatus) throws Exception
public static LispInput OpenInputFile(String aFileName, InputStatus aInputStatus) throws Exception
  public static LispInput OpenInputFile(LispEnvironment aEnvironment,      InputDirectories aInputDirectories, String aFileName,      InputStatus aInputStatus) throws Exception  {    String othername = aFileName;    int i = 0;    LispInput f = OpenInputFile(othername, aInputStatus);    while (f == null && i<aInputDirectories.size())    {      othername = ((String)aInputDirectories.get(i)) + aFileName;      f = OpenInputFile(othername, aInputStatus);      i++;    }    return f;  }