ultimatepp/benchmarks/BenchEsc/Esc.cpp
cxl 5f0f425da8 .benchmarks
git-svn-id: svn://ultimatepp.org/upp/trunk@14393 f0d560ea-af0d-0410-9eb7-867de7ffcac7
2020-04-28 09:01:35 +00:00

38 lines
626 B
C++

#include <Esc/Esc.h>
using namespace Upp;
CONSOLE_APP_MAIN
{
RDUMP(sizeof(EscValue));
String code = LoadFile(GetDataFile("test.esc"));
ArrayMap<String, EscValue> global;
StdLib(global);
try {
Scan(global, code);
EscValue primes;
for(int i = 0; i < 100; i++)
{
RTIMING("run");
primes = Execute(global, "sieve", INT_MAX);
}
RDUMP(primes);
}
catch(CParser::Error e) {
RLOG(e);
}
RLOG("");
RLOG("-----------------------");
DUMP(global.GetAdd("result"));
// EscValue v;
// v.SetArray().Add(123);
// EscValue v2 = v;
// v.SetArray().Add(v);
// DUMP(v);
}