Replace "Type::make" by "makeType".

This commit is contained in:
Nicolas Pierron 2010-02-24 18:28:08 +00:00
parent b0d21c1db8
commit 00ad497494

View file

@ -43,14 +43,14 @@ int main()
unsigned good, tests; unsigned good, tests;
using namespace term; using namespace term;
AInt a = Int::make(1); AInt a = makeInt(1);
AInt b = Int::make(2); AInt b = makeInt(2);
AInt c = Int::make(1); AInt c = makeInt(1);
Eval e; Eval e;
CHECK(a == c, "Terms are shared."); CHECK(a == c, "Terms are shared.");
CHECK(!as<APlus>(a), "Bad convertion returns a zero ATerm."); CHECK(!as<APlus>(a), "Bad convertion returns a zero ATerm.");
CHECK(as<AInt>(a) == a, "Good convertion returns the same ATerm."); CHECK(as<AInt>(a) == a, "Good convertion returns the same ATerm.");
CHECK(e.run(Plus::make(a, Plus::make(b, c))) == 4, "Visitors are working."); CHECK(e.run(makePlus(a, makePlus(b, c))) == 4, "Visitors are working.");
return tests - good; return tests - good;
} }