1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
|
#include <yql/essentials/public/purecalc/purecalc.h>
#include "fake_spec.h"
#include <yql/essentials/public/purecalc/ut/protos/test_structs.pb.h>
#include <library/cpp/testing/unittest/registar.h>
Y_UNIT_TEST_SUITE(TestSExpr) {
Y_UNIT_TEST(TestSExprCompile) {
using namespace NYql::NPureCalc;
auto factory = MakeProgramFactory();
auto expr = TString(R"(
(
(return (Self '0))
)
)");
UNIT_ASSERT_NO_EXCEPTION([&](){
factory->MakePullStreamProgram(FakeIS(), FakeOS(), expr, ETranslationMode::SExpr);
}());
UNIT_ASSERT_NO_EXCEPTION([&](){
factory->MakePullListProgram(FakeIS(), FakeOS(), expr, ETranslationMode::SExpr);
}());
UNIT_ASSERT_NO_EXCEPTION([&](){
factory->MakePushStreamProgram(FakeIS(), FakeOS(), expr, ETranslationMode::SExpr);
}());
}
Y_UNIT_TEST(TestInvalidSExpr) {
using namespace NYql::NPureCalc;
auto factory = MakeProgramFactory();
auto sql = TString(R"(
Some totally invalid SExpr
)");
UNIT_ASSERT_EXCEPTION_CONTAINS([&](){
factory->MakePullStreamProgram(FakeIS(), FakeOS(), sql, ETranslationMode::SExpr);
}(), TCompileError, "failed to parse s-expression");
UNIT_ASSERT_EXCEPTION_CONTAINS([&](){
factory->MakePullListProgram(FakeIS(), FakeOS(), sql, ETranslationMode::SExpr);
}(), TCompileError, "failed to parse s-expression");
UNIT_ASSERT_EXCEPTION_CONTAINS([&](){
factory->MakePushStreamProgram(FakeIS(), FakeOS(), sql, ETranslationMode::SExpr);
}(), TCompileError, "failed to parse s-expression");
}
}
|
