static void Main(string[] args)
{
if (args.Length < 1)
{
Console.WriteLine("Usage: kecaknoah <input file>");
return;
}
var txt = File.ReadAllText(args[0]);
var lexer = new KecaknoahLexer();
var parser = new KecaknoahParser();
var lr = lexer.AnalyzeFromSource(txt);
if (!lr.Success)
{
Console.WriteLine($"字句解析エラー ({lr.Error.Column}, {lr.Error.Line}): {lr.Error.Message}");
Console.ReadLine();
Environment.Exit(1);
}
var ast = parser.Parse(lr);
if (!ast.Success)
{
Console.WriteLine($"構文解析エラー ({ast.Error.Column}, {ast.Error.Line}): {ast.Error.Message}");
Console.ReadLine();
Environment.Exit(1);
}
var prc = new KecaknoahPrecompiler();
var src = prc.PrecompileAll(ast);
#if DEBUG
var asm = AssembleSource(src);
File.WriteAllLines(args[0] + ".asm", asm);
Console.WriteLine("Assembled source was generated.");
Console.ReadLine();
#endif
var environment = new KecaknoahEnvironment();
var module = environment.CreateModule("Main");
module.RegisterStandardLibraries();
module.RegisterSource(src);
var ctx = module.CreateContext();
var il = module["main"];
var kargs = new List <KecaknoahObject>();
if (args.Length >= 2)
{
kargs.Add(new KecaknoahArray(args.Skip(1).Select(p => p.AsKecaknoahString())));
}
else
{
kargs.Add(new KecaknoahArray(new List <KecaknoahObject>()));
}
if (il != KecaknoahNil.Instance)
{
ctx.Initialize(il, kargs);
while (ctx.MoveNext())
{
;
}
}
}
static void Main(string[] args)
{
if (args.Length < 1)
{
Console.WriteLine("Usage: kecaknoah <input file>");
return;
}
var txt = File.ReadAllText(args[0]);
var lexer = new KecaknoahLexer();
var parser = new KecaknoahParser();
var lr = lexer.AnalyzeFromSource(txt);
if (!lr.Success)
{
Console.WriteLine($"字句解析エラー ({lr.Error.Column}, {lr.Error.Line}): {lr.Error.Message}");
Console.ReadLine();
return;
}
var ast = parser.Parse(lr);
if (!ast.Success)
{
Console.WriteLine($"構文解析エラー ({ast.Error.Column}, {ast.Error.Line}): {ast.Error.Message}");
Console.ReadLine();
}
var prc = new KecaknoahPrecompiler();
var src = prc.PrecompileAll(ast);
var environment = new KecaknoahEnvironment();
var module = environment.CreateModule("Main");
module.RegisterSource(src);
var ctx = module.CreateContext();
var il = module["main"];
var kargs = new List <KecaknoahString>();
if (args.Length > 2)
{
kargs.AddRange(args.Skip(1).Select(p => p.AsKecaknoahString()));
}
if (il != KecaknoahNil.Instance)
{
ctx.Execute(il, kargs.ToArray());
}
/*
* var sw = new Stopwatch();
* sw.Start();
* for (int i = 0; i < 10; i++)
* {
* ctx.Execute(il);
* }
* sw.Stop();
* Console.WriteLine($"{sw.ElapsedMilliseconds}");
*/
var asm = AssembleSource(src);
File.WriteAllLines(args[0] + ".asm", asm);
Console.ReadLine();
}
