func TestComposeListInt64(t *testing.T) {
expr := ast.NewNestedFunction("eq",
ast.NewNestedFunction("elem",
ast.NewNestedFunction("print",
ast.NewIntList(
ast.NewIntConst(1),
ast.NewIntConst(2),
),
),
ast.NewIntConst(1),
),
ast.NewIntConst(2),
)
b, err := NewBool(expr)
if err != nil {
panic(err)
}
f, err := NewBoolFunc(b)
if err != nil {
panic(err)
}
r, err := f.Eval(nil)
if err != nil {
panic(err)
}
if r != true {
t.Fatalf("expected true")
}
t.Logf("%s", funcs.Sprint(f.(*composedBool).Func))
}
func TestList(t *testing.T) {
expr := ast.NewNestedFunction("eq",
ast.NewNestedFunction("elem",
ast.NewStringList(
ast.NewStringConst("abc"),
),
ast.NewIntConst(0),
),
ast.NewStringConst("abc"),
)
b, err := NewBool(expr)
if err != nil {
panic(err)
}
f, err := NewBoolFunc(b)
if err != nil {
panic(err)
}
str := funcs.Sprint(f.(*composedBool).Func)
if str != "->true" {
t.Fatalf("not enough trimming on %s", str)
}
r, err := f.Eval(nil)
if err != nil {
panic(err)
}
if r != true {
t.Fatalf("expected true")
}
}
func TestNoTrim(t *testing.T) {
expr := ast.NewNestedFunction("eq",
ast.NewNestedFunction("elem",
ast.NewStringList(
ast.NewNestedFunction("print",
ast.NewStringVar(),
),
),
ast.NewIntConst(0),
),
ast.NewStringConst("abc"),
)
b, err := NewBool(expr)
if err != nil {
panic(err)
}
f, err := NewBoolFunc(b)
if err != nil {
panic(err)
}
str := funcs.Sprint(f.(*composedBool).Func)
if str == "false" {
t.Fatalf("too much trimming")
}
t.Logf("trimmed = %s", str)
r, err := f.Eval(debug.NewStringValue("abc"))
if err != nil {
panic(err)
}
if r != true {
t.Fatalf("expected true")
}
}
func TestComposeListBool(t *testing.T) {
expr := ast.NewNestedFunction("eq",
ast.NewNestedFunction("length",
ast.NewBoolList(
ast.NewTrue(),
ast.NewFalse(),
),
),
ast.NewIntConst(2),
)
b, err := NewBool(expr)
if err != nil {
panic(err)
}
f, err := NewBoolFunc(b)
if err != nil {
panic(err)
}
r, err := f.Eval(nil)
if err != nil {
panic(err)
}
if r != true {
t.Fatalf("expected true")
}
str := funcs.Sprint(f.(*composedBool).Func)
if str != "->true" {
t.Fatalf("trimming did not work: %s", str)
}
}
func TestComposeBuiltInEqual(t *testing.T) {
expr := ast.NewEqual(
ast.NewIntConst(123),
)
b, err := NewBool(expr)
if err != nil {
panic(err)
}
f, err := NewBoolFunc(b)
if err != nil {
panic(err)
}
r, err := f.Eval(debug.NewIntValue(124))
if err != nil {
panic(err)
}
if r != false {
t.Fatalf("expected false")
}
}