public static Shelisp.Object Fexpand_file_name(L l, Shelisp.Object filename, [LispOptional] Shelisp.Object directory)
{
// XXX fix fallback if directory is L.Qnil (it uses the buffer's default-directory)
if (directory.LispEq (L.Qnil))
directory = new Shelisp.String(Environment.CurrentDirectory);
return new Shelisp.String (Path.Combine ((string)(Shelisp.String)directory, (string)(Shelisp.String)filename));
}
public static Shelisp.Object Fload(L l, Shelisp.Object filename, [LispOptional] Shelisp.Object missing_ok, Shelisp.Object nomessage, Shelisp.Object nosuffix, Shelisp.Object must_suffix)
{
//Console.WriteLine ("load {0} {1} {2} {3} {4}", filename, missing_ok, nomessage, nosuffix, must_suffix);
if (!((string)(String)filename).EndsWith (".el"))
filename = new Shelisp.String (((string)(Shelisp.String)filename) + ".el");
return Fload_file (l, filename);
}
